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