The 515-UPDATE-DATE-TIME routine sets WS-DATE-TIME to the current date and time. See the Century Parameter Processing.
Required Input
No required input
Output
| Field |
Type and length |
Definition |
| WS-SYSTEM-TIME |
|
Time and date structure is returned in the following formats: |
| WS-DATE-TIME |
N 6 |
MMDDYY |
| WS-SYSTEM-DATE-YMD |
N 8 |
YYYYMMDD |
| WS-SYSTEM-TIME |
N 8 |
The time is returned as HHMMSSSS with low-order zero fill for tenths and hundredths of seconds. |
Example
* Update the date and clock time.
PERFORM 515-UPDATE-DATE-TIME.
|