 |
| Bellacosa Mainframe em uma viagem ao centro do cpd |
☕ Um Café no Bellacosa Mainframe
Viagem ao Centro do CPD — Por que COBOL Ainda Domina as Profundezas da Terra Corporativa
🌋🦖 Júlio Verne, COBOL, bilhões de linhas, bancos, CICS, Db2, VSAM, batch e uma expedição às camadas subterrâneas da informática para descobrir por que o dinossauro simplesmente se recusa a morrer
Existe uma teoria muito difundida sobre COBOL.
Segundo ela, em algum momento dos anos 1980 alguém deveria ter desligado todos os mainframes, colocado os programas COBOL dentro de um museu e substituído tudo por alguma coisa moderna.
Primeiro:
C
Depois:
C++
Depois:
Java
Depois:
.NET
Depois:
SOA
Depois:
Cloud
Depois:
Microservices
Depois:
Serverless
Depois:
Kubernetes
Agora:
IA
COBOL ouviu todas essas previsões.
Sentado tranquilamente nas profundezas do CPD.
Processando folha de pagamento.
Compensando transações.
Atualizando contas.
Emitindo apólices.
Calculando juros.
Executando batch.
E respondendo:
DISPLAY 'AINDA ESTOU AQUI'.
Talvez estejamos procurando COBOL no lugar errado.
Para entender sua sobrevivência precisamos seguir Júlio Verne.
Não olhar para o céu.
Precisamos descer.
Muito.
Porque hoje faremos uma:
VIAGEM AO CENTRO DO CPD.
📖 Hamburgo, 1863
Em Viagem ao Centro da Terra, Júlio Verne apresenta o professor Otto Lidenbrock, mineralogista alemão que encontra um misterioso manuscrito contendo uma mensagem cifrada.
O documento indica que o explorador islandês Arne Saknussemm teria encontrado uma passagem para o interior da Terra através do vulcão Snæfellsjökull, na Islândia.
Lidenbrock decide imediatamente:
Vamos entrar.
Seu sobrinho Axel provavelmente pensa:
Talvez não.
Lidenbrock:
Vamos.
E lá vão eles.
É basicamente a mesma sensação de um jovem programador quando alguém diz:
“Precisamos fazer manutenção neste sistema COBOL de 1987.”
Ele pergunta:
— Existe documentação?
O gerente entrega um PDF de 14 páginas atualizado pela última vez em 1996.
No rodapé:
AUTOR: APARECIDO
RAMAL: 4372
Aparecido aposentou-se em 2008.
Meu jovem...
pegue sua lanterna.
Nós vamos descer.
🗺️ O mapa para o centro do CPD
Nossa expedição atravessará várias camadas:
SUPERFÍCIE
↓
APIs
↓
CICS
↓
COBOL
↓
Db2 / VSAM / IMS
↓
JCL
↓
JES2
↓
z/OS
↓
IBM Z
↓
DADOS + REGRAS DE NEGÓCIO
E talvez descubramos uma coisa perturbadora.
Aquilo que parece antigo na superfície pode estar sustentando praticamente tudo que existe acima.
🌋 CAMADA 1 — A superfície moderna
Começamos no mundo que todo mundo enxerga.
Aplicativos.
Sites.
Smartphones.
APIs.
Cloud.
Containers.
Interfaces maravilhosas.
Cliente toca:
TRANSFERIR R$ 500
Tela gira.
Bonita animação.
Confirmação biométrica.
Push notification.
Tudo parece muito moderno.
Mas agora vamos seguir aquela transação.
APP
↓
API
↓
GATEWAY
↓
SERVIÇO
↓
?
Existe uma porta.
Axel pergunta:
— Professor, o que existe ali?
Lidenbrock acende a lanterna.
Na parede está escrito:
CICS
Ah.
Agora começou a aventura.
🏦 RAZÃO 1 — COBOL mora onde o dinheiro mora
Essa talvez seja a primeira grande explicação.
COBOL não sobreviveu porque alguém sente nostalgia.
Ele sobreviveu porque foi utilizado durante décadas justamente nos sistemas que organizações não podem simplesmente desligar.
Bancos.
Seguradoras.
Governos.
Varejo.
Transportes.
Processamento financeiro.
Folhas de pagamento.
Grandes sistemas administrativos.
Quando uma aplicação controla algo secundário, substituí-la pode ser relativamente simples.
Quando ela controla:
DINHEIRO
a conversa muda.
Você não migra simplesmente:
“Vamos ver se funciona.”
Você precisa garantir:
EXATIDÃO
INTEGRIDADE
AUDITORIA
RECUPERAÇÃO
CONSISTÊNCIA
SEGURANÇA
PERFORMANCE
DISPONIBILIDADE
E existe outra coisa importantíssima:
o sistema atual já funciona.
🪨 CAMADA 2 — CICS
Descemos mais.
Uma gigantesca cidade subterrânea aparece.
Milhares de transações atravessam túneis simultaneamente.
Bem-vindo ao:
CICS
Aqui programas COBOL podem atender processamento transacional online.
TRANSACTION
↓
CICS
↓
PROGRAM
↓
DB2 / VSAM / MQ
↓
RESPONSE
Lidenbrock observa.
— Quantos anos tem isso?
Mainframeiro:
— Depende.
— Devemos substituir?
— Por quê?
Silêncio.
Essa pergunta muda tudo.
⚙️ RAZÃO 2 — Maturidade
Tecnologia madura possui uma característica pouco sexy:
sabemos como ela quebra.
Isso é extraordinariamente valioso.
Depois de décadas usando uma plataforma, conhecemos:
LIMITES
PADRÕES
ERROS
COMPORTAMENTO
FERRAMENTAS
PROCEDIMENTOS
RECUPERAÇÃO
MONITORAMENTO
Tecnologia nova frequentemente chega acompanhada de:
“Segundo a documentação...”
Tecnologia madura chega acompanhada de:
“Em 2003 aconteceu isso. Faça desta maneira.”
Experiência acumulada é infraestrutura invisível.
🦖 CAMADA 3 — Encontramos COBOL
Finalmente chegamos.
Uma enorme caverna.
Nas paredes:
IDENTIFICATION DIVISION.
Mais adiante:
DATA DIVISION.
Axel fica assustado.
— Professor...
— Sim?
— Aquilo é um dinossauro?
O animal vira lentamente a cabeça.
Na lateral está escrito:
ENTERPRISE COBOL
Lidenbrock aproxima-se.
— Achei que estivesse extinto.
O dinossauro responde:
PERFORM PROCESS-TRANSACTION
UNTIL END-OF-FILE.
Não está extinto.
Está trabalhando.
📚 RAZÃO 3 — COBOL descreve negócios muito bem
Olhe:
IF CUSTOMER-BALANCE > CREDIT-LIMIT
MOVE 'BLOCKED' TO CUSTOMER-STATUS
END-IF.
Não é poesia.
Não é compacto.
Não ganhará concurso de elegância.
Mas existe uma qualidade extraordinária:
conseguimos entender aproximadamente o que está acontecendo.
COBOL nasceu orientado ao processamento empresarial.
Registros.
Campos.
Valores decimais.
Arquivos.
Relatórios.
Regras.
Volumes.
E empresas são cheias exatamente disso.
💰 RAZÃO 4 — Decimal importa
Agora encontramos uma caverna cheia de moedas.
Lidenbrock pega uma.
Mainframeiro grita:
— NÃO TOQUE NO COMP-3!
COBOL possui excelente tradição no tratamento de dados decimais empresariais.
Imagine:
01 WS-BALANCE PIC S9(11)V99 COMP-3.
Bancos gostam de uma coisa chamada:
dinheiro exato.
Dinheiro não aprecia:
0.1 + 0.2 = 0.30000000000000004
Quando você processa milhões ou bilhões de operações financeiras, representação e aritmética decimal importam enormemente.
COBOL cresceu nesse universo.
🗄️ CAMADA 4 — Db2, VSAM e IMS
Descemos mais.
Encontramos três criaturas ancestrais guardando enormes cofres.
Db2
VSAM
IMS
Axel:
— Quanto dado existe aqui?
Lidenbrock:
— Não pergunte.
Mainframeiro:
— Principalmente não execute SELECT sem WHERE.
Agora percebemos outra razão da longevidade.
🧠 RAZÃO 5 — O código contém conhecimento empresarial
Imagine um programa criado em 1989.
Durante 37 anos recebeu alterações.
1991 — nova regra tributária
1994 — novo produto
1998 — alteração monetária
2002 — novo cliente
2007 — nova regulamentação
2012 — fusão
2018 — nova regra
2021 — exceção
2026 — API
Agora aquele programa não contém apenas código.
Ele contém:
HISTÓRIA DA EMPRESA.
E frequentemente parte dessa história não existe em outro lugar.
A documentação diz:
“Calcular tarifa conforme regra comercial.”
O COBOL possui 3.800 linhas explicando o que “conforme regra comercial” realmente significa.
🏺 Código como arqueologia
Isso transforma manutenção COBOL em arqueologia empresarial.
Você encontra:
IF CUSTOMER-TYPE = '7'
AND REGION = '03'
AND CONTRACT-DATE < 19980701
MOVE ZERO TO WS-FEE
END-IF.
Pergunta:
— Por quê?
Silêncio.
Git não existia.
O autor aposentou-se.
Documento desapareceu.
Mas existe uma certeza:
alguém colocou aquilo ali por algum motivo.
Talvez uma lei.
Talvez contrato.
Talvez decisão judicial.
Talvez promoção.
Talvez gambiarra.
Apague e descubra.
Em produção.
💀 A maldição de Saknussemm
Na parede encontramos uma inscrição:
* DO NOT REMOVE
Sem explicação.
Axel:
— Podemos remover?
Lidenbrock:
— Não.
— Por quê?
— Porque alguém escreveu DO NOT REMOVE.
— Mas quem?
— Saknussemm.
Nunca desafie Saknussemm.
💵 RAZÃO 6 — Reescrever custa dinheiro
Agora chegamos a uma gigantesca montanha.
No topo:
LEGACY MODERNIZATION PROJECT
Consultor:
— Vamos reescrever tudo.
Diretor:
— Quanto custa?
Consultor:
— Sim.
Existe uma fantasia recorrente:
COBOL
↓
REWRITE
↓
MODERNO
Parece simples.
Mas programas representam décadas de requisitos.
Então você precisa reproduzir:
REGRAS
INTERFACES
ARQUIVOS
TRANSAÇÕES
EXCEÇÕES
PERFORMANCE
SEGURANÇA
AUDITORIA
RECOVERY
BATCH WINDOWS
DEPENDÊNCIAS
E provar que o novo sistema produz resultados equivalentes.
⚠️ RAZÃO 7 — Risco de migração
Imagine um sistema processando:
10.000.000 transações/dia
Novo sistema funciona corretamente em:
99,99%
Parece excelente.
Até perceber que:
0,01%
de dez milhões são:
1.000 transações.
Por dia.
Agora coloque dinheiro envolvido.
Subitamente quatro noves não parecem tão românticos.
🚂 CAMADA 5 — Batch
Escutamos um ruído.
CLACK
CLACK
CLACK
Não é trem.
É batch.
JES2 recebe milhares de JOBs.
INPUT
↓
EXECUTION
↓
OUTPUT
Durante décadas empresas construíram gigantescas cadeias:
JOB001
↓
JOB002
↓
JOB003
↓
SORT
↓
JOB004
↓
DB2 LOAD
↓
JOB005
↓
REPORT
Essa engrenagem pode parecer antiga.
Mas processa volumes enormes de maneira previsível.
⏱️ RAZÃO 8 — Throughput
Existe uma diferença entre:
atender uma requisição.
e:
processar 300 milhões de registros durante uma janela operacional.
COBOL e mainframe cresceram profundamente ligados ao segundo problema.
Batch não morreu.
Porque o problema batch não morreu.
Empresas continuam precisando:
FECHAR DIA
CALCULAR JUROS
PROCESSAR FATURAS
CONSOLIDAR CONTAS
GERAR RELATÓRIOS
PROCESSAR PAGAMENTOS
Às 02:00 ninguém precisa de uma interface React maravilhosa.
Precisa:
JOB ENDED - RC 0000
⚡ RAZÃO 9 — Performance não é apenas benchmark
Uma aplicação crítica não vive sozinha.
Ela compartilha máquina.
CPU.
Memória.
I/O.
Storage.
Banco.
Locks.
Filas.
Threads.
Mainframe desenvolveu durante décadas mecanismos sofisticados para administrar cargas enormes e concorrentes.
COBOL tornou-se parte natural desse ecossistema.
O valor está no conjunto:
COBOL
+
z/OS
+
CICS
+
Db2
+
JES2
+
WLM
+
RACF
+
STORAGE
Não apenas na linguagem isoladamente.
🛡️ CAMADA 6 — RACF
Descemos.
Porta gigantesca.
Guardião pergunta:
USERID?
Axel entrega.
ICH408I
Acesso negado.
Lidenbrock:
— Somos exploradores científicos!
RACF:
NOT AUTHORIZED.
Finalmente encontramos alguém no romance que possui bom senso.
🔐 RAZÃO 10 — Segurança e governança
Ambientes mainframe corporativos cresceram cercados por controles rigorosos.
Autenticação.
Autorização.
Auditoria.
Segregação.
Perfis.
Recursos.
Logs.
Isso não significa:
“mainframe é magicamente invulnerável.”
Não existe isso.
Significa que existe um ecossistema maduro de controle e operação.
E trocar um sistema não significa apenas trocar linguagem.
Significa reconstruir todo esse contexto.
🔥 CAMADA 7 — O núcleo: confiabilidade
Estamos próximos do centro.
A temperatura aumenta.
Na parede:
UPTIME
Lidenbrock finalmente entende.
O verdadeiro segredo não é COBOL sozinho.
É aquilo que organizações construíram ao redor dele.
Décadas de:
OPERAÇÃO
MONITORAMENTO
BACKUP
RECOVERY
CHANGE MANAGEMENT
CAPACITY PLANNING
SEGURANÇA
PROCEDIMENTOS
AUTOMAÇÃO
A aplicação COBOL está inserida numa máquina organizacional gigantesca.
🧱 RAZÃO 11 — Se funciona, substituir precisa ter motivo
Essa é talvez a mais desconfortável.
Tecnólogos adoram novidade.
Empresas adoram:
resultado.
Imagine:
Sistema A:
IDADE: 35 anos
ESTÁVEL: SIM
CONHECIDO: SIM
PERFORMANCE: BOA
AUDITADO: SIM
Sistema B:
IDADE: 0
ARQUITETURA: LINDA
POWERPOINT: EXTRAORDINÁRIO
RISCO: ???
Qual você coloca para processar bilhões?
Resposta:
depende do problema.
E justamente esse “depende” explica grande parte da longevidade do COBOL.
👴 RAZÃO 12 — Código antigo não significa código ruim
Essa confusão precisa morrer.
VELHO ≠ RUIM
Um algoritmo correto não expira porque completou 30 anos.
Se:
INPUT
continua válido,
a regra continua válida,
e:
OUTPUT
continua correto,
o programa não acorda no aniversário de 25 anos e pensa:
“Agora sou legado.”
Software não envelhece como leite.
O ambiente ao redor muda.
Requisitos mudam.
Pessoas mudam.
Riscos mudam.
Mas lógica correta pode continuar correta.
🌉 RAZÃO 13 — COBOL aprendeu a conversar com o mundo novo
Aqui nossa expedição encontra algo inesperado.
Uma fibra óptica.
Seguimos.
Ela chega até:
API
COBOL moderno não precisa viver isolado.
Podemos ter:
MOBILE
↓
REST
↓
z/OS CONNECT
↓
CICS
↓
COBOL
↓
DB2
Ou integração através de:
MQ
APIs
EVENTOS
JAVA
USS
O sistema de 30 anos pode participar de uma arquitetura moderna sem necessariamente ser destruído.
🔧 RAZÃO 14 — Ferramentas também evoluíram
A caricatura:
TELA VERDE
+
PROGRAMADOR DE 97 ANOS
+
CARTÃO PERFURADO
é divertida.
Mas incompleta.
Hoje podemos trabalhar com:
VS Code
Git
CI/CD
Zowe
ZUnit
DBB
Jenkins
GitHub
GitLab
Ansible
APIs
O código pode ser antigo.
O processo não precisa ser.
🤖 RAZÃO 15 — Agora chegou a IA
Nossa expedição encontra a criatura mais nova da caverna.
IA generativa.
Ela olha para milhões de linhas COBOL.
COBOL olha para ela.
Silêncio constrangedor.
Então alguém pergunta:
“Explique este programa.”
E ocorre algo interessante.
IA pode ajudar com:
COMPREENSÃO
DOCUMENTAÇÃO
TESTES
ANÁLISE
REFACTORING
MIGRAÇÃO
IMPACT ANALYSIS
Um dos grandes problemas históricos do legado — compreender código antigo — pode ser justamente uma das áreas onde IA oferece enorme potencial.
Ironia maravilhosa.
A tecnologia mais nova ajudando a preservar e modernizar uma das linguagens comerciais mais antigas.
🧠 RAZÃO 16 — O problema não é COBOL; é conhecimento
Empresas frequentemente dizem:
“Não encontramos COBOLzeiros.”
Existe verdade nisso em vários mercados.
Mas existe outra pergunta:
quantos desenvolvedores realmente conhecem as regras daquele sistema?
Você pode converter:
IF A = B
PERFORM C
END-IF
para Java em cinco minutos.
O difícil é descobrir:
por que C precisa acontecer quando A = B.
Linguagem pode ser convertida.
Conhecimento de domínio precisa ser compreendido.
Essa é outra espécie de problema.
🌋 Encontramos o centro do CPD
Depois de dias descendo, Lidenbrock finalmente chega ao grande salão subterrâneo.
Esperávamos encontrar:
COBOL
no centro.
Não encontramos.
Encontramos algo muito maior.
Escrito na parede:
REGRAS DE NEGÓCIO
Agora tudo faz sentido.
COBOL não domina determinadas organizações simplesmente porque seja velho.
Nem porque alguém esqueceu de desligá-lo.
Ele permanece porque durante décadas empresas depositaram dentro desses sistemas:
PROCESSOS
CONTRATOS
REGRAS
EXCEÇÕES
HISTÓRIA
DINHEIRO
CONHECIMENTO
COBOL tornou-se uma espécie de rocha sedimentar empresarial.
Cada década colocou uma camada.
🪨 Arqueologia do software
2026 ─ APIs / IA / DevOps
2020 ─ Modernização
2010 ─ Serviços
2000 ─ Internet
1990 ─ Client/server
1980 ─ Expansões
1970 ─ Regras históricas
1960 ─ Fundação
No centro:
NEGÓCIO
É por isso que simplesmente arrancar COBOL pode ser equivalente a entrar numa escavação arqueológica com uma retroescavadeira.
Você certamente terminará rápido.
O problema é descobrir o que destruiu.
💡 Então COBOL é eterno?
Não.
Nenhuma tecnologia é.
COBOL pode ser substituído quando existir:
MOTIVO
+
BUSINESS CASE
+
ARQUITETURA
+
TESTES
+
MIGRAÇÃO
+
CONTROLE DE RISCO
Existem sistemas que deveriam ser aposentados.
Existem programas ruins.
Existem arquiteturas horríveis.
Existe dívida técnica.
Existe código que ninguém deveria defender apenas por nostalgia.
A questão não é:
“COBOL deve permanecer para sempre?”
A pergunta correta é:
“Qual problema estamos tentando resolver substituindo-o?”
Essa pergunta economiza milhões.
🦖 O dinossauro não venceu por ser dinossauro
Ele venceu porque continuou adaptando-se.
Padrões evoluíram.
Compiladores evoluíram.
Hardware evoluiu.
Integrações evoluíram.
Ferramentas evoluíram.
Processos evoluíram.
O COBOL de hoje não está rodando numa máquina de 1959.
Assim como Java moderno não está rodando num PC de 1995.
Confundir idade da linguagem com idade da plataforma é uma comparação intelectualmente preguiçosa.
🚀 A saída do vulcão
No romance de Verne, nossos exploradores eventualmente encontram uma saída espetacular através de atividade vulcânica.
Nossa equipe também sobe.
Passamos novamente por:
z/OS
JES2
JCL
Db2
VSAM
COBOL
CICS
APIs
Até retornar à superfície.
Smartphone na mão.
Aplicativo bancário aberto.
Axel faz uma transferência.
R$ 100,00
Confirma.
Um segundo depois:
TRANSFERÊNCIA REALIZADA.
Ele olha para Lidenbrock.
— Professor...
— Sim?
— Aquilo passou pela caverna?
O professor sorri.
Talvez.
☕ As 16 razões encontradas na expedição
Depois de nossa viagem, o diário registra:
COBOL está profundamente ligado a sistemas críticos.
Possui décadas de maturidade operacional.
Expressa regras empresariais de maneira clara.
Trabalha naturalmente com processamento decimal.
Sistemas COBOL acumulam conhecimento de negócio.
Reescritas completas podem custar fortunas.
Migrações de sistemas críticos carregam riscos enormes.
Batch continua sendo essencial.
O ecossistema mainframe oferece enorme capacidade de processamento.
Segurança e governança são maduras.
Sistemas estáveis precisam de motivo econômico para serem substituídos.
Código antigo não é automaticamente código ruim.
COBOL pode integrar-se com APIs e arquiteturas modernas.
Desenvolvimento COBOL pode utilizar ferramentas modernas.
IA pode acelerar compreensão, teste e modernização.
O ativo principal frequentemente não é o código — é o conhecimento empresarial nele acumulado.
E existe uma décima sétima razão não oficial:
porque ele ainda entrega o JOB.
☕ Epílogo — O manuscrito perdido
De volta ao escritório, Lidenbrock abre novamente o antigo manuscrito de Saknussemm.
Percebe algo estranho.
Não era islandês antigo.
Não era latim.
Era:
IDENTIFICATION DIVISION.
PROGRAM-ID. CENTER-OF-EARTH.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 WS-COBOL-STATUS PIC X(08)
VALUE 'ALIVE'.
PROCEDURE DIVISION.
PERFORM PROCESS-BUSINESS
UNTIL END-OF-WORLD.
STOP RUN.
Axel observa.
— Professor, existe um erro.
— Onde?
— END-OF-WORLD ainda não aconteceu.
Lidenbrock pensa.
Ao longe, nas profundezas do CPD, escutamos JES2 trabalhando.
$HASP373 BILLING STARTED
CICS continua recebendo transações.
Db2 continua fazendo COMMIT.
COBOL continua processando.
O professor fecha o livro.
Serve outra xícara de café.
E escreve no diário da expedição:
“Não encontramos COBOL enterrado no passado. Encontramos o presente construído sobre ele.”
Lá embaixo, o dinossauro olha para o próximo registro.
READ INPUT-FILE
Processa.
WRITE OUTPUT-RECORD
E segue adiante.
Sem hype.
Sem keynote.
Sem pedir desculpas pela idade.
Apenas fazendo aquilo que faz há décadas:
movendo o mundo enquanto quase ninguém percebe.
🌋🦖☕💾
JOBNAME: EARTHJOB
PROGRAM: COBOL
STATUS : RUNNING
Próxima parada: o centro do negócio.
https://eljefemidnightlunch.blogspot.com/2007/02/o-que-e-cobol.html
https://eljefemidnightlunch.blogspot.com/2025/07/homenagem-incrivel-grace.html
https://eljefemidnightlunch.blogspot.com/2026/06/padawan-testar-cobol-nao-e-desconfiar.html
Por que o COBOL continua a dominar o Processamento de Dados no Mundo dos Negócios?
Uma linguagem orientada a negócios precisa declarar, gerenciar e manipular dados heterogêneos. Programas de negócios misturam strings de comprimento fixo e variável, dados de ponto flutuante, inteiros e decimais com abandono selvagem em estruturas de registro complicadas, geralmente com partes variáveis. Os programadores de banco de dados estão familiarizados com alguns desses problemas, e ferramentas de mapeamento objeto-relacional tropeçam nessas complexidades regularmente.
