EZEPURGE exclui umafila de armazenamento temporário do CICS.
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.
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. |
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');