Address space related variables (GLVJOBID)
can be used to save information from the first execution of the rule to be used at the second rule.For example, the first message rule would be:
)MSG PDT0185
)PROC
GLVJOBID.ABEND = 'YES'
At the other message rule:
)MSG PDT0102
)PROC
if OPSVALUE('GLVJOBID.ABEND','E') = 'N' then /* if the variable does not exist exit */
return
/* Take actions here to restart the service */
/* then delete the variable to prepare to the next execution */
REM = OPSVALUE('GLVJOBID.ABEND','R')