CICS - Nohandle

Nohandle pode ser especificado para qualquer comando CICS. Isso fará com que nenhuma ação seja tomada para quaisquer condições excepcionais que possam ocorrer durante a execução do comando CICS. Este comando desativa temporariamente todas as outras condições de manipulação. Se uma exceção surgir durante a execução do comando, o controle será transferido para a próxima instrução após o comando. Ele pode ser usado com Read, Write, Delete, etc. A sintaxe do Nohandle é a seguinte -

Sintaxe

EXEC CICS
   program statements
   NOHANDLE    
END-EXEC.

Exemplo

A seguir está o exemplo do comando Nohandle. Estamos usando isso com uma instrução Read. Se a instrução Read falhar, ele não encerrará o programa de forma anormal.

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