AT DATE command (COBOL)

Gives z/OS® Debugger control for each date processing statement within the specified block. A date processing statement is a statement that references a date field, or an EVALUATE or SEARCH statement WHEN phrase that references a date field.

Read syntax diagramSkip visual syntax diagramATevery_clauseDATEblock_spec(,block_spec)*command;
*
Sets a breakpoint at every date processing statement.
command
A valid z/OS Debugger command.

Usage notes

  • When you use AT DATE, execution is halted only for COBOL compile units compiled with the DATEPROC compiler option.
  • The AT DATE command cannot be used while you replay recorded statements by using the PLAYBACK commands.
Examples
  • Each time a date processing statement is encountered in the nested subprogram subrx, display the location of the statement.
    AT DATE subrx QUERY LOCATION;
  • Each time a date processing statement is encountered in the compile unit, display the name of the compile unit.
    AT DATE * LIST %CU;
  • Each time a date processing statement is encountered in the compile unit, display the location of the statement, list a specific variable, and resume running the program.
    AT DATE * PERFORM
       QUERY LOCATION;
       LIST DATE-FIELD
       GO;
    END-PERFORM;

Refer to the following topics for more information related to the material discussed in this topic.