Configure a conexão do IBM WebSphere Message Broker com o CICS Transaction Server para z/OS usando o serviço configurável CICSConnection e configure FILEA na região de destino do CICS para configurar a amostra CICS Transaction Server for z/OS Connectivity.
Antes de importar e implementar a amostra CICS Transaction Server for z/OS Connectivity, é necessário configurar a conexão do WebSphere Message Broker com o CICS usando o serviço configurável CICSConnection:
Antes de executar a amostra CICS Transaction Server for z/OS Connectivity, é necessário configurar FILEA na sua região do CICS de destino:
As seguintes etapas descrevem a configuração mínima necessária para importar e implementar a amostra:
mqsisetdbparms MB8BROKER -n cics::<ID name> -u <username> -p <password>
Use o exemplo seguinte para criar um serviço configurável CICSConnection para a instância CICS que está sendo executada no mycicsregion.com porta 12345. O broker é identificado pelo APPLID BRKApp e pelo qualificador BRKQual.
Se não for necessário um login para se conectar à região CICS, execute este comando:
mqsicreateconfigurableservice MB8BROKER -c CICSConnection -o CICSSampleConnectionService -n cicsServer,clientApplid,clientQualifier -v tcp://mycicsregion.com:12345,BRKApp,BRKQual
Se não for necessário um login para se conectar à região CICS, execute o comando a seguir, substituindo <nome do ID> por seu login.
mqsicreateconfigurableservice MB8BROKER -c CICSConnection -o CICSSampleConnectionService -n cicsServer,clientApplid,clientQualifier,securityIdentity -v tcp://mycicsregion.com:12345,BRKApp,BRKQual,<ID name>
mqsistop MB8BROKER
mqsistart MB8BROKER
Para descobrir mais sobre a criação de um serviço configurável ao qual o nó ou fluxo de mensagens CICSRequest se refere no tempo de execução para obter informações de conexão e para visualizar as propriedades do serviço configurável CICSConnection disponível, consulte Alterando as informações de conexão para o nó do CICSRequest e Propriedades dos serviços configuráveis na documentação do WebSphere Message Broker.
mqsistop MB8BROKER
mqsistart MB8BROKER
Para descobrir mais sobre o uso do WebSphere Message Broker Explorer para criar um serviço configurável ao qual o nó ou o fluxo de mensagens do CICSRequest se refira no tempo de execução, consulte Criando um novo serviço configurável na documentação do WebSphere Message Broker. Para visualizar as propriedades disponíveis do serviço configurável CICSConnection, consulte Propriedades do serviço configurável na documentação do WebSphere Message Broker.
É possível agora importar e implementar a amostra. Para obter mais informações, consulte Amostra CICS Transaction Server for z/OS Connectivity.
Após importar a amostra, podem aparecer as seguintes mensagens de aviso sobre o projeto CICS Connectivity Message Flows e o arquivo CICSConnectivity.esql:
Referência do campo da mensagem não resolvível "InputBody.data.file"
Referência do campo da mensagem não resolvível "InputBody.data.record"
É possível ignorar essas mensagens porque a pasta de dados não está contida no Esquema XML.
Conclua as seguintes etapas para configurar o FILEA na sua região do CICS de destino:
Quando uma região do CICS é definida inicialmente, os conjuntos de dados da amostra FILEA são criados como parte do processo de instalação e podem ser localizados em mydsindex.myCICSregion.FILEA. Se esse conjunto de dados estiver indisponível, use o seguinte script do Job Control Language (JCL) para recriar o conjunto de dados:
//HCREFILA JOB … card details … //CREFILEA EXEC PGM=IDCAMS,REGION=6144K //SYSPRINT DD SYSOUT=A //AMSDUMP DD SYSOUT=A //SYSIN DD * DEFINE CLUSTER ( - NAME( hlq4filea.FILEA ) - CYL(2,1) - VOLUME(SYSDAV) - KEYS( 6 1 ) - INDEXED - RECORDSIZE( 80 80 ) - FREESPACE( 5 5 ) - SHAREOPTIONS( 2 ) - ) - INDEX ( - NAME( hlq4filea.FILEA.INDEX ) - ) - DATA ( - NAME( hlq4filea.FILEA.DATA ) - ) /* // //HINIFILA JOB … card details … //* ==================== //* LOAD VSAM DATA FILE //* ==================== //INIFILEA EXEC PGM=DFH£LDSP //STEPLIB DD DSN=hlq4cics.SDFHLOAD,DISP=SHR //FILEA DD DISP=SHR,DSN=hlq4filea.FILEA //SYSOUT DD SYSOUT=* //SYSIN DD DISP=SHR,DSN=hlq4cics.SDFHSAMP(DFH£FAIN) //* //
Defina um recurso FILE usando a transação CEDA fornecida pelo CICS. O recurso pode ser baseado na definição FILEA de amostra do comando CSD no grupo DFH£FILA e deve fazer referência ao conjunto de dados definido na etapa anterior.
O programa de amostra fornecido pelo CICS, DFH$AXCS, pode ser instalado usando o seguinte comando:
CEDA INSTALL PROG(DFH$AXCS) GROUP(DFH$EXCI)
Agora, é possível executar a amostra CICS Transaction for z/OS Connectivity. Consulte Executando a Amostra CICS Transaction for z/OS Connectivity.