EZEDLPCB é uma matriz que representa PCBs do PSB do DL/I usados pelo programa.
Você especifica EZEDLPCB com um subscrito literal que identifica o PCB específico que está sendo usado. Esse subscrito literal pode variar de 0 (o PCB de E/S) até o número de PCB mais alto para o PSB utilizado pelo programa.
O subscrito padrão é 1.
EZEDLPCB pode ser utilizado como qualquer um dos seguintes:
As características de EZEDLPCB são as seguintes:
Você pode usar EZEDLPCB para fazer qualquer dos seguintes:
Para selecionar que PCBs devem ser passados ao programa chamado, dê os subscritos literais numéricos de EZEDLPCB. O subscrito identifica que PCB do PSB do programa que faz a chamada deve ser passado ao programa chamado.
O conteúdo de um PCB pode ser passado ao registro apropriado ao tipo do
PCB para testar o conteúdo do item de dados na definição do registro.
Os registros PCB de amostra são:
PCB TYPE | RECORD NAME | LOW-LEVEL ITEM NAME |
I/O PCB | DLIIOPCB | IOPCB |
Alternativos | DLIALPCB | ALPCB |
Banco de Dados | DLIDBPCB | DBPCB |
GSAM | DLIGSPCB | GSPCB |
Ambiente | Considerações de compatibilidade |
---|---|
VM CMS | Não suportado. |
VM batch | Não suportado. |
CICS para MVS/ESA | Se EZEDLPCB for passado numa instrução CALL e o PSB não estiver programado, o PSB será programado na chamada. Transferências de PCBs de E/S, TP e GSAM não são suportadas. Passá-los como parâmetros não é suportado. |
MVS/TSO | Se EZEDLPCB for usado na lista de parâmetros chamados de um programa chamado por um programa não-VisualAge Generator, o PCB 0 também terá que ser passado ao programa chamado para que este possa realizar o processamento de recuperação do erro. |
MVS batch | Igual a MVS/TSO. |
IMS/VS | Se EZEDLPCB for usado numa lista de parâmetros chamados de um programa
chamado por um programa não-VisualAge Generator, os PCBs 0, 1 e 2 terão também
que ser passados ao programa chamado para que este possa realizar o
processamento de recuperação do erro.
EZEDLPCB ou EZEDLPSB terá que ser passado como parâmetro para um programa chamado que emite chamadas DL/I. Está incluído aí o uso de CSPTDLI ou arquivos GSAM. |
IMS BMP | Igual a MVS/TSO. |
CICS para VSE | Igual a CICS para MVS/ESA. |
VSE batch | Igual a CICS para MVS/ESA. |
CICS para OS/2 | Não suportado. |
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 | O dispositivo de teste permite que o EZEDLPCB seja transmitido em uma
chamada para outro programa carregado no imagem.
Quando EZEDLPSB é transmitido para outro programa carregado no imagem, EZEDLPCB é passado como ponteiro nulo (4 bytes). Quando EZEDLPCB(n) é passado a um item de dados, o PCB é convertido de EBCDIC em ASCII de acordo com a definição do item de dados de destino. Para qualquer campo a ser referenciado a partir do PCB, é preciso definir um subcampo no item de dados de destino com o comprimento, tipo e deslocamento apropriados. Consulte os programas de modelo dos exemplos de registros definidos para PCBs de IO, TP, DB e GSAM. A área Key Feedback é convertida por padrão de acordo com o item de dados definido no registro. Se sua área Key Feedback contiver muitos tipos de dados, será preciso substruturar o item key feedback com itens apropriados para cada uma de suas chaves. Referências a PCB de E/S e TP que usam EZEDLPCB não podem ser testadas ou emuladas na estação de trabalho. |
O seguinte procedimento move o PCB de E/S:
MOVE EZEDLPCB[0] TO IOPCB;
O exemplo a seguir demonstra como passar PCBs individuais em uma instrução CALL.
Existem dois programas principais, APPLA e APPLB, e dois programas chamados
APPLC e APPLD. Os PSBs a seguir estão definidos para os programas nos
exemplos:
APPLA PSB A | APPLB PSB B | APPLC PSB C | APPLD PSB D |
---|---|---|---|
PCBB[1]-Parts | PCBC[1]-Order | PCBD[1]-Parts |
|
PCBB[2] | PCBC[2]-Parts | PCBD[2]-Journal |
|
PCBB[3] | PCBC[3]-Journal | PCBD[3]-Order |
|
PCBB[4]-Order | PCBC[4] |
| |
PCBB[5]-Journal |
|
A seguir encontra-se a lista de parâmetros chamados para APPLC e APPLD:
CALL APPLC EZEDLPCB[3],EZEDLPCB[5];
Quando a instrução CALL é executada, são verdadeiros:
CALL APPLD EZEDLPCB[5], EZEDLPCB[2];
Quando a instrução CALL é executada, são verdadeiros:
CALL APPLC EZEDLPCB[4], EZEDLPCB[1];
Quando a instrução CALL é executada, são verdadeiros:
CALL APPLD EZEDLPCB[1], EZEDLPCB[5];
Quando a instrução CALL é executada, são verdadeiros:
EZEDLPRO contém as opções do DL/I do banco de dados acessado pela última função de E/S de DL/I. As opções vêm do PCB do banco de dados usado pela chamada DL/I correspondente à função.
EZEDLPRO pode ser utilizado como qualquer um dos seguintes:
As características de EZEDLPRO são as seguintes:
EZEDLPRO está definido para espaços em branco nas seguintes condições:
EZEDLPRO é redefinido para os valores atuais do PCB toda vez que é emitida uma chamada DL/I e pode ser exibido para auxiliar na determinação de erros ou testado na rotina de erro da função para determinar o resultado de uma chamada DL/I.
EZEDLPRO é somente de leitura e não pode ser redefinido pelo programa.
EZEDLPRO não é definido depois de chamadas de serviço CSPTDLI nem depois de chamadas do DL/I a filas de mensagem do IMS ou a arquivos GSAM.
Ambiente | Considerações de compatibilidade |
---|---|
VM CMS | Não suportado. |
VM batch | Não suportado. |
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 | Não suportado. |
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 | Nenhum. |
MOVE EZEDLPRO TO PRO2;