In this example we check that no parameters are passed to the payment programs (note the use of O/N in the 2nd and 3rd sections).
Fig.JV.3.36 ON EXEC Example
+-----------------------------------------------------------------------------+
| RULE DAILYPAY ENVIRONMENT PROD PRIORITY 03 CONTINUE SEARCH Y |
| DESC NO PARAMETERS ARE ALLOWED TO BE PASSED TO THE PAYMENT PROGRAMS |
| DESC |
| =========================================================================== |
| JOBNAME PAY* |
| LIBRARY PRD.PAY.ACCOUNT.DAILY.JOBS MEMBER DPAY* |
| SCHDLIB SCHDTAB O/N O |
| JOBNAME PAY* |
| LIBRARY PRD.PAY.ACCOUNT.YEARLY.JOBS MEMBER DPAY* |
| SCHDLIB SCHDTAB O/N O |
|=============================================================================|
| ON EXEC PGM PROC DAYP* O/N O |
| ON EXEC PGM PROC YEARP* O/N |
|=============================================================================|
| IF %%$EXECPARM NE '' |
| DO MSG TYPE E IT IS NOT PERMITTED TO PASS PARMS TO THESE PROGRAMS. |
| DO |
| ENDIF |
| DO |
======= >>>>>>>>>>>>>>> END OF JRLE DEFINITION PARAMETERS <<<<<<<<<<<<<<< =====
Parent Topic |