Example 1
When IMS startup is in process, notify Control-M so jobs that depend on IMS being down will not be submitted.
RL: IEF403I LIB CTO.PROD.RULES TABLE: JOB
COMMAND ===> SCROLL===> CRSR
+-----------------------------------------------------------------------------+
ON MESSAGE = IEF403I
JNAME IMS1 JTYPE S SMFID SYSTEM
ROUTE DESC CONSOLEID CONSOLE
APPEARED TIMES IN MINUTES And/Or/Not
OWNER IOAADMIN GROUP MODE PROD RUNTSEC
THRESHOLD
DESCRIPTION NOTIFY CONTROL-M THAT IMS IS NOT DOWN
DESCRIPTION
===========================================================================
DO COND = IMS1-IS-DOWN STAT -
DO
===========================================================================
FILL IN RULE DEFINITION. CMDS: EDIT, SCHED, OPT, SHPF 12.33.38
Example 2
When IMS startup process is completed, notify Control-M so that it can submit jobs that depend on IMS being active.
RL: DFS810A LIB CTO.PROD.RULES TABLE: JOB
COMMAND ===> SCROLL===> CRSR
+-----------------------------------------------------------------------------+
ON MESSAGE = DFS810A
JNAME IMS1 JTYPE S SMFID SYSTEM
ROUTE DESC CONSOLEID CONSOLE
APPEARED TIMES IN MINUTES And/Or/Not
OWNER IOAADMIN GROUP MODE PROD RUNTSEC
THRESHOLD
DESCRIPTION INDICATE IMS1 IS ACTIVE (KEEP REPLY NUMBER + SIGNAL CONTROL-M)
DESCRIPTION
==========================================================================
DO COND = IMS1-IS-ACTIVE STAT +
DO SET = %%IMS1_REPLY = %%REPLY GLOBAL Y
DO
===========================================================================
FILL IN RULE DEFINITION. CMDS: EDIT, SCHED, OPT, SHPF 12.33.38
Example 3
When IMS shuts down, notify Control-M so it can stop or start jobs that depend on IMS status.
RL: IEF494I LIB CTO.PROD.RULES TABLE: JOB
COMMAND ===> SCROLL===> CRSR
+-----------------------------------------------------------------------------+
ON MESSAGE = IEF494I
JNAME IMS1 JTYPE S SMFID SYSTEM
ROUTE DESC CONSOLEID CONSOLE
APPEARED TIMES IN MINUTES And/Or/Not
OWNER IOAADMIN GROUP MODE PROD RUNTSEC
THRESHOLD
DESCRIPTION NOTIFY CONTROL-M THAT IMS IS DOWN
DESCRIPTION
===========================================================================
DO COND = IMS1-IS-DOWN STAT IMS1-IS-ACTIVE STAT -
DO
===========================================================================
FILL IN RULE DEFINITION. CMDS: EDIT, SCHED, OPT, SHPF 12.33.38
Example 4
Check if IMS is down and SHOUT the answer.
RL: IEF494I LIB CTO.PROD.RULES TABLE: JOB
COMMAND ===> SCROLL===> CRSR
+-----------------------------------------------------------------------------+
ON MESSAGE = IEF494I
JNAME IMS1 JTYPE S SMFID SYSTEM
ROUTE DESC CONSOLEID CONSOLE
APPEARED TIMES IN MINUTES And/Or/Not
OWNER IOAADMIN GROUP MODE PROD RUNTSEC
DESCRIPTION NOTIFY CONTROL-M THAT IMS IS DOWN
DESCRIPTION
===========================================================================
DO COND = IMS1-IS-DOWN STAT ?
DO SHOUT = TO OPER URGENCY R SYSTEM CTO282I
MESSAGE CONDSTAT = %%$CONDSTAT
DO
===========================================================================
FILL IN RULE DEFINITION. CMDS: EDIT, SCHED, OPT, SHPF 12.33.38
Parent Topic |