COBOL - Divisões - www.cadcobol.com.br

Divisões do COBOL

Todo programa COBOL consiste, obrigatoriamente, em 4 (quatro) divisões separadas.
Cada divisão é escrita em inglês, para diminuir o esforço e facilitar a compreensão do programa por pessoas alheias ao processamento de dados.
Cada uma das 4 (quatro) divisões tem funções específicas.

Os nomes de parágrafo e seção é escolhido pelo Desenvolvedor, mas devem estar de acordo com às regras definidas pelo Usuário.

As divisões devem sempre aparecer nesta ordem, dentro de um programa, e podem ser divididas em seções (SECTIONS) e estas em parágrafos.
Todas as outras instruções do programa são consideradas declarações COBOL.

IDENTIFICATION DIVISION	A IDENTIFICATION DIVISION serve para identificar o programa no computador e também proporciona informações documentais que são de suma importância para pessoas que não entendem nada de processamento e queiram analisar superficialmente o programa.
ENVIRONMENT DIVISION	A ENVIRONMENT DIVISION descreve o computador e os periféricos que serão utilizados pelo programa.
DATA DIVISION	A DATA DIVISION descreve os arquivos de entrada e saída que serão processados pelo programa, especificando seus formatos. Também define as áreas de trabalho e constantes necessárias para o processamento dos dados.
PROCEDURE DIVISION	A PROCEDURE DIVISION contém o código que irá manipular os dados descritos na DATA DIVISION. É nesta divisão que o Desenvolvedor descreverá o algoritmo do programa. Esta divisão possui uma estrutura hierárquica e consiste de seções, parágrafos, sentenças e comandos. Só a seção é opcional. Deve haver pelo menos um parágrafo, sentença ou comando na PROCEDURE DIVISION.

Regras básicas

Os nomes de divisões e parágrafos devem ser codificados na margem A (coluna 8).
Todas as outras declaraçoes são codificadas apartir da margem B (coluna 12).
Cada declaração termina com um ponto final, que deve ser seguido de um espaço em branco.

Os nomes de divisão e seção devem aparecer na linha sem nenhuma outra entrada.
Nomes de parágrafos podem aparecer na mesma linha de uma ou mais declarações, sempre seguidos de ponto e espaço em branco.

Regras para formação de nomes:

Arquivos:

de 1 até 30 caracteres
nenhum caracter especial
nenhum caracter branco no meio
pelo menos um caracter alfabético
não pode ser uma palavra reservada COBOL

Dados (registros, campos, etc:)

de 1 até 30 caracteres
não podem começar nem terminar com hifen
conter pelo menos um caracter alfabético
não podem ser palavra reservada do COBOL
podem conter letras, números ou hífens e mais nenhum caracter especial
não são permitidos espaços em branco dentro de nomes de dados

Literais numéricas:

máximo de 18 (dezoito) dígitos
Quando voce especifica ARITH(EXTEND), o número máximo de dígitos que você pode especificar na cláusula PICTURE para um decimal compactado, um decimal externo e um numérico editado, por itens de dados, é elevado de 18 para 31.
sinal ("+" ou "-") à esquerda do número
ponto decimal, que não pode ser o último caracter

Literais não numéricas:

máximo de 160 (cento e sessenta) caracteres, incluindo os espaços em branco
quaisquer caracteres podem ser usados (exceto aspas ou apóstrofo)
devem ser declaradas entre aspas, normalmente simples

Área de codificação no COBOL

Colunas	Descrição
1 a 6	branco (será preenchido com a numeração COBOL)
7	(branco) linha de codificação * (asterisco) linha de comentário - (hífen) continuação de literal não numérico
8 a 72	instruções do COBOL
iniciando na coluna 8	Margem A - digitação dos seguintes itens: Cabeçalhos de divisão Cabeçalhos de seção Cabeçalhos de parágrafos Cabeçalhos de entrada nas descrições de arquivos Cabeçalhos de entrada na descrição dos registros
iniciando na coluna 12	Margem B - codificação COBOL - comandos
73 a 80	Area livre