libsim Versione 7.2.4
|
◆ dbasession_ingest_metaanddatac()
get data from DSN
Definizione alla linea 3901 del file dballe_class.F03. 3902 call l4f_category_log(dbasession_init%category,l4f_info,"file exists; appending data to file")
3903 end if
3904 else
3905 if (.not.exist) then
3906 call l4f_category_log(dbasession_init%category,l4f_error,"file does not exist; cannot open file for read")
3907 CALL raise_fatal_error()
3908 end if
3909 end if
3910
3911 if (present(mode)) lmode = mode
3912
3913 if (.not.present(memdb))then
3914 dbasession_init%memdb=.true. ! default with filename
3915 end if
3916
3917 if (.not.present(loadfile))then
|