EZEDESTP altera o nome da impressora enquanto o programa está
executando. Você pode alterar o nome do destino associado com o arquivo
de impressão, movendo um item de dados ou literal que contém o novo destino da
impressora para a palavra de função especial EZEDESTP. Para alguns
tipos de arquivos, múltiplas impressoras podem ser abertas
simultaneamente.
Para evitar a interposição de várias saídas de impressora, o arquivo de
impressão é mantido aberto até que uma das seguintes situações ocorra:
A opção de E/S de CLOSE só fecha o arquivo para o valor atual de
EZEDESTP. Uma impressora não é fechada apenas porque EZEDESTP foi usada
para mudar o arquivo físico para o qual há um printout sendo
direcionado. No caso de tipos de arquivo que não aceitam a abertura de
arquivos de impressão múltiplos, a impressora será fechada quando se usar
EZEDESTP para mudar o destino da impressão antes da execução da próxima
DISPLAY de um mapa de impressão.
É preciso que o valor passado para EZEDESTP seja um nome de recurso de
sistema válido para o ambiente de runtime e para o tipo do arquivo de
impressão especificado quando o programa foi gerado. A seção sobre
ambientes de destino descreve formatos de nome válidos por ambiente e por
tipo.
O valor de EZEDESTP é exclusivo em cada programa. Se um programa
passar o controle para outro, o valor de EZEDESTP será redefinido para seu
valor padrão.
EZEDESTP é inicializada para o nome do recurso de sistema especificado
durante a geração ou execução de teste.
Antes de ser usado, o valor de EZEDESTP é colocado em letra
maiúscula. Contudo, seu valor dentro da palavra de função especial
EZEDESTP permanece inalterado.
A palavra de função especial EZEDESTP vai dar verdadeiro quando comparada à
versão em letra minúscula se tiver sido inicializada assim.
Ambiente
| Considerações de compatibilidade
|
VM CMS
|
- SEQ
- Não suportado.
- SEQRS
- O valor é um nome de arquivo CMS (fn ft fm), ou nome DD de 8 bytes
correspondente a um arquivo seqüencial de sistema associado a um arquivo de
impressão.
O nome DD é o valor de um comando FILEDEF ou DLBL especificado
antes.
Se não tiver sido definido valor para EZEDESTP, o programa procurará ver
primeiro se foi pré-alocado conjunto de dados que usa o nome do arquivo lógico
como nome DD. Se não foi, o nome de recurso de sistema especificado na
geração será usado para acessar o arquivo.
Quando se passa o nome de um conjunto de dados para EZEDESTP, o recurso é
alocado dinamicamente para EZEPRINT por meio do comando CMS FILEDEF, o que
obriga o conjunto de dados a ser regravado toda vez que é aberto para
saída. A alocação é feita com a opção DISP definida para OLD,
Podem ser abertos vários arquivos ao mesmo tempo.
|
VM batch
|
- GSAM
- Não suportado.
- SEQ
- Não suportado.
- SEQRS
- Igual a VM CMS.
|
CICS para MVS/ESA
| Se a opção de geração /PRINTDEST for TERMID e o programa tiver sido
iniciado com instrução CREATX em que o qualifier recip estava definido para
zeros binários e especificava um qualifier prid, EZEDESTP será inicializada
para o valor especificado para o qualifier prid. Se a opção de geração
PRINTDEST for EZEP, EZEDESTP será inicializada para o valor associado a
EZEPRINT na geração.
Em qualquer programa de batch que não tenha sido iniciado por CREATX,
EZEDESTP assume por padrão o EIBTRMID CICS.
- SPOOL
- O valor é um nome de arquivo de saída correspondente a um arquivo JES
SPOOL associado a um arquivo serial.
Nome do arquivo de saída:
nodeid.userid.class O qualificador do id do nó é um
ID do nó do sistema de 1 a 8 caracteres ou um asterisco (*). O
qualifier userid é uma ID de usuário do sistema de 1 a 8 caracteres ou um
asterisco (*). O qualifier class é uma classe de spool de 1
caractere. Class é opcional e assume por padrão o valor
'A'. Se não for especificada uma classe, a IdUsuário também
será opcional e assumirá por padrão a ID de usuário de CICS (mesmo valor
armazenado em EZEUSRID). O tamanho máximo do nome é de 19 bytes.
Consulte o manual de personalização do CICS para saber mais a esse
respeito.
Podem ser abertos vários arquivos ao mesmo tempo.
- TRANSIENT
- O valor é um nome DCT de 4 bytes para fila de dados transientes associada
a arquivo serial. O nome da fila de dados transientes tem que ser
definido para CICS.
Podem ser abertos vários arquivos ao mesmo tempo.
|
MVS/TSO
|
- SEQ
- Não suportado.
- SEQRS
- O valor é o nome de um conjunto de dados de 54 bytes ou um nome DD de 8
bytes correspondente a um arquivo seqüencial de sistema associado a um arquivo
de impressão.
Podem ser abertos vários arquivos ao mesmo tempo.
Se EZEDESTP não tiver sido definida pelo programa e o tipo do arquivo for
SEQRS, o programa procurará primeiro um arquivo alocado para EZEPRINT do nome
DD. Em todos os outros casos, o nome do recurso de sistema especificado
para EZEPRINT na geração será usado como valor inicial se EZEDESTP não for
explicitamente definido pelo programa.
Quando se passa para EZEDESTP um nome de conjunto de dados que corresponde
a um arquivo SEQRS, o arquivo é conectado dinamicamente por meio da alocação
dinâmica SVC99. Quando a alocação dinâmica é feita, a opção DISP de
SVC99 é definida para SHR, o que obriga o conjunto de dados a ser regravado
toda vez que é aberto para saída.
|
MVS batch
|
- GSAM
- Não suportado.
- SEQ
- Não suportado.
- SEQRS
- Igual a SEQRS no MVS/TSO.
Podem ser abertos vários arquivos ao mesmo tempo.
|
IMS/VS
|
- SMSGQ
- O valor é o nome de um terminal lógico ou código de transação de 8 bytes
correspondente a uma fila de mensagens de segmento único associada a um
arquivo de impressão. O arquivo tem que ser associado a um PCB
alternativo modificável ou PCB alternativo expresso modificável. O nome
do terminal tem que ser definido para o sistema IMS. Podem ser abertos
vários arquivos ao mesmo tempo. O valor de EZEDESTP não é colocado em
letra maiúscula nesse tipo de arquivo.
|
IMS BMP
|
- GSAM
- Não suportado.
- SEQ
- Não suportado.
- SEQRS
- Igual a MVS/TSO.
- SMSGQ
- Igual a IMS/VS.
|
CICS para VSE
|
- SPOOL
- Igual a CICS para VSE SPOOL para EZEDEST.
- TRANSIENT
- Igual a CICS para MVS/ESA.
|
VSE batch
|
- SEQ
- Não suportado.
- SPOOL
- O formato do nome do recurso do sistema para um arquivo de saída SPOOL
é:
jobname.queue.class.disp.form.node.userid
ou
jobname.queue.class.disp.form.node.userid.fcb.copy
- nome do job
- Igual a CICS para VSE.
- fila
- Asterisco (*) ou espaço em branco neste campo assumem por padrão
a fila LST. PRT pode ser usado, mas o parâmetro fila será alterado para
LST por Server for MVS, VSE, and VM.
- class
- O parâmetro class é uma classe spool de 1 caractere. A classe é
opcional e assume por padrão o valor "A".
- disp
- Igual a CICS para VSE.
- form
- Igual a CICS para VSE.
- node
- Igual a CICS para VSE.
- userid
- Igual a CICS para VSE.
- fcb
- Nome de 1 a 8 caracteres que especifica a fase da imagem FCB que
VSE/POWER tem que usar para imprimir a saída do job relacionado a
ele. A fase indicada tem que ser catalogada numa sub-biblioteca
definida como acessível a partir da partição de VSE/POWER.
- copy
- Número de cópias a serem impressas a partir da fila LST. O número
válido varia de 0 a 255.
Os parâmetros FCB e COPY são posicionais e opcionais. Use um
asterisco (*) para os valores-padrão. O nome da fase FCB é o
que foi definido na configuração na hora do IPL e COPY padrão é 1.
|
CICS para OS/2
|
- OS2COBOL
- Valor do nome de arquivo OS/2 de 65 bytes correspondente a um
arquivo de dados COBOL nativo associado a um arquivo de impressão. O
compartilhamento de arquivos em arquivos de dados gerenciados pelo COBOL não é
suportado. Sempre que é aberto, o arquivo recebe um bloqueio exclusivo
que permanece até ele ser fechado.
- TRANSIENT
- Não suportado.
|
OS/400
| O tipo do arquivo tem que ser SEQ. O valor pode ser
passado para EZEDESTP usando-se FILE - *LIBL para
localizar o arquivo.
O comando OVRPRTF é usado para suportar EZEDESTP no OS/400. Se
o valor no EZEDESTP for modificado, será feito o seguinte durante a execução
de uma opção de E/S DISPLAY:
- CLOSE o arquivo de impressora antigo
- Sobrepõe-se ao nome do novo arquivo de impressora em EZEDESTP (OVRPRTF)
- OPEN o novo arquivo de impressora
O valor definido em EZEDESTP é propagado a partir do nível da chamada,
sendo alterado em todos os níveis de chamada subordinados a ele. A
propagação porém não se dá se o arquivo tiver sido aberto antes pelo
programa.
|
OS/2 (GUI)
| Não suportado.
|
Windows (GUI)
| Não suportado.
|
Java (GUI)
| Não suportado.
|
OS/2 (C++)
| O nome do arquivo depende do sistema.
|
AIX
| O nome do arquivo depende do sistema. No AIX, o comprimento máximo
pode variar.
|
HP-UX
| O nome do arquivo depende do sistema. No HP/UX, o comprimento
máximo pode variar.
|
CICS for AIX
| O valor de EZEDESTP é o nome de uma fila de dados transientes. O
padrão é EZEP. Consulte o documento VisualAge Generator Server
Guide for Workstation Platforms para saber como definir a fila e associá-la a uma transação que grava o
conteúdo da fila numa impressora de terminal.
|
Solaris
| O nome do arquivo depende do sistema. No AIX, o comprimento máximo
pode variar.
|
CICS para Solaris
| O valor de EZEDESTP é o nome de uma fila de dados transientes. O
padrão é EZEP. Consulte o documento VisualAge Generator Server
Guide for Workstation Platforms para saber como definir a fila e associá-la a uma transação que grava o
conteúdo da fila numa impressora de terminal.
|
Windows NT
| Igual a OS/2 (C++).
|
CICS para Windows NT
| Igual a CICS for AIX.
|
Dispositivo de Teste
| Arquivos de impressão não são fechados em interrupção de
segmentação.
Não se deve usar o mesmo nome de recurso de sistema em programa que está
sendo executado tanto no dispositivo de teste quanto em programa COBOL
gerado.
|