libsim Versione 7.2.4
|
◆ dbametaanddatar_extrude()
put data on DSN
Definizione alla linea 3278 del file dballe_class.F03. 3279 select type ( dat => metaanddata%dataattrv%dataattr(i)%dat )
3280 type is (dbadatai)
3281 ier = idba_enq(session%sehandle, btable,dat%value)
3282 type is (dbadatar)
3283 ier = idba_enq(session%sehandle, btable,dat%value)
3284 type is (dbadatad)
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
|