EXECUTE block INIT processes the sysout file referred to by DD statement SYSUT2 in program step STEP2 of job WRHSE1.
Figure 269 ON SYSOUT Statement Example
LIBRARY : CTB.PROD.RULES RULE : CHKINV
COMMAND ===> SCROLL===> CRSR
+-----------------------------------------------------------------------------+
OWNER M42 GROUP WHSE
UPDATED 08/08/00 - 17:34:49 BY M42
DESC
OPTIONS
============================================================================
EXECUTE INIT UPON C
ON SYSOUT PROCST PGMST STEP2 DDNAME SYSUT2 JOBNM WRHSE1
MODE PG LINECT 0060 DATASTAMP
WHEN LINE 001 - 050 COL 001 - 080 STOP AND/OR
STRING = WAREHOUSE NO:
DO EXTRACT = WAREHOUSE_NUMBER
LEVEL 0 LINE +000 COL +001 - +002 PROCESS TYP
DO = F C
===========================================================================
EXECUTE UPON C
ON
======= >>>>>>>>>>>>>>> END OF RULE DEFINITION PARAMETERS <<<<<<<<<<<<<<< =====
PLEASE FILL IN RULE DEFINITION. 09.41.01
Parent Topic |