Constructor Without parameter it is initialized to missing.
1723 end subroutine dbanetwork_set
1726 subroutine dbanetwork_enq(network,session)
1727 class(dbanetwork),
intent(out) :: network
1728 type(dbasession),
intent(in) :: session
1731 ier = idba_enq(session%sehandle,
"rep_memo", network%name)
1732 ier = idba_enq(session%sehandle,
"priority", network%priority)
1734 end subroutine dbanetwork_enq