Sintaxe básica COBOL: as quatro divisões e a estrutura de dados
Todo programa COBOL segue uma estrutura de quatro divisões obrigatórias. Este guia apresenta a sintaxe básica COBOL, a cláusula PICTURE, as estruturas de controle e um exemplo de código COBOL simples que você pode executar no nosso simulador — o primeiro passo para como aprender programação COBOL do zero.
- Divisões do programa COBOL: IDENTIFICATION, ENVIRONMENT, DATA, PROCEDURE
- Estrutura de dados no COBOL: hierarquia e PICTURE para valores e textos
- Exemplo de código COBOL simples: soma de dois números e exibição do resultado
A anatomia de um programa COBOL: as quatro divisões
Todo programa COBOL é organizado em quatro divisões obrigatórias. Conhecer a ordem e o papel de cada uma é a base da sintaxe básica COBOL e da estrutura de dados no COBOL.
IDENTIFICATION DIVISION
O cartão de visitas do programa: nome do programa, autor, data de criação e comentários. É a primeira divisão que o compilador encontra.
ENVIRONMENT DIVISION
Configuração do ambiente: hardware (INPUT-OUTPUT SECTION) e mapeamento de arquivos (FILE-CONTROL, ASSIGN). Em programas que só usam dados em memória, pode ser mínima.
DATA DIVISION
Onde a mágica da estrutura de dados acontece: declaração de variáveis, campos, grupos e a famosa cláusula PICTURE (PIC) que define formato e tamanho dos dados.
PROCEDURE DIVISION
Onde a lógica de negócio realmente vive: parágrafos, comandos como ADD, COMPUTE, IF, PERFORM e EVALUATE. É aqui que o programa “faz” o que foi pedido.
Exemplo prático: Hello World e soma de dois números
Um exemplo de código COBOL simples que soma dois números e exibe o resultado. Repare como a sintaxe se parece com uma sentença em inglês: ADD A TO B, DISPLAY RESULT.
* Soma dois números e exibe o resultado — exemplo de sintaxe básica COBOL
IDENTIFICATION DIVISION.
PROGRAM-ID. SOMA02.
AUTHOR. Formacao COBOL.
ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 NUM-A PIC 9(05).
01 NUM-B PIC 9(05).
01 RESULTADO PIC 9(06).
PROCEDURE DIVISION.
MAIN.
MOVE 10 TO NUM-A.
MOVE 25 TO NUM-B.
ADD NUM-A TO NUM-B GIVING RESULTADO.
DISPLAY 'Resultado: ' RESULTADO.
STOP RUN.O programa move 10 para NUM-A, 25 para NUM-B, soma e coloca o resultado em RESULTADO, depois exibe. A estrutura de dados no COBOL está na DATA DIVISION (PIC 9(05) = cinco dígitos numéricos).
Conceitos fundamentais que todo iniciante deve saber
Variáveis e hierarquia: a cláusula PICTURE (PIC)
A cláusula PICTURE COBOL define o formato e o tamanho de cada campo. É o coração da estrutura de dados no COBOL:
PIC 9(05)— 5 dígitos numéricos (inteiro).PIC 9(05)V99— 5 dígitos + 2 decimais (valor financeiro).PIC X(20)— 20 caracteres alfanuméricos (texto).PIC A(10)— 10 letras. Hierarquia: níveis 01, 05, 10 etc. definem grupos e subcampos.
Estruturas de controle
IF/ELSE, PERFORM e EVALUATE são a base da lógica em sintaxe básica COBOL:
- IF / ELSE:
IF SALDO < 0 PERFORM BLOQUEIA-CARTAO ELSE PERFORM LIBERA-CARTAO END-IF. - PERFORM: o coração das repetições — chama um parágrafo uma ou várias vezes (PERFORM UNTIL, PERFORM VARYING).
- EVALUATE: como um “switch” em outras linguagens; escolhe uma ação conforme o valor de uma variável.
Dica de especialista: foco na lógica, não na decoreba
Próximo passo: dominar a lógica que sustenta o sistema financeiro
A sintaxe básica COBOL e as divisões do programa COBOL são apenas o começo. Para levar a estrutura de dados no COBOL e a cláusula PICTURE COBOL para o mundo real — arquivos, bancos de dados e regras de negócio — você precisa de prática guiada e projeto completo.