CICS - 非正常结束

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.