Shout a message to user N73 whenever a new tape is checked into the Control-M/Tape Media Database or whenever data set FOREIGN.CURRENCY.REPORT is closed under abend.
Figure 163 DO SHOUT Parameter Example
RULE: FORGNREP LIB CTT.PROD.RULES TABLE: FOREIGN
COMMAND ===> SCROLL===> CRSR
-------------------------------------------------------------------------------
RULE NAME FORGNREP GROUP MODE PROD (Prod/Test)
OWNER N37 SEQUENCE PRIORITY 01 CONTINUE SEARCH Y (Y/N)
DESCRIPTION THIS RULE FORCES A CONTROL-M JOB THAT READS THE FOREIGN
DESCRIPTION CURRENCY REPORT THAT IS CHECKED INTO THE SYSTEM.
DESCRIPTION
DOCMEM FORGNREP DOCLIB CTT.PROD.DOCS
============================================================================
ON DATASET = FOREIGN.CURRENCY.REPORT And/Or/Not
============================================================================
DO FORCEJOB = TABLE FOREIGN JOB FORGNREP DATE ODAT
LIBRARY CTM.PROD.SCHEDULE
AT CHECK IN VOLUMES
DO SHOUT = TO TSO-N73 URGENCY R
MESSAGE CONTROL-M/TAPE RECEIVED A NEW FOREIGN TAPE %%VOL001
AT CHECK IN VOLUMES
DO SHOUT = TO TSO-N73 URGENCY V
MESSAGE PROCESSING OF FOREIGN.CURRENCY.REPORT ABENDED.
AT CLOSE AFTER ABEND
DO
============================================================================
FILL IN RULE DEFINITION. CMDS: EDIT, SHPF, DOC, SCHED, DOOPT, ONOPT 19.30.34
Parent Topic |