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 |