libsim Versione 7.2.4
|
◆ dbadatab_init()
Constructor Without parameter it is initialized to missing.
Definizione alla linea 1715 del file dballe_class.F03. 1716subroutine dbanetwork_set(network,session)
1717class(dbanetwork), intent(in) :: network
1718type(dbasession), intent(in) :: session
1719integer :: ier
1720
1721ier = idba_set(session%sehandle,"rep_memo", network%name)
1722
1723end subroutine dbanetwork_set
1724
1726subroutine dbanetwork_enq(network,session)
1727class(dbanetwork), intent(out) :: network
1728type(dbasession), intent(in) :: session
1729integer :: ier
1730
1731ier = idba_enq(session%sehandle,"rep_memo", network%name)
|