libsim Versione 7.2.0
|
◆ dbasession_ingest_metaanddatarv()
Get data from DSN.
Definizione alla linea 3879 del file dballe_class.F03. 3880if (present(format))then
3881 lformat=format
3882end if
3883
3884lmode="r"
3885
3886if (present(filename)) then
3887
3888 lfile=.true.
3889
3890 IF (filename == '') THEN
3891! if stdio do not check existence, stdin always exist, stdout never exist
3892 exist = .NOT.lwrite
3893 ELSE
3894 INQUIRE(file=filename,exist=exist)
3895 ENDIF
|