CICS - Abend
El comando Abend se usa para terminar la tarea intencionalmente. Usando el comando Abend, podemos establecer un código de fin anormal definido por el usuario. A continuación se muestra la sintaxis del comando Abend:
Sintaxis
EXEC CICS ABEND
ABCODE(name)
END-EXEC.
Ejemplo
El siguiente ejemplo muestra cómo utilizar el comando Abend en un programa. Terminará anormalmente cuando el programa llegue a este párrafo con el código de fin anormal definido por el usuario. En el siguiente ejemplo, terminará anormalmente con el código de terminación anormal D100 -
IDENTIFICATION DIVISION.
PROGRAM-ID. HELLO.
PROCEDURE DIVISION.
EXEC CICS ABEND
ABCODE(D100)
END-EXEC.