Symbol Description Uses
middate0 9



File Line number Procedure Code
./pkg/cal/cal_getmonthsrec.F 139 CAL_GETMONTHSREC
        call CAL_ADDTIME( startofmonth, shifttime, middate0, mythid )
./pkg/cal/cal_getmonthsrec.F 140 CAL_GETMONTHSREC
        middate0_1  = (middate0(1)/100)*100 + 1
./pkg/cal/cal_getmonthsrec.F 151 CAL_GETMONTHSREC
        call CAL_ADDTIME( tempDate, midtime, middate0, mythid )
./pkg/cal/cal_getmonthsrec.F 170 CAL_GETMONTHSREC
        middate0(1) = middate(1)
./pkg/cal/cal_getmonthsrec.F 171 CAL_GETMONTHSREC
        middate0(2) = middate(2)
./pkg/cal/cal_getmonthsrec.F 172 CAL_GETMONTHSREC
        middate0(3) = middate(3)
./pkg/cal/cal_getmonthsrec.F 173 CAL_GETMONTHSREC
        middate0(4) = middate(4)
./pkg/cal/cal_getmonthsrec.F 192 CAL_GETMONTHSREC
      call CAL_SUBDATES( middate1, middate0, difftime, mythid )
./pkg/cal/cal_getmonthsrec.F 56 CAL_GETMONTHSREC
      integer middate0(4)