Configurando a Amostra CICS Transaction Server for z/OS Connectivity

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:

Configure o WebSphere Message Broker para se conectar à região do CICS

As seguintes etapas descrevem a configuração mínima necessária para importar e implementar a amostra:

  1. Se for necessário um login para se conectar à região CICS, configure uma identidade de segurança usando o comando mqsisetdbparms, por exemplo:
    mqsisetdbparms MB8BROKER -n cics::<ID name> -u <username> -p <password> 
  2. Crie um serviço configurável CICSConnection denominado CICSSampleConnectionService usando o comando mqsicreateconfigurableservice ou usando o WebSphere Message Broker Explorer:

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

Configurar FILEA na Região do CICS

Conclua as seguintes etapas para configurar o FILEA na sua região do CICS de destino:

  1. Crie o arquivo FILEA Key Sequenced Dataset (KSDS).

    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) //* //          
    
  2. Crie uma definição de recurso FILE que faça referência ao arquivo FILEA KSDS.

    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.

  3. Instale o programa do CICS, DFH$AXCS.

    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.

Voltar para Home da Amostra