Auxílios do VisualAge Generator

EZEDLPCB (DL/I)

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.

Usos

EZEDLPCB pode ser utilizado como qualquer um dos seguintes:

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

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

Você pode usar EZEDLPCB para fazer qualquer dos seguintes:

Considerações sobre Definição

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

Ambientes de Destino

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.

Exemplos

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:

EZEDLPCB[1]
EZEDLPCB[2]

EZEDLPRO (DL/I)

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.

Usos

EZEDLPRO pode ser utilizado como qualquer um dos seguintes:

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

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

Considerações sobre Definição

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.

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 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.

Exemplo de

MOVE EZEDLPRO TO PRO2;


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