The ON DDNAME statement identifies the report created in the current step that is referenced by DD statement REPORT.
Figure 259 ON DDNAME Statement Example
LIBRARY : CTB.PROD.RULES RULE : ONDDNAME
COMMAND ===> SCROLL===> CRSR
+-----------------------------------------------------------------------------+
===========================================================================
EXECUTE INPUT UPON C
ON DDNAME DDNAME REPORT
MODE PG LINECT 0060 DATASTAMP
WHEN LINE 001 - 060 COL 010 - 020 STOP AND/OR
STRING = /
DO EXTRACT = SALARY
LEVEL 0 LINE +000 COL +002 - +008 PROCESS TYP
DO BLOCK = CHECK ARG SALARY C
DO
WHEN LINE - COL - STOP AND/OR
STRING =
DO
===========================================================================
EXECUTE CHECK UPON BARG01 < 1000 | BARG01 > 20000 C
ON DATA
ALWAYS
DO PRINT = %%BARG01 F C
DO
(ENTER "ALWAYS", "IF")
PLEASE FILL IN RULE DEFINITION. 16.30.11
Parent Topic |