CICS - Abend 命令

Abend 命令用于有意终止任务。使用 Abend 命令,我们可以设置用户定义的异常终止代码。以下是 Abend 命令的语法 −

语法

EXEC CICS ABEND
ABCODE(name)
END-EXEC.

示例

以下示例显示如何在程序中使用 Abend 命令。当程序到达此段落并出现用户定义的异常终止代码时,它将异常终止。在以下示例中,它将以异常终止代码 D100 异常终止−

IDENTIFICATION DIVISION.                                         
PROGRAM-ID. HELLO.                                               
PROCEDURE DIVISION.

EXEC CICS ABEND
   ABCODE(D100) 
END-EXEC.

cics_error_handling.html