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:
- https://www.cadcobol.com.br/divisoes.htm
- https://www.ibm.com/docs/pt-br/cobol-linux-x86/1.2?topic=program-structuring-your