CREATX inicia uma transação assíncrona em um ambiente transacional e passa um registro para a transação sendo iniciada. Se a transação for um programa VisualAge Generator, o registro é usado para inicializar o memória de trabalho do programa.
>>-CREATX--solicitação----+------------+--;-------------------->< +-,prid------+ '-+--------+-' '-,recip-'
Atributo | Descrição | ||
---|---|---|---|
solicitação | O nome de um registro de memória de trabalho. O registro de
armazenamento de trabalho tem que ter o seguinte formato:
| ||
prid | Item binário opcional de 4 caracteres ou 4 bytes. Seu uso é dependente do sistema e está descrito na seção Ambientes de Destino. Quando se especifica recip, prid é obrigatório. | ||
recip | Item opcional de 4 caracteres que contém a ID do terminal a ser associado à transação que está sendo iniciada. |
Pode-se usar o serviço CREATX em ambientes CICS para iniciar uma transação em sistema remoto e passar um registro à transação para ser processado. O programa remoto recebe o registro na área de armazenamento quando a transação é iniciada.
Na geração do programa, use a tabela de ligação para especificar que a instrução CREATX inicia uma transação em sistema remoto. A tabela de ligação também especifica como a localização do sistema remoto deve ser determinada e se os dados do registro de armazenamento de trabalho precisam ser convertidos entre o formato do mainframe e o da estação de trabalho. Consulte a seção sobre implementação do processamento cooperativo usando a rotina de serviço CREATX no documento VisualAge Generator Design Guide para saber mais a esse respeito.
Os argumentos prid e recip são ignorados se especificados em chamada CREATX a programa remoto. A transação iniciada não é associada a nenhum terminal.
Ambiente | Considerações de Compatibilidade |
---|---|
VM CMS | Não suportado. |
VM batch | Não suportado. |
CICS para MVS/ESA | O código da transação CICS de 4 bytes deve ser seguido por 4 bytes de
espaços em branco no campo de nome da transação do registro do pedido.
Nem o comprimento de 2 bytes nem o campo de nome da transação são passados
para a transação iniciada.
CREATX resulta na emissão de um comando START CICS para a transação indicada. O comando START é emitido com ou sem terminal associado a ele, dependendo do conteúdo de recip. Se recip for omitido, a transação iniciada será associada ao terminal atual. O valor de prid é ignorado. Se PRINTDEST=TERMID e recip forem definidos para zeros binários, o valor de prid se transformará no valor inicial de EZEDESTP na transação iniciada. O comando START CICS é emitido sem terminal associado a ele. Se PRINTDEST=TERMID, EZEDESTP será inicializado assim:
Se PRINTDEST=EZEP, EZEDESTP será sempre inicializado para o destino associado a EZEPRINT na geração. Se não for zeros binários, recip terá que conter a ID do terminal a ser associado à transação que está sendo iniciada. Tanto pode ser uma ID de terminal quanto de impressora. Não é recomendável que seja o terminal atual. Use XFER para iniciar a nova transação no terminal atual. O valor de prid é ignorado. A transação iniciada tem que ter entradas PCT e PPT para o programa. Se não for um programa VisualAge Generator, a transação iniciada terá que emitir um RETRIVE CICS para obter a área de trabalho passada. |
CICS para MVS/ESA (continuação) | Se a opção REPLY estiver especificada em CALL, EZERT8 poderá conter os
seguintes códigos de retorno:
|
MVS/TSO | Não suportado. |
MVS batch | Não suportado. |
IMS/VS | O campo de nome da transação no registro do pedido é o código da
transação IMS de 8 bytes.
CREATX resulta numa inserção no PCB alternativo modificável. A área de trabalho indicada é passada como mensagem. O programa COBOL gerado adiciona automaticamente 2 bytes extras entre o comprimento e a transação e acrescenta 2 ao valor do comprimento. A transação é iniciada sem terminal associado a ela. Prid e recip são ignorados. O comprimento máximo do registro do pedido é de 32765 bytes. A transação que é iniciada tem que ser incluída no GEN do IMS e tem que ser definida como não-conversacional. Se não for programa VisualAge Generator, a transação iniciada terá que emitir uma chamada get unique ao PCB de E/S para recuperar a mensagem. CREATX não é suportada nem de nem para programa que fica em sistema remoto. Se a opção REPLY estiver especificada na chamada, EZERT8 poderá conter o valor:
|
IMS BMP | Igual a IMS/VS. |
CICS para VSE | Igual a CICS para MVS/ESA. |
VSE batch | Não suportado. |
CICS para OS/2 | É preciso que o código da transação CICS de 4 bytes seja seguido por 4
bytes de espaços em branco no campo de nome da transação do registro do
pedido.
CREATX resulta na emissão de um comando START CICS para a transação indicada. O comando START é emitido com ou sem terminal associado a ele, dependendo do conteúdo de recip. Se recip for omitido, a transação iniciada será associada ao terminal atual. O valor de prid é ignorado. Se não for zeros binários, recip terá que conter a ID do terminal a ser associado à transação que está sendo iniciada. Tanto pode ser uma ID de terminal quanto de impressora. Não é recomendável que seja o terminal atual. Use XFER para iniciar a nova transação no terminal atual. O valor de prid é ignorado. A transação iniciada tem que ter entrada PCT para o programa. Se não for um programa VisualAge Generator, a transação iniciada terá que emitir um RETRIVE CICS para obter a área de trabalho passada. O argumento prid será ignorado se especificado. CREATX resulta na emissão de um comando START CICS para a transação indicada. A transação é iniciada sem terminal associado a ela. Consulte no CICS para MVS/ESA a lista de códigos de retorno de EZERT8 se a opção REPLY estiver especificada em CALL. |
OS/400 | VisualGen Host Services for OS/400 fornece suporte do OS/400
a CREATX por meio de programas de linguagem de comando (CL) (PGMs).
Dois PGMs de CL no produto VisualGen Host Services for OS/400 suportam a
função CREATX: CREATX e CREATXPP. CREATX obtém o número do job
atual e envia os dados do usuário à fila de dados chamada VGCREATX.
CREATX inicia então um novo job chamado CREATXJOB, que inicia o PGM CL
CREATXPP. CREATXPP usa o número do job anterior como chave para
recuperar os dados da fila de dados VGCREATX. CREATXPP chama então o
PGM CL assíncrono especificado nos bytes de 3 a 11 do registro de dados do
usuário.
Defina os argumentos de chamada de CREATX desta forma:
|
OS/2 (GUI) | Os argumentos prid e recip são ignorados se especificados. |
Windows (GUI) | Não suportado. |
OS/2 (C++) | Igual a OS/2 (GUI). |
AIX | Igual a OS/2 (GUI). |
CICS for AIX | É preciso que o código da transação CICS de 4 bytes seja seguido por 4
bytes de espaços em branco no campo de nome da transação do registro do
pedido.
CREATX resulta na emissão de um comando START CICS para a transação indicada. O comando START é emitido com ou sem terminal associado a ele, dependendo do conteúdo de recip. Se recip for omitido, a transação iniciada será associada ao terminal atual. O valor de prid é ignorado. Se não for zeros binários, recip terá que conter a ID do terminal a ser associado à transação que está sendo iniciada. Tanto pode ser uma ID de terminal quanto de impressora. Não é recomendável que seja o terminal atual. Use XFER para iniciar a nova transação no terminal atual. O valor de prid é ignorado. A transação iniciada tem que ter entrada PCT para o programa. Se não for um programa VisualAge Generator, a transação iniciada terá que emitir um RETRIVE CICS para obter a área de trabalho passada. O argumento prid será ignorado se especificado. CREATX resulta na emissão de um comando START CICS para a transação indicada. A transação é iniciada sem terminal associado a ela. Consulte no CICS para MVS/ESA a lista de códigos de retorno de EZERT8 se a opção REPLY estiver especificada em CALL. |
HP-UX | Igual a OS/2 (GUI). |
Solaris | Igual a OS/2 (GUI). |
CICS for Solaris | É preciso que o código da transação CICS de 4 bytes seja seguido por 4
bytes de espaços em branco no campo de nome da transação do registro do
pedido.
CREATX resulta na emissão de um comando START CICS para a transação indicada. O comando START é emitido com ou sem terminal associado a ele, dependendo do conteúdo de recip. Se recip for omitido, a transação iniciada será associada ao terminal atual. O valor de prid é ignorado. Se não for zeros binários, recip terá que conter a ID do terminal a ser associado à transação que está sendo iniciada. Tanto pode ser uma ID de terminal quanto de impressora. Não é recomendável que seja o terminal atual. Use XFER para iniciar a nova transação no terminal atual. O valor de prid é ignorado. A transação iniciada tem que ter entrada PCT para o programa. Se não for um programa VisualAge Generator, a transação iniciada terá que emitir um RETRIVE CICS para obter a área de trabalho passada. O argumento prid será ignorado se especificado. CREATX resulta na emissão de um comando START CICS para a transação indicada. A transação é iniciada sem terminal associado a ela. Consulte no CICS para MVS/ESA a lista de códigos de retorno de EZERT8 se a opção REPLY estiver especificada em CALL. |
Windows NT | Igual a OS/2 (GUI). |
CICS para Windows NT | Igual a CICS for AIX. |
Dispositivo de Teste | Nenhum. |