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