XRF request-processing program exit XXRSTAT

This exit is invoked if a z/OS® Communications Server failure or a z/OS Communications Server predatory takeover occurs.

XXRSTAT enables you to decide whether to terminate CICS® when either of the following occurs:
  • CICS is notified of a z/OS Communications Server failure by the TPEND exit.
  • A predatory takeover has occurred. Predatory takeover can occur if you are using Release 3.4.0 or above, and a z/OS Communications Server application with the same APPLID as that of the executing CICS system assumes control of all the sessions of the executing CICS system.

    XXRSTAT gives you the choice of allowing the system which has suffered the takeover to continue or to terminate.

    To avoid potential integrity exposures, CICS default action after a predatory takeover is to terminate without a dump. If you want CICS to terminate with a dump, your exit program should return UERCABDU. CICS terminates with the abend code specified by your exit program.

    If you want CICS to continue after a predatory takeover, your exit program must return UERCCOIG. Message DFHZC0101 is issued and CICS continues processing without z/OS Communications Server support. The predatory application assumes control of all z/OS Communications Server sessions.

    Note: Allowing CICS to continue after a predatory takeover could cause integrity problems and is not recommended. Use RACF® to protect your CICS APPLIDs.