|
|
|
|
|
In this example, when a JCL job is about to be processed, information about the job is displayed in output messages.
Fig.JV.3.41 INIT example
+-----------------------------------------------------------------------------+
| RULE STARTJOB1 ENVIRONMENT THMSA PRIORITY 50 CONTINUE SEARCH Y |
| DESC |
| DESC |
|=============================================================================|
| JOBNAME M4918* |
| LIBRARY MEMBER |
| SCHDLIB CTM.PROD.BKP(SPBKP) SCHDTAB O/N |
|=============================================================================|
| ON INIT |
|=============================================================================|
| DO MSG TYPE I JCLTYPE = %%#JCLTYPE; MEMBER = %%#MEMBER |
| DO MSG TYPE I LIBRARY = %%#LIBRARY; ENVRN = %%#ENVRN |
| DO MSG TYPE I SCHDLIB = %%#SCHDLIB; SCHDTAB = %%#SCHDTAB |
| DO MSG TYPE I SCHDJOB = %%#SCHDJOB; STATNUM = %%#STATNUM |
| RETURN RC 0012 RS X' 0024 ' |
| DO |
|=============================================================================|
Parent Topic |