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.