PUSH HANDLE
PUSH HANDLE
Suspend HANDLEs stack. PUSH HANDLE command is used to suspend the current effect of the HANDLE CONDITION, IGNORE CONDITION, HANDLE ABEND, and HANDLE AID commands. If a PUSH HANDLE is coded for HANDLE condition, all the conditions in HANDLE CONDITION are suspended.
Key Features -
- Temporarily saves the current error-handling state.
- Allows defining new error-handling routines while preserving old ones.
- Works with HANDLE CONDITION and HANDLE ABEND.
Syntax -
EXEC CICS PUSH HANDLE
END-EXEC.
This command saves the current error-handling state (such as HANDLE CONDITION and HANDLE ABEND settings).
Short Examples -
Scenario - Temporary Error Handling for a Specific Operation
...
PROCEDURE DIVISION.
EXEC CICS HANDLE CONDITION
NOTFND(GLOBAL-ERROR-HANDLER)
END-EXEC.
...
EXEC CICS PUSH HANDLE
END-EXEC.
EXEC CICS READ
DATASET('CUSTFILE')
INTO(WS-DATA)
RESP(WS-RESP)
END-EXEC.
IF WS-RESP NOT = 0 THEN
...
END-IF.
A global error handler (GLOBAL-ERROR-HANDLER) is defined using HANDLE CONDITION. PUSH HANDLE is issued, saving the current error-handling state.