libsim Versione 7.1.11

◆ dbasession_ingest_ana()

subroutine dbasession_ingest_ana ( class(dbasession), intent(inout)  session,
type(dbaana), intent(out), optional  ana 
)
private

get data from DSN

Definizione alla linea 3322 del file dballe_class.F03.

3323 type is (dbadatab)
3324 ier = idba_enq(session%sehandle, btable,dat%value)
3325 type is (dbadatac)
3326 ier = idba_enq(session%sehandle, btable,dat%value)
3327 end select
3328
3329 end if
3330 end do
3331 end do
3332 end if
3333 else
3334 if (c_e(session%count) .and. session%count > 0) then
3335 ier = idba_voglioancora(session%sehandle, acount)
3336

Generated with Doxygen.