libsim  Versione 7.1.6

◆ dbasession_ingest_metaanddatarv()

subroutine dballe_class::dbasession_ingest_metaanddatarv ( class(dbasession), intent(inout)  session,
type(dbametaanddatar), dimension(:), intent(inout), allocatable  metaanddatav 
)
private

Get data from DSN.

Parametri
[in,out]metaanddatavingestd data

Definizione alla linea 3885 del file dballe_class.F03.

3886 if (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
3896 
3897  if (lwrite)then
3898  if (lwipe.or..not.exist) then
3899  lmode="w"
3900  else
3901  lmode="a"

Generated with Doxygen.