Before: Insert an additional DO statement in a DO block using command I (Insert).
Figure 470 Example 1 - Inserting Additional DO Statement - 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 - COL - PRINT REF NXT CT AND/OR
__ STRING =
I_ DO NAME = PRODUCTION JCL LINE COL -
__ DO USER = PRODCNTL LVL LINE COL - S N T
SYNONYM = CONCAT =
__ DO BACKUP = BKP0007D
__ DO USER = OPERATE LVL LINE COL - S A T
SYNONYM = CONCAT =
__ DO USER = OPERMGMT LVL LINE COL - S A T
SYNONYM = CONCAT =
__ DO
__ WHEN LINE - COL - PRINT REF NXT CT AND/OR
FILL IN REPORT DEFINITION. CMDS: EDIT, SCHED, SHPF, PATH 17.29.18
After: An additional DO statement line has been opened.
Figure 471 Example 1 - Inserting Additional DO Statement - 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 - COL - PRINT REF NXT CT AND/OR
__ STRING =
__ DO NAME = PRODUCTION JCL LINE COL -
__ DO
__ DO USER = PRODCNTL LVL LINE COL - S N T
SYNONYM = CONCAT =
__ DO BACKUP = BKP0007D
__ DO USER = OPERATE LVL LINE COL - S A T
SYNONYM = CONCAT =
__ DO USER = OPERMGMT LVL LINE COL - S A T
SYNONYM = CONCAT =
__ DO
FILL IN REPORT DEFINITION. CMDS: EDIT, SCHED, SHPF, PATH 17.29.33
Parent Topic |