1302 if (.not. data%dbadc%dat%c_e() .and. session%file)
return 1304 call data%dbadc%dbaset(session)
1306 code = idba_error_code()
1308 if (optio_log(attronly).or. .not. data%dbadc%dat%c_e() .or. code ==13 )
then 1311 ierr = idba_set(session%sehandle,
"var",data%dbadc%dat%btable)
1314 ierr = idba_voglioquesto(session%sehandle, count)
1318 ierr=idba_unsetb(session%sehandle)
1319 if (count ==0)
return 1321 if (c_e(count))
then 1322 if (optio_log(attronly))
then 1323 ierr=idba_dammelo(session%sehandle, btable)
1327 ierr=idba_dimenticami(session%sehandle)
1331 call session%prendilo()
1332 ierr=idba_unsetb(session%sehandle)