Lições do módulo (1/2)
Estrutura do Programa
COBOL (Common Business-Oriented Language) é uma das linguagens de programação mais duradouras da história, projetada especificamente para aplicações comerciais e financeiras. Ao contrário das linguagens modernas, possui uma estrutura rígida e formal dividida em seções chamadas Divisões.
Layout fixo e formatos de área
Nos arquivos de origem COBOL tradicionais, cada linha é dividida em áreas específicas com base em colunas:
- Colunas 1 a 6 (Área de Sequência): Historicamente usadas para números de sequência de cartões perfurados. Hoje geralmente fica em branco.
- Coluna 7 (Área Indicadora): Utilizada para marcar linhas de comentários colocando um asterisco
*. - Colunas 8-11 (Área A): É aqui que começam os cabeçalhos de divisão, seção e parágrafo.
- Colunas 12-72 (Área B): É aqui que as instruções executáveis reais (como
DISPLAY,MOVE, etc.) são escritas. - Colunas 73-80 (Área de Identificação): Historicamente ignoradas pelo compilador, utilizadas para identificação interna.
Em nossos exercícios, usaremos uma formatação simplificada, mas consistente, iniciando as instruções da Área B com espaços apropriados (normalmente 7 ou 11 espaços dependendo da área).
As quatro divisões principais
Todo programa COBOL completo é estruturado em quatro divisões obrigatórias, que devem aparecer nesta exata ordem:
-
IDENTIFICATION DIVISION.Contém metadados do programa, como o nome do programa definido com a palavra-chavePROGRAM-ID. -
ENVIRONMENT DIVISION.Especifica o ambiente no qual o programa é executado e mapeia arquivos físicos para variáveis internas. -
DATA DIVISION.Onde são declaradas todas as variáveis e estruturas de dados utilizadas pelo programa. -
PROCEDURE DIVISION.Contém as instruções executáveis (a lógica de negócios). Todo programa deve terminar comSTOP RUN.para interromper a execução.
Experimente você mesmo
Escreva os cabeçalhos COBOL iniciais introduzindo a IDENTIFICATION DIVISION e definindo o nome do programa como HELLO-PRG.
Mostrar dica
Escreva DIVISÃO DE IDENTIFICAÇÃO. começando na coluna 8 (7 espaços) e na próxima linha PROGRAM-ID. OLÁ-PRG.
Solução disponível após 3 tentativas
Complete a estrutura introduzindo PROCEDURE DIVISION e imprima o texto 'HELLO COBOL' no console usando DISPLAY. Lembre-se de finalizar a execução do programa com STOP RUN.
Mostrar dica
Abaixo de PROCEDURE DIVISION., escreva DISPLAY 'HELLO COBOL'. começando na coluna 12 (11 espaços) e STOP RUN. na linha seguinte.
Solução disponível após 3 tentativas