Bellacosa Mainframe apresenta a linguagem de programação COBOL

O que é COBOL?

Quando falamos de:

• bancos;

• cartões;

• folha salarial;

• seguros;

• governos;

• processamento financeiro;

existe uma linguagem que continua sendo uma das mais importantes do mundo:

COBOL.

Mesmo após décadas, ela ainda movimenta:

• trilhões de dólares;

• sistemas bancários;

• pagamentos;

• processamento batch;

• grandes empresas globais.

---

O que significa COBOL?

COBOL significa:

Common Business Oriented Language

Em português:

Linguagem Orientada a Negócios.

---

Objetivo do COBOL

O COBOL foi criado para:

processamento de negócios corporativos.

Principalmente:

• registros;

• arquivos;

• relatórios;

• cálculos financeiros;

• processamento batch.

---

Origem histórica

COBOL surgiu em:

1959.

Foi criado por um comitê apoiado pelo governo americano e empresas de tecnologia.

---

Grace Hopper

Uma das figuras históricas mais importantes relacionadas ao COBOL.

Ela ajudou a popularizar:

• compiladores;

• linguagens de alto nível;

• computação corporativa.

---

Por que COBOL ficou tão famoso?

Porque ele era:

• legível;

• organizado;

• próximo da linguagem humana;

• excelente para negócios.

---

Exemplo COBOL

IF SALDO > 0
   DISPLAY 'SALDO POSITIVO'
END-IF

Muito fácil de entender.

---

O COBOL foi criado para:

• bancos;

• contabilidade;

• folha salarial;

• faturamento;

• seguros;

• processamento financeiro.

---

Como COBOL funciona no mainframe?

Principalmente em:

processamento batch.

---

Fluxo clássico COBOL

LER ARQUIVO
 ↓
VALIDAR
 ↓
CALCULAR
 ↓
ATUALIZAR
 ↓
GERAR RELATÓRIO

---

O COBOL é procedural?

Tradicionalmente:

sim.

Baseado em:

• procedimentos;

• fluxo sequencial;

• processamento estruturado.

---

Estrutura clássica de um programa COBOL

---

IDENTIFICATION DIVISION

Informações do programa.

---

ENVIRONMENT DIVISION

Ambiente e arquivos.

---

DATA DIVISION

Variáveis e layouts.

---

PROCEDURE DIVISION

Lógica do programa.

---

Exemplo simples

IDENTIFICATION DIVISION.
PROGRAM-ID. TESTE.

PROCEDURE DIVISION.
    DISPLAY 'OLA MUNDO'.
    STOP RUN.

---

O que é DISPLAY?

Comando usado para:

mostrar mensagens.

---

O que é MOVE?

Mover valores.

---

Exemplo

MOVE 100 TO SALDO

---

O que é PERFORM?

Executar rotinas.

---

Exemplo

PERFORM CALCULAR

---

O que é READ?

Ler arquivos.

---

O que é WRITE?

Gravar registros.

---

O que é COMPUTE?

Realizar cálculos.

---

COBOL trabalha muito com arquivos

Principalmente:

• QSAM;

• VSAM;

• datasets sequenciais.

---

COBOL e DB2

Muito usados juntos.

---

Exemplo SQL em COBOL

EXEC SQL
   SELECT NOME
   INTO :WS-NOME
   FROM CLIENTES
END-EXEC

---

COBOL e CICS

Usado para aplicações online.

Exemplo:

• caixas eletrônicos;

• consultas bancárias;

• sistemas transacionais.

---

COBOL batch

Executado via:

• JCL;

• JES2;

• scheduler.

---

Exemplo batch

//STEP1 EXEC PGM=COBPGM

---

O que é compilação COBOL?

Transformar código-fonte em:

executável.

---

Fluxo simplificado

COBOL SOURCE
   ↓
COMPILADOR
   ↓
LOAD MODULE
   ↓
EXECUÇÃO

---

O que é copybook?

Arquivo reutilizável com layouts.

---

Exemplo

01 CLIENTE.
   05 NOME PIC X(30).
   05 SALDO PIC 9(9)V99.

---

O que é PIC?

Define formato do campo.

---

Exemplo

PIC X(10)

Texto.

---

PIC 9(5)

Numérico.

---

O que é COMP-3?

Formato compactado numérico.

Muito usado em:

processamento financeiro.

---

O COBOL ainda é usado?

Muito.

Especialmente em:

• bancos;

• seguradoras;

• governos;

• cartões;

• sistemas críticos.

---

Por que COBOL ainda existe?

Porque ele é:

• extremamente confiável;

• estável;

• rápido;

• eficiente para batch.

---

Quantidade de código COBOL no mundo

Estima-se:

bilhões de linhas.

---

COBOL moderno

Hoje existe:

• COBOL orientado a objetos;

• APIs REST;

• integração cloud;

• DevOps;

• OpenShift;

• z/OS Connect.

---

COBOL não é “morto”

Na verdade:

continua extremamente relevante.

---

Vantagens do COBOL

---

Excelente para negócios

---

Muito estável

---

Ótimo para batch

---

Fácil leitura

---

Alta confiabilidade

---

Excelente performance em mainframe

---

Desvantagens

---

Sintaxe extensa

---

Curva inicial diferente

---

Menos popular fora do corporativo

---

Sistemas antigos podem ser complexos

---

Curiosidades incríveis

1. Grande parte das transações bancárias do mundo passa por COBOL

---

2. Muitos sistemas COBOL possuem mais de 40 anos

---

3. O COBOL sobreviveu a diversas gerações tecnológicas

---

4. Mainframes executam bilhões de linhas COBOL diariamente

---

Erros comuns de iniciantes

---

1. Achar que COBOL morreu

---

2. Confundir COBOL com linguagem “lenta”

---

3. Ignorar batch e arquivos

---

4. Não entender lógica procedural

---

Como COBOL aparece no dia a dia?

Praticamente em:

• PIX;

• cartões;

• bancos;

• folha salarial;

• faturamento;

• seguros;

• governo.

---

Exemplo simplificado real

LER CLIENTE
 ↓
VALIDAR CPF
 ↓
CALCULAR LIMITE
 ↓
ATUALIZAR DB2
 ↓
GERAR RELATÓRIO

---

Resumo rápido

Conceito	Significado
COBOL	Linguagem de negócios
Batch	Processamento em lote
CICS	Processamento online
DB2	Banco de dados
JCL	Execução batch
COPYBOOK	Layout reutilizável
COMP-3	Formato numérico

---

Conclusão

COBOL é uma das linguagens mais importantes da história da computação corporativa.

Criado para processamento de negócios, ele continua sendo fundamental no ambiente mainframe IBM Z, executando sistemas críticos de bancos, governos e grandes empresas em todo o mundo.