CICS - Nohandle

可以为任何 CICS 命令指定 Nohandle。对于在执行 CICS 命令期间可能发生的任何异常情况，它将不采取任何措施。此命令暂时停用所有其他处理条件。如果在执行命令期间出现异常，控制权将转移到命令后的下一个语句。它可以与 Read、Write、Delete 等一起使用。Nohandle 的语法如下 −

语法

EXEC CICS
   program statements
   NOHANDLE    
END-EXEC.

示例

以下是 Nohandle 命令的示例。我们将其与 Read 语句一起使用。如果 Read 语句失败，它不会异常终止程序。

IDENTIFICATION DIVISION.                                         
PROGRAM-ID. HELLO.                                               
PROCEDURE DIVISION.
EXEC CICS READ   
   FILE('FILE1')                
   INTO(WS-FILE-REC)             
   RIDFLD(WS-STDID)             
   NOHANDLE                          
END-EXEC. 

cics_error_handling.html