Divisões do Cobol

  • Atualizado
  • Publicado em cobol
  • 2 minutos de leitura

As divisões do COBOL

As seções essenciais de um programa COBOL desempenham um papel crucial na organização do código. Elas facilitam tanto a compreensão quanto a manutenção, especialmente em sistemas complexos. Para garantir o bom funcionamento do código, cada programa deve seguir uma estrutura composta por quatro divisões obrigatórias. Além disso, o uso correto dessas divisões melhora a clareza e a eficiência do desenvolvimento

Divisões do COBOL:

IDENTIFICATION DIVISION

A IDENTIFICATION DIVISION é a primeira divisão de um programa COBOL e tem como objetivo identificar o programa e seu autor. Apesar de conter principalmente informações documentais, sua presença é essencial para manter a organização do código. O único parágrafo obrigatório nessa divisão é o PROGRAM-ID, responsável por definir o nome do programa. Já os parágrafos opcionais, como AUTHOR, DATE-WRITTEN e INSTALLATION, oferecem detalhes adicionais que enriquecem a documentação.

Exemplo:

IDENTIFICATION DIVISION.
PROGRAM-ID. EXEMPLO.
AUTHOR. João Silva.
DATE-WRITTEN. 01/01/2025.
INSTALLATION. Empresa XYZ.

ENVIRONMENT DIVISION

Esta divisão descreve o ambiente onde o programa será executado, incluindo detalhes sobre o hardware e o sistema operacional. É subdividida em:

  • CONFIGURATION SECTION: Define o computador de origem (SOURCE-COMPUTER) e o computador alvo (OBJECT-COMPUTER).
  • INPUT-OUTPUT SECTION: Contém o FILE-CONTROL, que especifica os arquivos que o programa irá manipular e suas características.

Exemplo:

ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
    SOURCE-COMPUTER. IBM-PC.
    OBJECT-COMPUTER. IBM-PC.
INPUT-OUTPUT SECTION.
    FILE-CONTROL.
        SELECT CLIENTE-ARQUIVO
            ASSIGN TO "CLIENTE.DAT"
            ORGANIZATION IS LINE SEQUENTIAL.

DATA DIVISION

Nesta divisão, são declaradas todas as variáveis e estruturas de dados utilizadas pelo programa. É composta por várias seções, entre elas:

  • FILE SECTION: Descreve a estrutura dos registros dos arquivos mencionados no FILE-CONTROL.
  • WORKING-STORAGE SECTION: Declara variáveis e constantes necessárias para o processamento interno do programa.
  • LINKAGE SECTION: Define variáveis que serão passadas ao programa por meio de parâmetros externos.

Exemplo:

DATA DIVISION.
FILE SECTION.
FD CLIENTE-ARQUIVO.
    01 CLIENTE-REGISTRO.
        02 CLIENTE-NOME     PIC X(30).
        02 CLIENTE-ENDERECO PIC X(50).
        02 CLIENTE-TELEFONE PIC X(15).
WORKING-STORAGE SECTION.
    01 CONTADOR     PIC 9(5) VALUE 0.
    01 TOTAL-VALOR  PIC 9(7)V99 VALUE 0.00.
LINKAGE SECTION.
    01 PARAMETRO-ENTRADA PIC X(10).

https://www.cadcobol.com.br/divisoes.htm

Referências: