Cobol

Curso: Desenvolvedor Mainframe
OS/390 / Lógica de Programação / Cobol / CICS / DB2

Programação Estruturada em COBOL

ÍNDICE

1. INTRODUÇÃO 6

COBOL II 6
INTERPRETAÇÃO DOS FORMATOS NESTA APOSTILA 6
INDENTAÇÃO 7

2. FORMATO DO FONTE COBOL 9

ÁREA DE NUMERAÇÃO SEQÜENCIAL (COLUNAS DE 1 A 6) 9
ÁREA DE INDICAÇÃO (COLUNA 7) 9
ÁREA A – ÁREA B (COLUNAS DE 8 A 72) 9

3. DIVISÕES DO COBOL 10

IDENTIFICATION DIVISION 10
ENVIRONMENT DIVISION 11
CONFIGURATION SECTION 11
INPUT-OUTPUT SECTION 11
DATA DIVISION 12
FILE SECTION. 12
WORKING-STORAGE SECTION. 12
ESPECIFICAÇÃO PARA DADOS DE ARQUIVOS OU VÁRIAVEIS 12
PROCEDURE DIVISION 16

4. COMANDOS DE REPETIÇÃO – PROGRAMAÇÃO ESTRUTURADA 17

PERFORM 17
PERFORM parágrafo [THRU] parágrafo-fim 17
PERFORM parágrafo N TIMES 17
PERFORM parágrafo UNTIL condição 17
PERFORM parágrafo VARYING campo 18

5. COMANDOS BASICOS 19

ACCEPT 19
DISPLAY 20
MOVE 20
INITIALIZE 21
EXIT 22
STOP RUN 22

6. COMANDOS ARITMÉTICOS 23

ADD 23
SUBTRACT 24
DIVIDE 25
MULTIPLY 25
COMPUTE 26

7. COMANDOS DE DECISÃO 28

IF 28
EVALUATE 30
CONTINUE 31
NEXT SENTENCE 31

8. COMANDOS PARA PROCESSAMENTO DE ARQUIVOS SEQUENCIAIS 32

ENVIRONMENT DIVISION - INPUT-OUTPUT SECTION 32
DATA DIVISION - FILE SECTION. 33
PROCEDURE DIVISION 34
OPEN 34
READ 35
WRITE 35
CLOSE 36
PROGRAMA MODELO - BALANCE-LINE – ESPECIFICAÇÃO 37
PROGRAMA MODELO - BALANCE-LINE – CODIFICAÇÃO COBOL 38

9. COMANDOS PARA PROCESSAMENTO DE RELATÓRIOS 42

WRITE {BEFORE | AFTER} 42
MÁSCARAS DE EDIÇÃO 43
BLANK WHEN ZERO 43

10. COBOL AVANÇADO – ARQUIVOS VSAM 44

ARQUIVOS INDEXADOS – VSAM KSDS 44
ENVIRONMENT DIVISION - INPUT-OUTPUT SECTION 44
FILE STATUS 45
DATA DIVISION - FILE SECTION – FD(FILE DESCRIPTION) 46
PROCEDURE DIVISION 47
OPEN 47
READ 47
WRITE 48
REWRITE 49
START 50
DELETE 50
CLOSE 51

11. COBOL AVANÇADO – COMANDOS, TABELAS E DADOS 52

COPY 52
CALL E LINKAGE SECTION