Exit XXRSTAT
This exit is invoked if a z/OS® Communications Server failure or predatory takeover occurs.
- When invoked
- After either of the following:
- CICS® is notified of a z/OS Communications Server failure by the TPEND exit.
- A predatory takeover.
- Exit-specific parameters
-
- UEPERRA
- Address of parameter list containing:
- UEPGAPLD
- Address of the 8-byte generic applid
- UEPSAPLD
- Address of the 8-byte specific applid
- UEPDOMID
- Address of the 4-byte domain ID
- UEPERRID
- Address of the 4-byte error ID.
Note:- No DSECT is provided for this parameter list. You need to code your own DSECT to access the named fields.
- When z/OS Communications Server has failed, the domain ID is ‘ZC ' (uppercase Z, uppercase C, and two blanks), and the error ID is the character string ‘3443'.
- Return codes
-
- UERCNORM
- Take the system action. The system action depends on the reason
why the exit was invoked:
- For XRF, in the event of a z/OS Communications Server failure: CICS continues processing as if the exit program had not been invoked.
- For z/OS Communications Server persistent sessions, in the event of a predatory takeover: CICS abends without a dump.
- UERCCOIG
- Ignore.
- UERCABNO
- Abend CICS without a dump.
- UERCABDU
- Abend CICS with a dump.
- UERCPURG
- Task purged during XPI call.
- XPI calls
- All can be used.
- API and SPI calls
- None can be used.