Coding Each AOF Rule Type › Global Variable Rules › Example: GLV Rule

Example: GLV Rule

The following is an example of a rule that responds to a global variable event. The rule starts CICS if VTAM is active.

)GLV GLOBAL.STATUS.VTAM
)PROC
 if GLOBAL.STATUS.VTAM = 'ACTIVE' then
   do
     address OPER
     "COMMAND(S CICSPROD) NOOUTPUT"
     "COMMAND(S TSO) NOOUTPUT"
   end

This example shows a rule that responds to a global sysplex variable event. If VTAM becomes active on a system PLEXA, then this rule starts PLXBPROC on a system PLEXB.

)GLV GLVPLXTA.*
)PROC
if GLV.MSFID = ‘PLEXA’ then
 if GLV.NAME = 'GLVPLXTA.VTAM.STATUS' then
   if GLV.OLDVALUE = ‘DOWN’ & GLV.NEWVALUE = 'ACTIVE' then
   do
     address OPER
     "COMMAND(S PLXBPROC) NOOUTPUT"
   end