4 lines
139 B
Text
4 lines
139 B
Text
C *--> FROM DACOMMON.KDATE
|
|
C ASAP CURRENT DATE COMMON
|
|
COMMON /KDATE/ KMON,KDAY,KYR,KTIM
|
|
C
|