Coding Each AOF Rule Type › End-of-Step Rules › Example: EOS Rule

Example: EOS Rule

Assume that the CICS on-line payroll databases may be reopened after STEP3 of the payroll job, called PAYLAST, completes successfully. An OPS/REXX program called OPENPAYB, running in an OSF server, reopens the databases.

)EOS PAYLAST
)PROC
if eos.jobclass = 'P' & ,   /* Only the production jobs */
eos.stepname = 'STEP3' & ,  /* Step3 is the signal      */
eos.condcode = '0000' then  /* Must complete normally   */
  address OSF "OI OPENPAYB"  /* Open the databases      */
)END