libsim  Versione 7.1.9

◆ dbasession_messages_open_output()

subroutine dballe_class::dbasession_messages_open_output ( class(dbasession), intent(in)  session,
character (len=*), intent(in)  filename,
character (len=*), intent(in), optional  mode,
character (len=*), intent(in), optional  format 
)
private

dballe messages_open_output

Parametri
[in]filenamefile name to open
[in]mode"r"/"w"/"a" the open mode ("r" for read, "w" for write or create, "a" for append)
[in]formatthe file format. It can be "BUFR", "CREX" o "JSON" (default="BUFR")

Definizione alla linea 1359 del file dballe_class.F03.

1360  !print *,"scusa attributi:"
1361  !call data%attrv%dcv(i)%dat%display()
1362  call session%scusa()
1363  endif
1364  end do
1365  if (critica) then
1366  !ierr=idba_seti(session%sehandle, "*context_id", id)
1367  !call session%var_related(data%dbadc%dat%btable) ! If I have made a prendilo I do not need this
1368  call session%critica()
1369  end if
1370 
1371  end if
1372 end if
1373 
1374 
1375 !to close message on file

Generated with Doxygen.