Auxílios do VisualAge Generator

EZEPURGE

EZEPURGE exclui umafila de armazenamento temporário do CICS.

Usos

Você pode utilizar EZEPURGE como o nome de função em uma instrução de chamada da função.

A seqüência de chamada é:

>>-EZEPURGE---(--queuename--)--;-------------------------------><
 


Atributo Descrição
queuename É um item de dados de 1 a 8 caracteres ou um literal caractere de 1 a 8 bytes que contém o nome de uma fila de armazenamento temporária individual a ser excluída.

Você deve fornecer um nome de fila na chamada para informar ao programa qual fila deve ser excluída do armazenamento temporário. O programa enfileira (ENQ comando com a opção NOSUSPEND) no nome do recurso EZETEMP-queuename em uma chamada EZEPURGE. O comando tira de fila (comando DEQ) após a fila de armazenamento temporário ser excluída.

Caso ocorra um erro, o primeiro byte do EIBFN é colocado nos primeiros 2 caracteres do EZERT8, e os bytes de 0 a 2 do EIBRCODE são colocados nos últimos 6 caracteres do EZERT8.

Ambientes de Destino

Ambiente Considerações de compatibilidade
VM CMS EZEPURGE é ignorado.
VM batch Igual a VM CMS.
CICS para MVS/ESA Nenhum.
MVS/TSO Igual a VM CMS.
MVS batch Igual a VM CMS.
IMS/VS Igual a VM CMS.
IMS BMP Igual a VM CMS.
CICS para VSE Nenhum.
VSE batch Igual a VM CMS.
CICS para OS/2 Nenhum.
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.
CICS for AIX Nenhum.
Solaris Não suportado.
CICS for Solaris Suportado.
Windows NT Não suportado.
CICS para Windows NT Nenhum.
Dispositivo de Teste Não suportado.

Exemplos

A seqüência exclui a fila de armazenamento temporário de CICS associada ao valor atual de EZEDEST para registro ABC:

MOVE ABC.EZEDEST to MYQUEUE;
 EZEPURGE (MYQUEUE);

MYQUEUE é o nome de um item de dados.

A seqüência exclui a fila de armazenamento temporário de CICS associada ao destino XYZ:

 EZEPURGE('XYZ');


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