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

DATEPROC option syntax
.-NODATEPROC------------------------------.
>>-+-----------------------------------------+-----------------><
'-DATEPROC-+----------------------------+-'
| .-FLAG---. .-,NOTRIG-. |
'-(-+--------+-+---------+-)-'
'-NOFLAG-' '-,TRIG---'
Default is: NODATEPROC, or
DATEPROC(FLAG,NOTRIG) 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.
- DATEPROC(TRIG)
- With DATEPROC(TRIG), the millennium language extensions are
enabled, and the automatic windowing that the compiler applies to
operations on windowed date fields is sensitive to specific trigger
or limit values in the date fields and in other nondate fields that
are stored into or compared with the windowed date fields.
These
special values represent invalid dates that can be tested for or
used as upper or lower limits.
Performance considerations: The DATEPROC(TRIG)
option results in slower-performing code
for windowed date comparisons.
- DATEPROC(NOTRIG)
- With DATEPROC(NOTRIG), the millennium language extensions are
enabled, and the automatic windowing that the compiler applies to
operations on windowed dates does not recognize any special trigger
values in the operands.
Only the value of the year part of dates is
relevant to automatic windowing.
Performance considerations: The
DATEPROC(NOTRIG) option is a performance option that
assumes valid date values in windowed date fields.
- 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.
Usage note: You can specify the FLAG|NOFLAG and
TRIG|NOTRIG suboptions in any order.
If you omit either
suboption, it defaults to the current setting.
If you code a left parenthesis after DATEPROC, however,
you must code at least one suboption.