Please enable JavaScript.
Coggle requires JavaScript to display documents.
COBOL (Características (Organização (As colunas 08-11 representam a Área A…
COBOL
Características
-
Organização
As colunas 08-11 representam a Área A, onde deve-se indicar a DIVISION, SECTION ou PARAGRAPH
A coluna 7 indica se a linha é um comentário (estrela), uma continuação da linha anterior (-) , ou uma quebra de linha (/)
-
As linhas 12-72 representam a Área B, onde estão todos os STATEMENTS
Literais podem ter até 160 caracteres e podem ser numéricos ou alfanuméricos. Os numéricos podem ter até 18 digitos
Um literal numérico pode possuir ponto (desde que não seja o último caractere), e sinal de + ou - (que devem estar sempre na primeira posição, quando presentes)
-
DIVISÕES
IDENTIFICATION DIVISION - local onde se identifica o programa. Deve ter um parágrafo obrigatório PROGRAM-ID
-
DATA DIVISION - define os dados e variáveis que serão usadas: file section, working-storage section, local-storage section, link section
PROCEDURE DIVISION - onde é colocado o algoritmo, a lógica em si
Paragraphs são rótulos no código (labels) que permitem ao programador desviar um código para ele, e Sentences e Statements são comando para realizar o algoritmo
Faz passagem de parâmetros por referência, a não ser que expresso "BY CONTENT"
Variáveis
Os nomes das variáveis são formados por letras, números e hífen (-), mas não pode ser iniciado por hífen
-
Pode começar com um número, mas deve ter ao menos uma letra
Nível é a forma de agrupar variáveis para criar estruturas. Níveis de 01 a 49 são livres, 02 a 49 para os subitens
Níveis Especiais
-
Nível 77: usado para declarar variáveis completamente independentes de outras, que não podem ser pais ou filhas
Nível 88: nomes condicionais, restringem valores para variáveis. Ex: "88 GENDER-VALID VALUE 'M' 'F'."
Pic ou Picture é a definição da forma e tipo das variáveis. Ex: "PIC 9(4)" - números de 0000 até 9999 = "PIC 9999"
-
Arrays
-
Bidirecional
01 CURSO.
- NOME-CURSO PIC X(8).
02 ALUNO OCCURS 30 TIMES.
03 TELEFONE PIC 9(12) OCCURS 5 TIMES.
Cada curso tem um nome, e uma lista de 30 alunos, onde cada aluno tem uma lista de 5 telefones
-
TELEFONE (3,1), por exemplo, acessa o 1º telefone do 3º aluno
Operações Básicas
Arquivos
A declaração do arquivo ocorre em dois pontos:
- ENVIRONMENT DIVISION, INPUT-OUTPUT SECTION
- DATA DIVISION, FILE SECTION. (Declaração de fato)
-
-
Modos de abertura
-
-
EXTEND - abre um arquivo para escrita, colocando novos registros no final
-
-
Controle de Fluxo
-
-
PERFORM
-
-
-
PERFORM THRU - recebe como parâmetro um parágrafo de início e um de fim, e executa tudo entre os dois (incluindo ambos)
Operações
-
ACCEPT - recebe algum dado, input do usuário
-
-
-
-
-
-
-
SEARCH - Realiza busca sequencial, executa a cláusula AT END caso não encontre nada, e executa o que estiver após o WHEN caso seja encontrado algum registro.
SEARCHALL - Realiza busca binária, mas necessita que os registros da tabela estejam ordenados de forma crescente ou decrescente (ascending ou descending)
A declaração de ASCENDING/DESCENDING KEY não faz a ordenação da estrutura, mas apenas declara que está ordenado
CALL - chama um outro programa ou funções.
Nota: Existem programas recursivos, mas não chamadas recursivas, mas são raras em COBOL
Copybook
Copybooks são bibliotecas compartilhada na qual os programadores armazenam segmentos de programas mais utilizados, para promover o reuso