Use the DATEPROC option to enable the millennium language
extensions of the COBOL compiler.

DATEPROC option syntax
.-NODATEPROC------------------.
>>-+-----------------------------+-----------------------------><
'-DATEPROC-+----------------+-'
| .-FLAG---. |
'-(-+-NOFLAG-+-)-'
Default is: NODATEPROC, or
DATEPROC(FLAG) if only DATEPROC is specified
Abbreviations are: DP|NODP
- DATEPROC(FLAG)
- With DATEPROC(FLAG), the millennium language extensions are
enabled, and the compiler produces a diagnostic message wherever a
language element uses or is affected by the extensions.
The message
is usually an information-level or warning-level message that
identifies statements that involve date-sensitive processing.
Additional messages that identify errors or possible
inconsistencies in the date constructs might be generated.
Production of diagnostic messages, and their appearance in or
after the source listing, is subject to the setting of the
FLAG compiler option.
- DATEPROC(NOFLAG)
- With DATEPROC(NOFLAG), the millennium language extensions are
in effect, but the compiler does not produce any related messages
unless there are errors or inconsistencies in the COBOL
source.
- NODATEPROC
- NODATEPROC indicates that the extensions are not enabled
for this compilation unit.
This option affects date-related program
constructs as follows:
- The DATE FORMAT clause is syntax-checked,
but has no effect on
the execution of the program.
- The DATEVAL and UNDATE intrinsic
functions have no effect.
That is, the
value returned by the intrinsic function is exactly the same as the
value of the argument.
- The YEARWINDOW intrinsic function returns a value of
zero.