🧠 Explicação

Command Level é o formato moderno de comunicação entre programas COBOL (ou Assembler) e o ambiente CICS. Ele permite que o programador utilize comandos padronizados para interagir com recursos do CICS, como telas, arquivos, transações, armazenamento temporário, entre outros — de forma simples e legível.

A estrutura desses comandos segue o formato:

EXEC CICS nome-do-comando [parâmetros]
END-EXEC.

Antes de ser compilado, o programa precisa passar por um pré-processador (pré-compilador) que converte os comandos EXEC CICS em chamadas (CALL) para os módulos internos do CICS.

🛠️ Usos mais comuns

  • Manipular arquivos (READ, WRITE, DELETE)

  • Exibir e receber telas (SEND/RECEIVE MAP)

  • Tratar abends e erros (HANDLE ABEND, HANDLE CONDITION)

  • Disparar ou controlar transações (START, RETURN, LINK, XCTL)

  • Armazenar dados temporários ou transitórios

  • Controlar concorrência com ENQ/DEQ

📌 Sintaxe base

EXEC CICS COMANDO PARÂMETROS
END-EXEC.

Exemplo simples:

EXEC CICS SEND MAP('TELA01') MAPSET('TELAS') ERASE
END-EXEC.

🧾 Principais Comandos por Categoria

☠️ Tratamento de Abends

  • EXEC CICS ABEND

  • EXEC CICS HANDLE ABEND

🖥️ Gerenciamento de Tela (MAPs)

  • EXEC CICS SEND MAP

  • EXEC CICS RECEIVE MAP

✏️ Edição de Dados

  • EXEC CICS BIF DEEDIT

🌐 Acesso ao Ambiente

  • EXEC CICS ADDRESS

  • EXEC CICS ASSIGN

❗ Tratamento de Erros

  • EXEC CICS HANDLE CONDITION

  • EXEC CICS IGNORE CONDITION

📁 Acesso a Arquivos

  • EXEC CICS READ

  • EXEC CICS WRITE

  • EXEC CICS REWRITE

  • EXEC CICS STARTBR

  • EXEC CICS READNEXT

  • EXEC CICS READPREV

  • EXEC CICS RESETBR

  • EXEC CICS ENDBR

  • EXEC CICS DELETE

  • EXEC CICS SYNCPOINT

  • EXEC CICS SYNCPOINT ROLLBACK

⚙️ Controle de Transações

  • EXEC CICS START

  • EXEC CICS DELAY

  • EXEC CICS RETRIEVE

  • EXEC CICS CANCEL

  • EXEC CICS ASKTIME

  • EXEC CICS FORMATTIME

📦 Controle de Programas

  • EXEC CICS LINK

  • EXEC CICS XCTL

  • EXEC CICS RETURN

🧵 Controle de Tarefas (Tasks)

  • EXEC CICS ENQ

  • EXEC CICS DEQ

  • EXEC CICS SUSPEND

🧪 Temporary Storage (TS)

  • EXEC CICS READQ TS

  • EXEC CICS WRITEQ TS

  • EXEC CICS DELETEQ TS

📤 Transient Data (TD)

  • EXEC CICS READQ TD

  • EXEC CICS WRITEQ TD

  • EXEC CICS DELETEQ TD

📋 Regras importantes

  • Todo comando EXEC CICS deve terminar com END-EXEC.

  • O programa precisa passar por um pré-compilador antes de ser compilado.

  • Os comandos são processados como instruções CALL no executável final.

  • Os comandos devem ser escritos exatamente como definidos, respeitando nomes e parâmetros.

  • A maioria dos comandos só pode ser usada em ambientes CICS ativos.

💡 Dicas

  • Utilize o HANDLE CONDITION para tratar exceções e evitar abends inesperados.

  • Prefira comandos Command Level em vez de Macro Level, pois são mais portáveis e modernos.

  • Para interações com tela, defina corretamente MAP e MAPSET.

  • Sempre teste as operações de arquivo com rollback (SYNCPOINT ROLLBACK) para garantir integridade.

  • Dominar os comandos básicos (READ, SEND, LINK, RETURN) é essencial para o desenvolvimento de programas online no CICS.

 

✅ Conclusão

O Command Level é a forma padrão e recomendada para programar aplicações CICS com COBOL. Ele oferece uma interface clara e poderosa para acessar todos os recursos do CICS, como telas, arquivos, tarefas e transações. Aprender os principais comandos e suas categorias é essencial para qualquer programador que desenvolve sistemas online em ambientes mainframe.