 |
| Bellacosa Mainframe e um processo de migracao e evolucao do legado |
☕ Um Café no Bellacosa Mainframe
Stargate no CPD — O Dia em que o COBOL de Quarenta Anos Atravessou o Portal e Voltou como API REST
Ou: como uma multinacional industrial trocou z/VSE por z/OS, aposentou um mensageiro criado nos anos 1990, abriu um wormhole até a nuvem e descobriu que o programa mais antigo da casa não precisava morrer — apenas de alguém que falasse JSON sem provocar SOC7
Prólogo — General Hammond, temos um portal no CPD
O alarme tocou às 02h17.
Não era invasão Goa'uld, queda de energia nem estagiário executando DELETE sem WHERE. No centro do CPD de uma grande multinacional industrial — que chamaremos de Companhia Pégaso, porque advogados também possuem zat'nik'tel — um programa COBOL escrito décadas antes acabava de responder a uma chamada REST originada na nuvem.
Na sala de controle, o general Hammond olhou para o monitor. Samantha Carter examinava a telemetria. Daniel Jackson tentava traduzir um copybook. Jack O'Neill segurava uma caneca de café e perguntava se COMP-3 era algum tipo de explosivo alienígena. Teal'c observou o tempo de resposta e pronunciou apenas:
— Indeed.
Para quem via de fora, parecia magia: um programa COBOL com quase quarenta anos havia virado uma API em minutos.
Mas não houve magia. Houve aproximadamente seis anos de preparação, milhares de módulos migrados, centenas de interfaces revistas, ambientes paralelos, testes, mensageria, CICS, Db2, IMS, VSAM, JCL, segurança e uma quantidade de café que provavelmente deveria aparecer no balanço patrimonial.
Esta é a primeira lição para o padawan COBOL: a API nasceu em minutos, mas a pista de lançamento levou anos para ficar pronta.
Vamos atravessar esse Stargate passo a passo.
1. As coordenadas do planeta P3X-COBOL
A Companhia Pégaso mantinha no Brasil um ambiente mainframe construído e ampliado durante mais de quarenta anos. Não era uma máquina esquecida atrás de uma porta. Era uma cidade viva.
Nesse ambiente existiam, em números aproximados:
Mais de 15 mil módulos;
Milhares de programas COBOL, Assembler, BMS e RPG;
Milhares de usuários CICS;
Mais de 1.500 transações online;
Aproximadamente 1.700 jobs batch;
Mais de mil arquivos VSAM;
Mais de uma centena de tabelas Db2;
Mais de uma dezena de bases IMS/DL/I;
Centenas de integrações com aplicações internas e externas.
Durante décadas, tudo isso executou sobre z/VSE. O sistema cumpriu sua missão, mas a empresa precisava de uma plataforma com um ecossistema moderno mais amplo, maior padronização operacional e novas opções de integração.
A jornada ocorreu em quatro chevrons:
| Chevron | Movimento | Resultado |
|---|---|---|
| 1 | z/VSE para z/OS | Nova fundação operacional |
| 2 | Middleware proprietário para IBM MQ | Integração padronizada e desacoplada |
| 3 | MQ Request/Reply entre nuvem e CICS | Arquitetura híbrida em produção |
| 4 | z/OS Connect diante do COBOL | APIs REST sem reescrever a regra central |
Um Stargate não abre com apenas um símbolo. Da mesma forma, o z/OS Connect sozinho não moderniza uma organização. Ele funciona melhor quando ambiente, aplicações, segurança, operação e integração já foram preparados.
2. Primeiro chevron — migrar z/VSE para z/OS sem desligar a galáxia
Para um iniciante, z/VSE e z/OS podem parecer apenas dois sistemas operacionais do IBM Z. Seria tentador imaginar a migração como copiar fontes, recompilar e trocar o nome de algumas bibliotecas.
Essa visão dura até o primeiro JCL falhar às três da manhã.
Embora os ambientes compartilhem arquitetura IBM Z, conceitos de processamento batch, EBCDIC, COBOL, CICS e VSAM, cada plataforma possui sua própria organização operacional. Uma migração dessa escala exige descobrir como quarenta anos de componentes dependem uns dos outros.
O trabalho normalmente envolve:
Inventariar fontes, load modules, copybooks, mapas, procedures e bibliotecas;
Identificar programas ainda utilizados e cadáveres digitais mantidos por superstição;
Recompilar COBOL, Assembler e outras linguagens com novos compiladores;
Ajustar JCL, utilitários, SORT, steps e códigos de retorno;
Recriar definições CICS e conexões;
Migrar catálogos e arquivos VSAM;
Transportar tabelas Db2 e bases IMS;
Rever schedulers, calendários, predecessores e sucessores;
Validar segurança, identidades e autorizações;
Testar online, batch, arquivos, integrações e fechamentos financeiros;
Preparar cutover, contingência e rollback.
Curiosidade: módulo não é necessariamente programa
Quando uma apresentação afirma que foram migrados mais de 15 mil módulos, isso não significa que existiam 15 mil programas COBOL independentes. O universo pode incluir executáveis, subprogramas, mapas, objetos, componentes Assembler, rotinas, controles e outros artefatos implantáveis.
É por isso que outro número pode indicar “apenas” alguns milhares de programas. As duas contagens podem estar corretas: uma mede objetos migrados; a outra mede fontes ou programas de determinadas linguagens.
Como se consegue zero downtime?
“Zero downtime” não significa que ninguém reiniciou um subsistema durante seis anos. Significa, em geral, que o corte produtivo ocorreu sem indisponibilidade perceptível para o negócio.
Para isso, uma equipe madura utiliza:
Ambientes antigos e novos coexistindo;
Pontes temporárias entre as duas plataformas;
Ensaios completos de migração;
UAT com usuários reais;
Congelamento controlado de mudanças;
Sincronização ou cópia final dos dados;
Plano minuto a minuto para o go-live;
Critérios objetivos para abortar ou prosseguir;
Equipe de hypercare após a ativação.
Em Stargate, ninguém disca um planeta desconhecido e manda o general Hammond atravessar primeiro. No mainframe, ninguém deveria mover a folha de pagamento antes de ensaiar o retorno.
3. Segundo chevron — o velho mensageiro MGATE encontra IBM MQ
A Companhia Pégaso possuía uma solução própria de comunicação criada nos anos 1990. Vamos chamá-la de PEGCOM. Ela era robusta e havia sustentado integrações críticas durante décadas.
Uma solução não sobrevive trinta anos sendo inútil. O problema era outro: conhecimento concentrado, protocolo particular, ferramentas próprias e dificuldade crescente para conectar aplicações modernas.
O PEGCOM foi substituído gradualmente por IBM MQ em quase duzentas integrações, envolvendo mais de uma dezena de aplicações, dezenas de filas e centenas de alterações em COBOL online, batch e JCL.
MQ explicado com café
Sem mensageria, o programa A liga diretamente para o programa B:
— Preciso desta operação agora. Vou ficar parado até você responder.
Com MQ, o programa A deposita uma mensagem numa fila:
— Aqui está o pedido. O responsável pode processá-lo quando estiver disponível.
MQ funciona como um correio empresarial com recibo, persistência, transação e controle de entrega.
Os benefícios principais são:
Desacoplamento: produtor e consumidor não precisam conhecer toda a implementação um do outro;
Resiliência: a mensagem pode aguardar durante uma indisponibilidade temporária;
Absorção de picos: a fila amortece diferenças de velocidade;
Escalabilidade: vários consumidores podem processar trabalho;
Rastreabilidade: descritores e identificadores ajudam a acompanhar cada mensagem;
Persistência: mensagens importantes podem sobreviver a reinicializações.
Mas atenção: dizer “entrega garantida” não significa que o negócio será executado exatamente uma vez em qualquer circunstância. Se o consumidor atualizar o Db2, perder a conexão antes da confirmação e receber novamente o pedido, poderá duplicar uma operação. MQ protege a mensagem; idempotência protege o negócio.
Dica de ouro
Para pagamentos, faturamento, estoque ou limite de crédito, inclua uma chave funcional única, como REQUEST-ID. Antes de executar a alteração, consulte se aquele pedido já foi processado. Repetições técnicas não devem produzir débitos duplicados.
4. Terceiro chevron — Azure chama o CICS por MQ Request/Reply
Depois de padronizar a mensageria, a empresa conectou aplicações na nuvem ao mainframe por meio do padrão Request/Reply.
O fluxo funciona assim:
Uma aplicação web recebe uma solicitação;
Cria o JSON de negócio;
Executa
MQPUTna fila de requisições;O MQ sinaliza a existência de trabalho;
Uma transação CICS é iniciada;
Um router executa
MQGET;O router descobre qual serviço chamar;
O JSON é convertido para um layout COBOL;
A subrotina de negócio é executada;
O resultado volta a ser JSON;
A resposta é colocada na reply queue;
A aplicação cloud localiza a resposta correta pelo identificador de correlação.
O MsgId e o CorrelId
Cada mensagem MQ possui um descritor chamado MQMD. Nele estão campos como tipo, persistência, prioridade, MsgId, CorrelId e reply queue.
Normalmente, o produtor deixa o MsgId como MQMI_NONE e permite que o queue manager gere um identificador único. Depois do MQPUT, a aplicação guarda esse valor.
Na resposta, aplica-se a regra:
CORRELID-DA-RESPOSTA = MSGID-DA-REQUISIÇÃOAssim, se cem solicitações estiverem usando a mesma reply queue, cada consumidor poderá encontrar sua própria resposta.
Cuidado com a pesquisa seletiva
Executar MQGET procurando determinado CorrelId pode exigir que o MQ examine mensagens até localizar a desejada. Em filas movimentadas no z/OS, deve-se estudar INDXTYPE(CORRELID) ou outro desenho de filas.
Sem índice, a reply queue pode se transformar numa gaveta com dez mil cartas, e o carteiro precisa ler envelope por envelope.
O trigger não carrega a mensagem de negócio
Outro detalhe frequentemente simplificado: o trigger do MQ não entrega diretamente o JSON ao COBOL.
O queue manager coloca uma mensagem de trigger numa initiation queue. No CICS, um trigger monitor como o CKTI lê esse aviso e inicia a transação configurada. A transação então executa MQGET na fila onde está a mensagem real.
Existem modalidades como:
EVERY: sinalização para cada mensagem;FIRST: quando a profundidade passa de zero para um;DEPTH: quando a fila alcança determinada profundidade.
O trigger é a sirene da base. A mensagem de negócio é o viajante esperando na rampa do Stargate.
5. O tradutor de Daniel Jackson — JSON encontra o copybook
O COBOL tradicional não trabalha naturalmente com este objeto:
{
"customerId": "000012345678",
"amount": 125000.50
}Ele prefere algo parecido com:
01 LK-CREDIT-AREA.
05 LK-OPERATION PIC X.
05 LK-CUSTOMER-ID PIC X(12).
05 LK-AMOUNT PIC S9(9)V99 COMP-3.
05 LK-RETURN-CODE PIC 9(2).
05 LK-APPROVED-LIMIT PIC S9(9)V99 COMP-3.
05 LK-MESSAGE PIC X(80).O CICS oferece mecanismos como:
EXEC CICS TRANSFORM JSONTODATA
CHANNEL(WS-CHANNEL)
INCONTAINER(WS-JSON-IN)
OUTCONTAINER(WS-COBOL-DATA)
TRANSFORMER(WS-TRANSFORMER)
END-EXEC.E, no retorno:
EXEC CICS TRANSFORM DATATOJSON
CHANNEL(WS-CHANNEL)
INCONTAINER(WS-COBOL-DATA)
OUTCONTAINER(WS-JSON-OUT)
TRANSFORMER(WS-TRANSFORMER)
END-EXEC.Isso não significa que não exista parsing. Significa que o programador não precisa criar um parser manual, movendo caractere por caractere e rezando para ninguém enviar uma chave fora de ordem.
A transformação depende de binding, schema e recurso JSONTRANSFRM. O verdadeiro tradutor não é Daniel Jackson: é o metadado corretamente gerado e implantado.
6. Quarto chevron — z/OS Connect abre o wormhole REST
Com a arquitetura MQ funcionando, surgiu a pergunta:
Podemos oferecer a mesma subrotina COBOL diretamente como uma API REST?
Sim. É aqui que entra o IBM z/OS Connect.
No cenário de API provider, ele fica entre o consumidor REST e o ativo do z/OS:
Aplicação → API Gateway → z/OS Connect → CICS → Subrotina COBOL
Aplicação ← JSON/HTTP ← z/OS Connect ← COMMAREA ← ResultadoSeu trabalho inclui:
Receber HTTPS e JSON;
Aplicar autenticação e autorização configuradas;
Interpretar o contrato OpenAPI;
Mapear request para COMMAREA;
Invocar o ativo CICS por IPIC;
Receber a resposta binária;
Mapear campos para JSON;
Converter códigos internos em respostas HTTP.
O COBOL não virou REST
Esta distinção merece moldura:
O programa COBOL continua sendo COBOL. O z/OS Connect é que aprendeu a falar REST de um lado e COMMAREA do outro.
É como o Stargate: a equipe não se transforma em onda de rádio por decisão própria. O portal realiza a conversão necessária para transportá-la.
7. Passo a passo — expondo uma subrotina COBOL adequada
Suponha que exista uma subrotina CICS chamada CRDTCHECK, responsável por avaliar um limite.
Passo 1 — confirmar se ela é uma boa candidata
Pergunte:
Possui entrada e saída claras?
Executa rapidamente?
Tem códigos de retorno conhecidos?
Pode ser chamada sem tela 3270?
Não depende de estado escondido entre telas?
É reentrante ou segura para chamadas concorrentes?
A operação pode ser tornada idempotente?
O impacto em Db2, VSAM ou IMS é conhecido?
Se metade das respostas for “não sei”, a primeira etapa não é publicar a API. É estudar o programa.
Passo 2 — desenhar a API pelo negócio
Evite isto:
POST /execute/CRDTCHECKPrefira algo como:
POST /finance/v1/credit-decisionsO consumidor quer uma decisão de crédito. Ele não deveria conhecer nome de load module, transação CICS ou copybook.
Passo 3 — escrever o OpenAPI
Defina:
Caminho;
Método HTTP;
Campos obrigatórios;
Tipos e tamanhos;
Exemplos;
Respostas possíveis;
Modelo padronizado de erro;
Regras de autenticação.
Passo 4 — registrar o ativo CICS
Configure a conexão IPIC e descreva o programa, transação, COMMAREA e copybook utilizados.
Passo 5 — mapear request e response
Associe, por exemplo:
customerId → LK-CUSTOMER-ID
amount → LK-AMOUNTNo retorno:
LK-APPROVED-LIMIT → approvedLimit
LK-MESSAGE → messagePasso 6 — traduzir retorno COBOL para HTTP
| Retorno do legado | Semântica REST possível |
|---|---|
| Sucesso | 200 OK |
| Cadastro inexistente | 404 Not Found |
| Regra de negócio rejeitada | 422 Unprocessable Content |
| Solicitação duplicada | 409 Conflict |
| Falha inesperada | 500 Internal Server Error |
| Dependência indisponível | 503 Service Unavailable |
Nunca devolva 200 OK com "errorCode": 9999 para tudo. Isso faz o HTTP participar da reunião sem direito a opinar.
Passo 7 — testar
Teste pelo menos:
Caminho feliz;
Campo obrigatório ausente;
Valor fora do limite;
Caracteres e code pages;
Decimal
COMP-3;Timeout;
CICS indisponível;
Db2 indisponível;
Chamada duplicada;
Volume concorrente;
Autorização negada;
Alteração de versão do copybook.
Passo 8 — implantar com governança
Promova os artefatos por desenvolvimento, teste, homologação e produção. Versione OpenAPI, mappings e configuração junto do código. O clique no Designer não substitui Git, pipeline, aprovação e trilha de auditoria.
8. “Zero Code Rewrite” — verdade ou propaganda Goa'uld?
Pode ser verdade que nenhuma linha da subrotina central tenha sido alterada.
Mas alguém ainda precisou criar ou configurar:
OpenAPI;
Mapeamentos;
Conexão CICS;
Servidor z/OS Connect;
Certificados;
Segurança;
Regras de status HTTP;
Gateway;
Monitoração;
Pipeline;
Testes;
Documentação.
Portanto:
Zero reescrita da regra de negócio não significa zero trabalho.
Isso não diminui a conquista. Preservar uma regra confiável e mudar apenas sua forma de acesso é uma estratégia de redução de risco.
Os Goa'uld se apresentam como deuses. A frase “zero esforço” também. Ambos merecem investigação.
9. “API em minutos” — onde está o truque?
Depois que a fábrica de APIs está pronta, um ativo simples pode realmente ser mapeado e implantado rapidamente.
O que pode levar minutos ou horas:
Importar o copybook;
Definir o ativo;
Mapear campos;
Associar respostas;
Gerar o projeto;
Fazer deploy em ambiente preparado.
O que normalmente não leva minutos:
Descobrir o que um programa antigo realmente faz;
Desenhar um contrato público estável;
Classificar dados sensíveis;
Criar testes de regressão;
Avaliar capacidade;
Configurar segurança;
Obter aprovação produtiva;
Testar alta disponibilidade e recuperação.
A frase honesta seria:
Depois de anos preparando plataforma e integração, uma subrotina previamente adequada pode ganhar uma interface REST em minutos sem reescrever sua lógica.
Ainda é fantástico. Apenas não foi encontrado dentro de uma pirâmide por um arqueólogo com chapéu.
10. Todo COBOL é uma API esperando para nascer?
Todo programa pode ser analisado. Nem todo programa deve ser exposto.
Bons candidatos
Subrotina de negócio com interface clara;
Consulta curta;
Atualização transacional pequena;
Copybook estável;
Retornos documentados;
Ausência de dependência de terminal;
Execução previsível;
Controle de duplicidade.
Maus candidatos diretos
Programa conversacional dependente de várias telas;
Batch de horas;
Varredura completa de arquivo;
Programa que mistura apresentação, negócio e acesso a dados;
Código que mantém estado global inseguro;
Rotina que prende locks por muito tempo;
Programa cujo contrato ninguém compreende.
Um batch longo ainda pode ser acionado por API, mas o padrão deveria ser assíncrono:
POST /reports
→ 202 Accepted
→ operationId
→ GET /operations/{id}Não mantenha uma thread HTTP esperando um fechamento mensal terminar. Nem o Stargate fica aberto indefinidamente sem consumir energia suficiente para irritar o setor financeiro.
11. REST e MQ: Carter e O'Neill, não inimigos
REST e MQ atendem necessidades diferentes.
| REST com z/OS Connect | MQ |
|---|---|
| Ótimo para consultas interativas | Ótimo para desacoplamento |
| Modelo síncrono natural | Modelo assíncrono natural |
| Fácil para web e mobile | Excelente para integração crítica |
| Resposta imediata | Suporta espera persistente |
| Sensível a timeout | Absorve indisponibilidade temporária |
| Governado por contrato OpenAPI | Governado por filas e contratos de mensagem |
Exemplos:
Consultar situação de uma fatura: REST;
Receber lote de documentos: MQ;
Consultar limite disponível: REST;
Propagar evento de pagamento: MQ;
Solicitar relatório demorado: REST retornando
202, seguido de processamento assíncrono.
A grande qualidade do caso Pégaso é não duplicar a regra. O adapter MQ e o adapter REST chegam à mesma subrotina central.
Isso é arquitetura de portas e adaptadores: o negócio permanece no núcleo; protocolos vivem nas bordas.
12. A Dead Letter Queue não é o porão do SGC
É comum dizer: “Se der erro, mande para a DLQ”. A frase parece organizada até a DLQ acumular milhares de mensagens que ninguém entende.
A Dead Letter Queue é especialmente apropriada para mensagens que não puderam ser entregues ao destino correto. Erros funcionais e mensagens venenosas merecem destinos mais específicos:
APP.BACKOUT: processamento sofreu rollback repetidas vezes;APP.INVALID: conteúdo inválido;APP.ROUTING.ERROR: serviço desconhecido;APP.RETRY: falha temporária;DLQ: falha de entrega ou roteamento do middleware.
Defina:
BOTHRESH;BOQNAME;Número máximo de tentativas;
Alerta por profundidade;
Responsável pela fila;
Procedimento de correção;
Forma segura de replay;
Proteção contra duplicidade.
Fila de erro sem dono é apenas um arquivo morto com marketing melhor.
13. Segurança — fechar a íris do Stargate
No SGC, o Stargate possui uma íris porque abrir um portal para qualquer origem seria uma ideia ruim. APIs corporativas precisam do equivalente digital.
O API Gateway pode cuidar de:
OAuth e OIDC;
Validação de tokens;
Rate limiting;
Quotas;
Catálogo e assinatura;
Políticas de tráfego;
Proteção contra abuso.
O z/OS Connect pode autenticar a solicitação, aplicar autorização por operação e mapear identidades para SAF. CICS e RACF continuam responsáveis por proteger transações, programas, filas e recursos.
Evite uma única identidade técnica com autorização universal. Se todos entram como APIUSER, a auditoria perde a capacidade de responder quem fez o quê.
Uma arquitetura séria precisa considerar:
TLS ou mTLS;
Rotação de certificados;
JWT com validade curta;
Privilégio mínimo;
Identidade propagada ou auditavelmente representada;
Mascaramento de dados sensíveis em logs;
Proteção contra payload excessivo;
Autorização no gateway e novamente no recurso final.
Confiar apenas na DMZ é como fechar a porta da frente e deixar cada sala interna sem fechadura.
14. Observabilidade — Walter, qual chevron falhou?
“Resposta em milissegundos” é uma informação incompleta.
Precisamos saber:
Milissegundos medidos onde?
Média ou percentil 99?
Com uma chamada ou quinhentas?
Incluindo Azure, gateway e rede?
Incluindo espera na fila?
Incluindo Db2 e commit?
Meça:
Latência
p50,p95ep99;Tempo no gateway;
Tempo no z/OS Connect;
Tempo IPIC;
Tempo CICS;
Tempo Db2;
CPU por chamada;
Tamanho do JSON;
Profundidade das filas;
Idade da mensagem mais antiga;
Taxa de timeout;
Retries;
Backouts;
DLQ;
Respostas atrasadas ou órfãs.
Utilize um identificador de rastreamento que acompanhe toda a viagem:
HTTP Trace ID
→ API Gateway
→ z/OS Connect
→ CICS Task
→ MQ MsgId/CorrelId
→ Db2 Unit of Work
→ Código COBOL de retornoSem correlação ponta a ponta, a arquitetura híbrida vira um episódio em que cada personagem investiga um planeta diferente.
15. Checklist do jovem programador COBOL antes de abrir o portal
Antes de transformar uma rotina em serviço, responda:
Sobre o programa
Qual é a responsabilidade real?
Quem o chama hoje?
Ele usa COMMAREA, channel/container ou parâmetros de
LINK?É reentrante?
Possui estado escondido?
Quanto tempo demora?
Quais recursos acessa?
Quais códigos de retorno produz?
Sobre os dados
O copybook possui
REDEFINES?Há
OCCURS DEPENDING ON?Existem campos binários ou
COMP-3?Qual é a code page?
Existem datas sem século?
Zeros e espaços possuem significados diferentes?
Há dados pessoais ou financeiros?
Sobre a transação
Onde ocorre o commit?
MQ e Db2 estão na mesma unidade de trabalho?
O que acontece após rollback?
A chamada pode ser repetida?
Existe chave idempotente?
O programa deixa locks prolongados?
Sobre a API
O nome representa o negócio?
O consumidor está isolado dos nomes internos?
Existe versionamento?
Os erros usam HTTP corretamente?
Há limites e validação?
O OpenAPI está versionado?
Sobre produção
Qual é o SLO?
Qual é o timeout?
Qual é o pico esperado?
Quem recebe os alertas?
Existe rollback?
Existe plano de disaster recovery?
Quem é dono da API?
Se essas respostas existem, o clique que publica o serviço pode realmente ser rápido. A velocidade final é consequência do conhecimento acumulado.
16. O que foi modernizado — e o que continua antigo
A Companhia Pégaso modernizou quatro camadas:
Plataforma: z/VSE deu lugar ao z/OS;
Transporte: o middleware proprietário deu lugar ao MQ;
Conectividade: a nuvem passou a conversar com CICS;
Consumo: regras COBOL ganharam contratos REST.
Isso não significa que todo o código tenha sido refatorado. Podem continuar existindo:
Programas monolíticos;
Copybooks difíceis;
Regras duplicadas;
Falta de testes unitários;
Dependência de especialistas;
Dívida técnica.
Mas agora há fronteiras modernas ao redor dos ativos. A empresa pode refatorar apenas onde existir valor, sem apostar todo o negócio numa reescrita gigantesca.
Reescrever quarenta anos de regra empresarial de uma vez costuma ser vendido como coragem. Às vezes é apenas uma forma sofisticada de esquecer todos os bugs que já foram corrigidos.
Encapsular primeiro cria opções:
Reutilizar imediatamente;
Observar o uso real;
Identificar serviços mais valiosos;
Medir gargalos;
Substituir componentes gradualmente;
Manter compatibilidade durante a transição.
Modernização não é obrigar COBOL a vestir uma camiseta escrito cloud native. É permitir que novas aplicações consumam capacidades antigas com segurança, contrato, métricas e governança.
Epílogo — Chevron sete travado
A sala de controle ficou em silêncio quando a primeira resposta chegou.
Na nuvem, uma aplicação enviara JSON. No z/OS, CICS recebera uma estrutura conhecida. A subrotina COBOL executara a mesma regra que executava havia anos. O resultado retornara como HTTP, sem que o programa central soubesse o que era REST, Azure ou smartphone.
Carter sorriu diante da telemetria.
— A integração está estável, general.
Daniel Jackson fechou o copybook.
— O curioso é que o programa nunca esteve realmente ultrapassado. Apenas falava uma língua que os novos consumidores não conheciam.
O'Neill tomou o último gole de café.
— Então construímos um tradutor de bilhões de dólares para evitar mexer num MOVE de 1987?
Teal'c ergueu a sobrancelha.
— Alterar aquele MOVE na sexta-feira seria imprudente, O'Neill.
Eis a essência desta jornada:
O mainframe não deixou de ser legado porque ganhou uma API. Ele deixou de ser uma ilha porque ganhou pontes controladas.
Nem todo programa COBOL é uma API pronta. Entretanto, toda capacidade de negócio bem delimitada, segura, curta e compreendida pode se tornar candidata a um serviço moderno.
A regra de quarenta anos não precisou morrer. Recebeu dois intérpretes: IBM MQ, que prefere cartas registradas, e z/OS Connect, que fala REST fluentemente.
E a famosa API criada em minutos?
Ela é real. Mas aqueles minutos são os juros compostos de seis anos de engenharia.
Em algum lugar da spool, um job terminou com CC 0000. Ninguém percebeu que seu JOBID era SG10042 — porque todo bom Stargate precisa de sete chevrons, e todo bom universo precisa saber a resposta para a vida, o universo e tudo mais.
Chevron sete travado. Wormhole estabelecido. Café servido.
