1313 if (optio_log(attronly).or. .not. data%dbadc%dat%c_e() .or. code ==13 )
then 1316 ierr = idba_set(session%sehandle,
"var",data%dbadc%dat%btable)
1319 ierr = idba_voglioquesto(session%sehandle, count)
1323 ierr=idba_unsetb(session%sehandle)
1324 if (count ==0)
return 1326 if (
c_e(count))
then 1327 if (optio_log(attronly))
then 1328 ierr=idba_dammelo(session%sehandle, btable)
1332 ierr=idba_dimenticami(session%sehandle)
1336 call session%prendilo()
1337 ierr=idba_unsetb(session%sehandle)
1340 if (optio_log(noattr))
return 1343 if (
allocated(data%attrv%dcv))
then 1344 if (
size(data%attrv%dcv) > 0 )
then 1346 do i = 1,
size(data%attrv%dcv)
1347 if (
present(filter))
then 1348 if (filter%contextana)
then 1349 if (.not. filter%anastarvars == data%attrv%dcv(i)%dat) cycle
1351 if (.not. filter%starvars == data%attrv%dcv(i)%dat) cycle