Auxílios do VisualAge Generator

EZEDLCER (DL/I)

EZEDLCER contém o código de erro CICS para MVS/ESA e CICS para VSE de chamada DL/I emitida para função DL/I.

Usos

EZEDLCER pode ser utilizado como qualquer um dos seguintes:

As características de EZEDLCER são as seguintes:

Tipo de dados: Caractere
Comprimento dos dados em bytes: 2
Valor salvo pelos segmentos: Não

Considerações sobre Definição

EZEDLCER é redefinido toda vez que é emitida uma chamada DL/I. Pode-se codificar o programa de modo a verificar a presença de EZEDLCER na rotina de erro da função se EZEDLERR ou EZEFEC estiverem definidos para continuar após erros permanentes. EZEDLCER é somente de leitura e não pode ser redefinido pelo programa.

Para obter mais informações sobre os códigos de retorno, consulte o manual do aplicativo CICS para a versão do CICS.

Ambientes de Destino

Ambiente Considerações de compatibilidade
VM CMS Não suportado.
VM batch Não suportado.
CICS para MVS/ESA Nenhum.
MVS/TSO O valor de EZEDLCER é sempre 00.
MVS batch Igual a MVS/TSO.
IMS/VS Igual a MVS/TSO.
IMS BMP Igual a MVS/TSO.
CICS para VSE Nenhum.
VSE batch Igual a MVS/TSO.
CICS para OS/2 Igual a MVS/TSO.
OS/400 Não suportado.
OS/2 (GUI) Não suportado.
Windows (GUI) Não suportado.
Java (GUI) Não suportado.
OS/2 (C++) Não suportado.
AIX Não suportado.
HP-UX Não suportado.
Solaris Não suportado.
CICS for Solaris Não suportado.
CICS for AIX Não suportado.
Windows NT Não suportado.
CICS para Windows NT Não suportado.
Dispositivo de Teste Se o ambiente de execução do DL/I for o CICS e o programa estiver manipulando erros permanentes (EZEFEC=1), o campo de retorno de EZEDLCER será definido com os códigos de retorno do CICS que correspondem aos resultados retornados pela API DDBA. Caso contrário, se a função de programação falhar, o dispositivo de teste retornará um erro.

Exemplo de

Use uma instrução IF para testar as informações de status. No exemplo a seguir, a instrução testa se o código de retorno CICS não for normal.

IF EZEDLCER NE '00';
END;


[ Início da Página | Página Anterior | Próxima Página | Índice ]