TSO-user M18 is notified if the computed sum is more than 1,000,000.00.
Figure 224 DO SHOUT Statement Example
LIBRARY : CTB.PROD.RULES RULE : RULCURR
COMMAND ===> SCROLL===> CRSR
+-----------------------------------------------------------------------------+
IF SUM > 1000000.00 C
DO SHOUT TO TSO-M18 URGENCY R
= PLEASE CHECK CURRENCY FILE; SUM COMPUTED IS &&SUM
DO REMARK = SUM IS OVER 1000000.00 SUM=%%SUM
DO COND = NOTOK-%%SYSJOBNAME 0704 +
DO TERMINAT = NOTOK COD 0055
DO
ELSE
DO REMARK = SUM IS NOT OVER 1000000.00 SUM=%%SUM
DO TERMINAT = OK COD 0000
DO
(ENTER "ALWAYS", "IF")
===========================================================================
EXECUTE UPON C
ON
======= >>>>>>>>>>>>>>> END OF RULE DEFINITION PARAMETERS <<<<<<<<<<<<<<< =====
PLEASE FILL IN RULE DEFINITION. 13.52.20
Parent Topic |