Auxílios do VisualAge Generator

EZEMNO

EZEMNO define o número para a mensagem que aparece no próximo CONVERSE, DISPLAY, XFER com um mapa, ou reexibição de um mapa com um erro de edição.

O texto da mensagem vem da tabela de mensagens do programa e aparece no campo variável EZEMSG no mapa.

EZEMNO é inicializado e redefinido para 0 após cada CONVERSE, DISPLAY, XFER com um mapa, ou reexibição de um mapa para um erro de edição. No próximo CONVERSE, DISPLAY, XFER com um mapa, ou reexibição de um mapa para um erro de edição, se EZEMNO contiver um valor outro que 0 ou 9999, a mensagem especificada por esse número é recuperada e o mapa é então reexibido. O intervalo para EZEMNO é de -9999 a 9999.

Usos

EZEMNO pode ser utilizado como qualquer um dos seguintes:

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

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

Considerações sobre Definição

A função usada como rotina de edição indica que foi detectado erro na passagem de um valor diferente de zero para EZEMNO. O mapa é automaticamente exibido e nele o campo em que há erro aparece em destaque, sendo mostrado o texto da mensagem.

Se não houver tabela de mensagens disponível, uma rotina de edição poderá forçar o mapa a ser convertido novamente; para isso, é preciso passar o texto da mensagem para EZEMSG e definir EZEMNO para 9999.

Ambientes de Destino

Ambiente Considerações de compatibilidade
VM CMS Nenhum.
VM batch Nenhum.
CICS para MVS/ESA Nenhum.
MVS/TSO Nenhum.
MVS batch Nenhum.
IMS/VS Nenhum.
IMS BMP Nenhum.
CICS para VSE Nenhum.
VSE batch Nenhum.
CICS para OS/2 Nenhum.
OS/400 Nenhum.
OS/2 (GUI) Não suportado.
Windows (GUI) Não suportado.
Java (GUI) Não suportado.
OS/2 (C++) Nenhum.
AIX Nenhum.
HP-UX Nenhum.
Solaris Suportado.
CICS for Solaris Suportado.
CICS for AIX Nenhum.
Windows NT Nenhum.
CICS para Windows NT Nenhum.
Dispositivo de Teste Nenhum.

Exemplos

O exemplo a seguir define EZEMNO para 9999. Você poderia usar esse exemplo em uma rotina de edição para fazer com que o mapa seja convertido novamente.

  MOVE 'There has been an error' TO EZEMSG;
 MOVE 9999 TO EZEMNO;

O exemplo dado faz com que o texto da mensagem 1234 seja recuperado da tabela de mensagens do programa antes de o mapa seguinte ser convertido.

  MOVE 1234 to EZEMNO;


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