Rational Developer for System z
COBOL for Windows, Version 7.5, Programming Guide


Getting the system date under CICS

To retrieve the system date in a CICS program, use a format-2 ACCEPT statement or the CURRENT-DATE intrinsic function.

You can use any of these format-2 ACCEPT statements in the CICS environment to get the system date:

You can use this format-2 ACCEPT statement in the CICS environment to get the system time:

Alternatively, you can use the CURRENT-DATE intrinsic function, which can also provide the time.

These methods work in both CICS and non-CICS environments.

Do not use a format-1 ACCEPT statement in a CICS program.

related tasks
Assigning input from a screen or file (ACCEPT)

related references
CURRENT-DATE (COBOL for Windows Language Reference)


Terms of use | Feedback

Copyright IBM Corporation 1996, 2008.
This information center is powered by Eclipse technology. (http://www.eclipse.org)