---

---

C O B O L 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.

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. 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.

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.

Nós podemos representar a hierarquia do COBOL da seguinte forma:

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 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 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

Estrutura de um programa IDENTIFICATION DIVISION ENVIRONMENT DIVISION CONFIGURATION SECTION INPUT-OUTPUT SECTION DATA DIVISION FILE SECTION WORKING-STORAGE SECTION LOCAL-STORAGE SECTION LINKAGE SECTION COMMUNICATION SECTION REPORT SECTION SCREEN SECTION PROCEDURE DIVISION

Á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 A partir da segunda versão do Programa, será preenchido pelo compilador com o número da versão