Constructor Without parameter it is initialized to missing.
1747 subroutine dbadatetime_display(datetime)
1748 class(dbadatetime),
intent(in) :: datetime
1749 call display (datetime%datetime)
1750 end subroutine dbadatetime_display
1753 subroutine dbadatetime_set(datetime,session)
1754 class(dbadatetime),
intent(in) :: datetime
1755 type(dbasession),
intent(in) :: session
1756 integer :: ier,year,month,day,hour,minute,sec,msec
1758 CALL getval(datetime%datetime, year=year, month=month, day=day, hour=hour, minute=minute,msec=msec)
1761 sec=nint(float(msec)/1000.)