GUIA COMPLETO DE COBOL

Da Era dos Mainframes à Nuvem: Sintaxe, Comandos, Execução e Uso Moderno


Introdução

COBOL não é apenas uma linguagem de programação.
COBOL é um patrimônio da engenharia de software.

Criado em 1959, ele continua sustentando sistemas críticos em bancos, governos, seguradoras e grandes corporações. Diferente de linguagens modernas, que surgem e desaparecem em ciclos curtos, COBOL atravessou seis décadas sem perder relevância funcional.

Este guia foi elaborado com profundidade técnica e didática, para servir como:

  • Material educativo
  • Referência histórica
  • Introdução prática
  • Manual conceitual
  • Base para profissionais e estudantes

Aqui você vai aprender:

  • O que é COBOL
  • Como ele surgiu
  • Como funciona sua estrutura
  • Quais são seus comandos básicos
  • Exemplos antigos e modernos
  • Onde programar COBOL hoje
  • Como compilar e executar
  • Como COBOL se integra a sistemas modernos
  • O futuro da linguagem

1. O Que é COBOL?

COBOL (Common Business-Oriented Language) é uma linguagem de programação de alto nível voltada para:

  • Processamento de dados corporativos
  • Sistemas financeiros
  • Aplicações empresariais
  • Processamento em lote
  • Grandes volumes de registros

Diferenciais fundamentais:

  • Legibilidade extrema
  • Precisão monetária
  • Estabilidade
  • Compatibilidade retroativa
  • Escalabilidade

2. Contexto Histórico do COBOL

2.1 Antes do COBOL

Nos anos 50:

  • Cada fabricante tinha sua própria linguagem
  • Programas não eram portáveis
  • Custos de desenvolvimento eram altíssimos
  • Processamento empresarial era ineficiente

2.2 Criação do COBOL (1959)

Criado por um comitê liderado pelo Departamento de Defesa dos EUA, com participação de:

  • IBM
  • Honeywell
  • RCA
  • Burroughs

E influência de Grace Hopper.

Objetivos:

  • Ser legível como inglês
  • Ser portátil
  • Ser orientado a negócios
  • Ser padronizado

3. Filosofia da Linguagem COBOL

COBOL foi desenhado com princípios únicos:

  • Clareza > Brevidade
  • Confiabilidade > Inovação
  • Precisão > Performance bruta
  • Compatibilidade > Modernização forçada

Por isso, programas escritos nos anos 70 ainda funcionam hoje.


4. Estrutura de um Programa COBOL

Todo programa COBOL segue quatro divisões obrigatórias:

IDENTIFICATION DIVISION.PROGRAM-ID. EXEMPLO.ENVIRONMENT DIVISION.DATA DIVISION.WORKING-STORAGE SECTION.PROCEDURE DIVISION.DISPLAY "Olá, Mundo!".STOP RUN.

4.1 IDENTIFICATION DIVISION

Contém:

  • Nome do programa
  • Autor
  • Data
  • Descrição
IDENTIFICATION DIVISION.PROGRAM-ID. FOLHA-PAGAMENTO.AUTHOR. ROBERTO.DATE-WRITTEN. 1984.

4.2 ENVIRONMENT DIVISION

Define:

  • Arquivos externos
  • Dispositivos
  • Sistemas operacionais
ENVIRONMENT DIVISION.INPUT-OUTPUT SECTION.FILE-CONTROL.    SELECT CLIENTES ASSIGN TO "clientes.dat".

4.3 DATA DIVISION

Define dados e estruturas.

Seções:

  • FILE SECTION
  • WORKING-STORAGE SECTION
  • LINKAGE SECTION
DATA DIVISION.WORKING-STORAGE SECTION.01 SALARIO        PIC 9(7)V99.01 TOTAL-SALARIO  PIC 9(9)V99.

4.4 PROCEDURE DIVISION

Contém a lógica do programa.

PROCEDURE DIVISION.    MOVE 1000.50 TO SALARIO.    ADD SALARIO TO TOTAL-SALARIO.    DISPLAY TOTAL-SALARIO.    STOP RUN.

5. Tipos de Dados em COBOL

COBOL usa PICTURE CLAUSE (PIC) para definir formatos.

5.1 Numéricos

01 IDADE PIC 9(3).01 SALDO PIC 9(7)V99.

5.2 Alfanuméricos

01 NOME PIC X(30).

5.3 Valores com Sinal

01 LUCRO PIC S9(7)V99.

5.4 Valores Editados

01 VALOR-EDIT PIC $$$9,999.99.

6. Comandos Básicos de COBOL

6.1 MOVE

Atribuição de valores.

MOVE 500 TO SALARIO.MOVE NOME-CLIENTE TO NOME.

6.2 ADD

Soma.

ADD 100 TO TOTAL.ADD SALARIO TO TOTAL-SALARIO.

6.3 SUBTRACT

Subtração.

SUBTRACT 50 FROM SALARIO.

6.4 MULTIPLY

Multiplicação.

MULTIPLY QUANTIDADE BY PRECO GIVING TOTAL.

6.5 DIVIDE

Divisão.

DIVIDE TOTAL BY QUANTIDADE GIVING MEDIA.

7. Controle de Fluxo

7.1 IF / ELSE

IF SALARIO > 3000   DISPLAY "Salário alto"ELSE   DISPLAY "Salário baixo"END-IF.

7.2 PERFORM (Loop)

PERFORM CALCULAR-TOTAL 10 TIMES.

Ou:

PERFORM UNTIL FIM = "S"   READ CLIENTESEND-PERFORM.

8. Leitura e Escrita de Arquivos

READ CLIENTES   AT END MOVE "S" TO FIMEND-READ.WRITE REGISTRO-CLIENTE.

9. Programação COBOL Antiga x Moderna

9.1 Estilo Antigo (anos 70–80)

IF SALARIO GREATER THAN 3000   MOVE "ALTO" TO NIVELELSE   MOVE "BAIXO" TO NIVEL.

9.2 Estilo Moderno (COBOL 2002+)

IF SALARIO > 3000   MOVE "ALTO" TO NIVELELSE   MOVE "BAIXO" TO NIVELEND-IF.

10. Onde Programar COBOL Hoje?

10.1 Mainframes

  • IBM z/OS
  • Micro Focus Enterprise Server

10.2 Ambientes Locais (PC)

  • GnuCOBOL
  • OpenCOBOL
  • Visual Studio Code + extensão COBOL

10.3 Nuvem

  • IBM Z Cloud
  • AWS Mainframe Modernization

11. Como Compilar e Rodar COBOL Hoje

11.1 GnuCOBOL (PC)

cobc -x programa.cob./programa

11.2 Mainframe

  • JCL para submissão de jobs
  • Compilador Enterprise COBOL

12. COBOL e Bancos de Dados

COBOL integra com:

  • DB2
  • Oracle
  • SQL Server

Exemplo:

EXEC SQL   SELECT SALARIO INTO :SALARIO   FROM FUNCIONARIOSEND-EXEC.

13. COBOL Orientado a Objetos

CLASS-ID. CLIENTE.METHOD-ID. MOSTRAR-NOME.   DISPLAY NOME.END METHOD.

14. COBOL e APIs

  • Web services
  • REST
  • JSON

COBOL moderno expõe APIs.


15. Erros Comuns em COBOL

  • Esquecer ponto final
  • Erros em PIC
  • Não fechar END-IF
  • Problemas em arquivos sequenciais

16. Ferramentas Modernas para COBOL

  • Micro Focus Visual COBOL
  • IBM Developer for z/OS
  • GnuCOBOL
  • VS Code

17. Mercado de Trabalho COBOL

  • Bancos
  • Seguradoras
  • Governo
  • Mainframes

Salários altos pela escassez de profissionais.


18. O Futuro do COBOL

COBOL continuará:

  • Em sistemas críticos
  • Integrado à nuvem
  • Modernizado
  • Necessitando profissionais

19. Conclusão

COBOL não é uma relíquia.

É uma engenharia perfeita para seu propósito.

Ele roda o mundo financeiro.


20. Referências e Links Externos

Sugestões para inserir no artigo:


21. Considerações Finais (Estilo MBA)

COBOL não precisa ser moderno.

Ele precisa ser confiável.

E nisso, ele é imbatível.

Deixe um comentário