Nesta videoaula prática, você acompanhará a criação completa de uma aplicação CICS funcional do zero. Se na aula anterior apresentamos os conceitos teóricos de transação, programa, mapa e arquivo, agora é o momento de colocar a mão na massa e construir cada um desses elementos no ambiente real. Ao final, você terá uma transação CICS operacional, capaz de receber dados do usuário, processá-los e devolver uma resposta em tela. Esse é o tipo de atividade que se espera de um desenvolvedor Mainframe no dia a dia: entender o negócio, criar os recursos necessários e integrá-los em um sistema que funcione.

O processo de criação de uma aplicação CICS envolve várias etapas interdependentes. Cada elemento precisa ser definido, compilado e registrado nas tabelas de controle do CICS para que possa ser utilizado. Um erro em qualquer etapa impede que a transação funcione. Por isso, esta aula é conduzida com atenção aos detalhes: cada definição, cada parâmetro e cada comando são explicados, testados e verificados no ambiente.

Etapas demonstradas na aula:

• Planejamento da aplicação: Antes de criar qualquer recurso técnico, é preciso definir o objetivo da aplicação. Neste exemplo, criaremos uma transação chamada CONS (consulta) que exibirá um mapa com campos de entrada (código do cliente e nome) e campos de saída (saldo e status). O programa lerá os dados digitados, fará uma consulta a um arquivo VSAM KSDS e devolverá o resultado na tela.

• Definição da Transação (PCT): Criação da definição no grupo de controle CICS. Demonstração dos parâmetros essenciais: TRANSID (CONS), PROGRAM (PGMCO01), TWASIZE, PRIORITY, TCLASS e PROFILE. Como ativar o grupo e verificar se a transação está disponível com o comando CEMT INQUIRE TRANSACTION(CONS).

• Criação do Programa COBOL para CICS: Estrutura básica de um programa CICS em COBOL:

  • IDENTIFICATION DIVISION com PROGRAM-ID.

  • WORKING-STORAGE SECTION com definição das áreas de COMMAREA, máscaras de campo e variáveis de trabalho.

  • PROCEDURE DIVISION iniciando com EXEC CICS HANDLE CONDITION e EXEC CICS HANDLE AID.

  • Uso de EXEC CICS SEND MAP para enviar o mapa ao terminal.

  • Uso de EXEC CICS RECEIVE MAP para receber os dados digitados.

  • Validação dos campos recebidos, tratamento de erro e mensagens de retorno.

  • Uso de EXEC CICS READ para consultar o arquivo VSAM KSDS, EXEC CICS RETURN para finalizar e EXEC CICS SEND TEXT para mensagens simples.

  • Compilação do programa com o compilador COBOL para CICS e link-edit para gerar o load module.