libsim Versione 7.1.11
|
◆ dbasession_ingest_metaanddatabl()
get data from DSN
Definizione alla linea 3049 del file dballe_class.F03. 3050
3052subroutine dbametaanddatab_extrude(metaanddatab,session)
3053class(dbametaanddatab), intent(in) :: metaanddatab
3054type(dbasession), intent(in) :: session
3055
3056call session%unsetall()
3057!write metadata
3058call session%set(metadata=metaanddatab%metadata)
3059!write ana data and attribute
3060call session%set(data=metaanddatab%dbadatab)
3061
3062if (metaanddatab%dbadatab%c_e()) then
3063 call session%prendilo()
3064else
3065 call session%dimenticami()
3066endif
3067
3068end subroutine dbametaanddatab_extrude
3069
3071subroutine dbametaanddatad_extrude(metaanddatad,session)
3072class(dbametaanddatad), intent(in) :: metaanddatad
3073type(dbasession), intent(in) :: session
3074
3075call session%unsetall()
3076!write metadata
3077call session%set(metadata=metaanddatad%metadata)
|