Before: Insert a continuation line between existing continuation lines. It is recommended that command R (Repeat) be used to repeat the previous logical line.
Figure 478 Example 5 - Use of Insert Command - Before
------- CONTROL-D/V CATEGORY DAILY JOB * (R.S)
COMMAND ===> SCROLL===> CRSR
+------------------------------------+
__ CATEGORY DAILY JOBNAME * GENERIC Y MONITOR 1
__ ===========================================================================
__ DEF COPIES 01 LVL USER UNIDENT DEST MAX COPIES
__ ===========================================================================
__ ON CLASS = W EXTWTR DEST FORM
__ PRT COPIES LVL USER DEST MAX COPIES
__ PRINT/CDAM PARMS = ALLOCOPT=JOBSDSN1
__ PRINT/CDAM PARMS =
__ WHEN LINE 00001 - 00002 COL 00005 - PRINT REF NXT CT AND/OR
__ STRING = DD
R_ WHEN LINE 00003 - 00003 COL 00005 - PRINT REF NXT CT AND/OR
__ STRING = DISK
__ WHEN LINE 00004 - 00004 COL 00005 - PRINT REF NXT CT AND/OR
__ STRING = TAPE
__ DO NAME = PRODUCTION JCL LINE COL -
__ DO USER = PRODCNTL LVL LINE COL - S N T
SYNONYM = CONCAT =
__ DO BACKUP = BKP0007D
__ DO
__ WHEN LINE - COL - PRINT REF NXT CT AND/OR
FILL IN REPORT DEFINITION. CMDS: EDIT, SCHED, SHPF, PATH 19.17.29
After: The continuation line has been repeated. The repeated line can be modified as necessary.
Figure 479 Example 5 - Use of Insert Command - After
------- CONTROL-D/V CATEGORY DAILY JOB * (R.S)
COMMAND ===> SCROLL===> CRSR
+------------------------------------+
__ CATEGORY DAILY JOBNAME * GENERIC Y MONITOR 1
__ ===========================================================================
__ DEF COPIES 01 LVL USER UNIDENT DEST MAX COPIES
__ ===========================================================================
__ ON CLASS = W EXTWTR DEST FORM
__ PRT COPIES LVL USER DEST MAX COPIES
__ PRINT/CDAM PARMS = ALLOCOPT=JOBSDSN1
__ PRINT/CDAM PARMS =
__ WHEN LINE 00001 - 00002 COL 00005 - PRINT REF NXT CT AND/OR A
__ STRING = DD
__ WHEN LINE 00003 - 00003 COL 00005 - PRINT REF NXT CT AND/OR A
__ STRING = DISK
__ WHEN LINE 00003 - 00003 COL 00005 - PRINT REF NXT CT AND/OR A
__ STRING = DISK
__ WHEN LINE 00004 - 00004 COL 00005 - PRINT REF NXT CT AND/OR
__ STRING = TAPE
__ DO NAME = PRODUCTION JCL LINE COL -
__ DO USER = PRODCNTL LVL LINE COL - S N T
SYNONYM = CONCAT =
__ DO BACKUP = BKP0007D
FILL IN REPORT DEFINITION. CMDS: EDIT, SCHED, SHPF, PATH 19.18.40
Parent Topic |