DATEPROC

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

Read syntax diagramSkip visual syntax diagram
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.

related references  
FLAG
YEARWINDOW