Symbol | Description | Uses |
workdate | 9 |
File | Line number | Procedure | Code |
./pkg/cal/cal_getdate.F | 52 | CAL_GETDATE |
integer workdate(4) |
./pkg/cal/cal_getdate.F | 66 | CAL_GETDATE |
call CAL_TIMEINTERVAL( secs, 'secs', workdate, mythid ) |
./pkg/cal/cal_getdate.F | 67 | CAL_GETDATE |
call CAL_ADDTIME( modelstartdate, workdate, mydate, mythid ) |
./pkg/cal/cal_subdates.F | 51 | CAL_SUBDATES |
integer workdate(4) |
./pkg/cal/cal_subdates.F | 62 | CAL_SUBDATES |
workdate(1) = -initialdate(1) |
./pkg/cal/cal_subdates.F | 63 | CAL_SUBDATES |
workdate(2) = -initialdate(2) |
./pkg/cal/cal_subdates.F | 64 | CAL_SUBDATES |
workdate(3) = 0 |
./pkg/cal/cal_subdates.F | 65 | CAL_SUBDATES |
workdate(4) = -1 |
./pkg/cal/cal_subdates.F | 66 | CAL_SUBDATES |
call CAL_ADDTIME( finaldate, workdate, diffdate, mythid ) |