libsim Versione 7.1.11

◆ dbametaanddatar_extrude()

subroutine dbametaanddatar_extrude ( class(dbametaanddatar), intent(in)  metaanddatar,
type(dbasession), intent(in)  session 
)
private

put data on DSN

Parametri
[in]sessiondballe session

Definizione alla linea 3284 del file dballe_class.F03.

3285 ier = idba_enq(session%sehandle, btable,dat%value)
3286 type is (dbadatab)
3287 ier = idba_enq(session%sehandle, btable,dat%value)
3288 type is (dbadatac)
3289 ier = idba_enq(session%sehandle, btable,dat%value)
3290 end select
3291
3292 if (optio_log(noattr))then
3293 ! initialize to (0) the attribute vector
3294 allocate (metaanddata%dataattrv%dataattr(i)%attrv%dcv(0))
3295
3296 else
3297
3298 if (lstarvars) then
3299

Generated with Doxygen.