🔥💣 “O MAINFRAME NÃO FICOU CARO — VOCÊ É QUE DEIXOU O 4HRA VIRAR UM INCÊNDIO” ☕💾

 

Bellacosa Mainframe e o custo medio de uso do mainframe 4HRA

🔥💣 “O MAINFRAME NÃO FICOU CARO — VOCÊ É QUE DEIXOU O R4HA VIRAR UM INCÊNDIO” ☕💾

Rolling 4HRA no IBM Z: A Verdade Brutal que Todo Sysprog Junior Descobre Quando o CPU Começa a Derreter

Padawan…

Existe um momento sombrio na vida de todo SYSprog junior.

Um momento em que:

• o CPU começa a subir,

• o RMF vira filme de terror,

• o DBA começa a suar frio,

• o gerente pergunta sobre custos,

• e alguém pronuncia uma sigla maldita dentro da sala de guerra:

🚨 R4HA

Ou:

🔥 Rolling 4-Hour Average

Nesse instante…

Você deixa de ser apenas “o cara que olha JES2 e IPL”.

E começa a entender a realidade brutal do mundo IBM Z moderno:

O maior inimigo do mainframe não é a falta de potência.

É workload mal otimizado queimando MSU como se CPU fosse lenha.

---

☕ O GRANDE MITO: “MAINFRAME É CARO”

Padawan…

O IBM Z não ficou caro por acaso.

O problema é que muita empresa roda:

• SQL desastroso,

• batch sem controle,

• SORT monstruoso,

• loops infinitos,

• CICS mal desenhado,

• e workloads completamente desequilibrados.

Depois olha para a conta mensal e diz:

• “o mainframe custa caro”.

É como culpar a usina elétrica porque alguém deixou um forno industrial ligado dentro da garagem.

---

🔥 O QUE É O ROLLING 4HRA?

O Rolling 4HRA é:

• uma média móvel de consumo de CPU/MSU das últimas 4 horas.

Mas dizer só isso é simplificar demais.

Na prática ele é:

💀 O SENSOR FINANCEIRO DO DATACENTER

Porque ele mede:

• consumo sustentado,

• pressão operacional,

• tendência de carga,

• risco financeiro,

• e eficiência arquitetural do ambiente.

---

💾 O MAINFRAME NÃO TEM MEDO DE PICOS

Esse é o detalhe genial do modelo IBM Z.

O sistema foi construído para absorver:

• explosões de workload,

• fechamento bancário,

• Black Friday,

• processamento massivo,

• milhões de transações.

O problema nunca foi:

• o pico curto.

O problema é:

🔥 O INCÊNDIO CONTÍNUO

É aí que o R4HA entra.

---

☕ A FILOSOFIA POR TRÁS DO R4HA

Imagine um motor Ferrari.

Uma acelerada rápida:

• não destrói o motor.

Mas manter:

• giro máximo,

• temperatura extrema,

• pressão contínua,

• por horas…

Aí o sistema começa a sofrer.

O Rolling 4HRA existe justamente para medir:

• desgaste sustentado.

---

🚨 POR QUE A IBM USA ISSO?

Porque seria injusto cobrar:

• pelo pico de alguns minutos.

Então o ecossistema IBM criou:

• média móvel de 4 horas.

Isso suaviza:

• explosões temporárias,

• spikes pequenos,

• ruídos operacionais.

Mas também revela:

• workloads persistentemente ruins.

---

🔥 E É AQUI QUE O SYSprog PADAWAN ACORDA PARA A VIDA

Você percebe que:

• CPU não é apenas CPU.

Ela virou:

• dinheiro,

• licensing,

• SLA,

• capacidade,

• reputação operacional.

No IBM Z moderno:

💰 MSU = DINHEIRO

---

💣 QUANDO O DESASTRE COMEÇA

Tudo parece normal.

Até que alguém sobe:

• um SQL sem índice,

• um tablespace scan monstruoso,

• um batch paralelo sem controle,

• um SORT insano,

• um COBOL looping,

• um CICS runaway task.

Aí…

O CPU começa a subir.

Mas o verdadeiro terror ainda nem começou.

---

☕ O “EFEITO VENENO” DO R4HA

Esse conceito separa:

• o junior do veterano.

Porque mesmo depois de corrigir o problema:

• o R4HA continua alto.

E o padawan pergunta:

“Mas já cancelamos o job… por que continua ruim?”

Porque o Rolling 4HRA:

• ainda está carregando o histórico do desastre.

---

🔥 O R4HA TEM MEMÓRIA

Ele funciona como:

• uma onda de calor.

Mesmo após apagar o incêndio:

• o ambiente continua quente.

Isso gera:

• impacto financeiro,

• impacto operacional,

• pressão no capacity planning.

---

💾 O ERRO CLÁSSICO DOS JUNIORS

Confundir:

• CPU instantânea
  com

• Rolling 4HRA.

São coisas completamente diferentes.

Você pode ter:

• CPU baixa AGORA,

• mas R4HA altíssimo.

Porque a média móvel ainda está contaminada pelas horas anteriores.

---

🚨 O QUE MAIS INCENDIA O R4HA?

🔥 DB2

Aqui mora um dos maiores vilões do datacenter.

Um único SQL ruim pode:

• destruir cache,

• explodir SORT,

• aumentar GETPAGE,

• saturar CPU,

• gerar scan absurdo.

E tudo isso:

• alimenta o R4HA.

---

🔥 CICS

Quando mal desenhado:

• vira um triturador de MSU.

Problemas clássicos:

• pseudo-conversational ruim,

• polling excessivo,

• loops de transação,

• runaway tasks,

• filas gigantes.

---

🔥 BATCH

O batch mal otimizado é um clássico.

Especialmente:

• DFSORT gigantesco,

• JOINKEYS abusivo,

• I/O thrashing,

• múltiplos jobs concorrentes.

O resultado:

💀 tempestade de CPU

---

☕ O WLM TENTA SALVAR O AMBIENTE

O WLM funciona como:

• o maestro do caos.

Ele tenta:

• priorizar workloads,

• proteger online,

• equilibrar recursos,

• manter SLA.

Mas quando:

• tudo começa a consumir demais…

Nem o WLM faz milagre.

---

🔥 SOFT CAPPING: A FACA DE DOIS GUMES

Então alguém diz:

“Vamos limitar MSU!”

Aí nasce o:

💣 Soft Capping

Objetivo:

• evitar explosão financeira.

Mas se configurado errado:

• batch atrasa,

• online degrada,

• filas explodem,

• SLA morre.

---

💾 O PARADOXO DO SYSprog

Se libera CPU:
💰 custo explode.

Se limita demais:
💀 produção explode.

Esse equilíbrio delicado é uma das artes mais difíceis do IBM Z.

---

🚨 O QUE O SYSprog EXPERIENCED APRENDE

Ele aprende que performance tuning não é:

• “deixar rápido”.

É:

🔥 impedir o datacenter de sangrar dinheiro

---

☕ O MAINFRAME MODERNO É UMA MÁQUINA DE EFICIÊNCIA

O IBM Z moderno:

• processa milhões de TPS,

• roda bancos inteiros,

• suporta cloud híbrida,

• executa IA,

• integra APIs,

• conversa com Kubernetes,

• roda Linux massivamente.

O hardware é absurdamente poderoso.

O problema normalmente está:

• no workload.

---

💣 O MAINFRAME NÃO ESTÁ LENTO

Na maioria dos casos:

• o ambiente está sendo sabotado por software ruim.

E o Rolling 4HRA:

• apenas revela isso de forma cruel.

---

🔥 O DIA EM QUE O PADAWAN EVOLUI

A evolução acontece quando ele entende:

tuning não é estética

Não é:

• “ganhar benchmark”.

É:

• sobrevivência financeira,

• estabilidade operacional,

• sustentabilidade do ambiente.

---

☕ RMF: O ORÁCULO DO IBM Z

O SYSprog veterano aprende a ler:

• RMF,

• SMF 70,

• SMF 72,

• OMEGAMON,

• MXG,

• IntelliMagic.

Porque nesses relatórios está:

• a verdade do ambiente.

O R4HA conta uma história.

E essa história normalmente aponta:

• quem está incendiando CPU.

---

🔥 O MAINFRAME CONTINUA SENDO O REI

E aqui está a ironia maravilhosa.

Mesmo sob caos:

• milhões de transações continuam funcionando,

• ATM continua online,

• PIX continua passando,

• cartão continua autorizando,

• folha continua fechando.

Enquanto isso…

• o IBM Z aguenta pancada absurda silenciosamente.

---

💾 A GRANDE VERDADE

O problema nunca foi:

• a potência do mainframe.

O problema é:

• arquitetura ruim,

• SQL ruim,

• falta de governança,

• tuning inexistente,

• e desconhecimento sobre workload management.

---

☕ LIÇÃO FINAL DO PADAWAN IBM Z

Quando você olha um Rolling 4HRA:

• você não está vendo apenas CPU.

Você está vendo:

• comportamento do ambiente,

• disciplina operacional,

• maturidade técnica,

• eficiência arquitetural,

• e o custo real das decisões ruins.

---

🔥 FRASE FINAL ESTILO BELLACOSA MAINFRAME

“O IBM Z não cobra caro por existir.
Ele apenas expõe, em MSU e R4HA, todas as decisões ruins que alguém colocou em produção.” ☕💾🔥

---

🔥 Rollinf 4HRA

 O Rolling 4HRA (Rolling 4-Hour Average) é a média móvel de consumo de capacidade do mainframe IBM Z durante as últimas quatro horas. Ele mede o uso sustentado de CPU e MSU, sendo utilizado pelo WLM, RMF e modelos de licenciamento IBM para calcular custos e avaliar performance do ambiente. Diferente do uso instantâneo de CPU, o 4HRA continua elevado mesmo após um pico terminar, refletindo impactos anteriores no workload. Por isso, SQL ruim, batch pesado e loops podem aumentar custos significativamente.

 

 

Bellacosa Mainframe mergulhando em performance e custo de query db2 no Mainframe

🔥☕ “O MAINFRAME NÃO ESTÁ LENTO — SEU SQL É QUE ESTÁ INCENDIANDO A CPU DO IBM Z” 💾🚨

A Verdade Brutal que Todo Sysprog Júnior Descobre Quando Entra no Mundo Real do DB2 for z/OS

Por Bellacosa Mainframe

---

Existe um momento na vida de todo sysprog júnior…

aquele instante mágico, traumático e inesquecível…

quando ele percebe que:

💣 O problema não era o CICS.

💣 Não era o z/OS.

💣 Não era o storage.

💣 Nem o “mainframe velho”.

Era um único SQL.

Sim.

Uma linha aparentemente inocente:

SELECT *
FROM CLIENTES
WHERE CPF = '12345678900'

…destruindo CPU, queimando MIPS, elevando MSU, congestionando buffer pool e transformando a LPAR num inferno termonuclear digital.

Bem-vindo ao mundo real do DB2 for z/OS.

---

☕ O DIA EM QUE O PADAWAN DESCOBRE QUE CPU NO MAINFRAME = DINHEIRO

No universo distribuído moderno, quando falta performance, a resposta costuma ser:

• sobe mais VM

• coloca Kubernetes

• aumenta cluster

• escala horizontalmente

No mainframe?

HAHAHAHA.

Aqui a conversa é outra.

Aqui:

CPU = LICENSING

CPU = MLC

CPU = 4HRA

CPU = FATURA MILIONÁRIA

Um SQL ruim não deixa apenas o sistema “mais lento”.

Ele:

• aumenta custo mensal

• afeta SLA

• derruba throughput

• impacta batch

• congestiona CICS

• aumenta I/O

• cria lock contention

• vira incidente de produção

E o mais assustador?

Muitas vezes tudo começa com um programador dizendo:

“Mas é só um SELECT…”

---

🏛️ O MAINFRAME NÃO PENSA COMO VOCÊ

O sysprog júnior normalmente imagina que o DB2 executa SQL exatamente como foi escrito.

Não.

O DB2 é muito mais sofisticado.

Quando você envia um SQL, o DB2 chama uma entidade quase mística:

🔥 O OPTIMIZER

Ele analisa:

• estatísticas

• cardinalidade

• índices

• distribuição de dados

• filtros

• joins

• sort

• predicates

• paralelismo

• buffer access

E então decide:

“Qual será o caminho menos custoso para encontrar esses dados?”

Esse caminho se chama:

☕ ACCESS PATH

E é aqui que nascem:

• os heróis

• os vilões

• os incêndios de CPU

• e os DBA traumatizados.

---

💣 O TABLESPACE SCAN — O DEMÔNIO QUE ASSOMBRA PRODUÇÃO

Imagine uma tabela com:

• 900 milhões de linhas

• 14 TB

• milhões de acessos diários

Agora imagine um SQL sem índice adequado:

SELECT *
FROM CLIENTES
WHERE CPF = '12345678900'

Sem índice…

o DB2 pode precisar ler:

• página por página

• bloco por bloco

• segmento por segmento

Isso se chama:

🚨 TABLESPACE SCAN

Ou seja:

o DB2 sai varrendo o oceano inteiro para encontrar um peixinho.

Resultado:

• GETPAGE explode

• CPU dispara

• synchronous I/O aumenta

• elapsed cresce

• batch atrasa

• CICS sofre

E o sysprog júnior começa a ouvir palavras assustadoras no war room:

• “buffer pool saturation”

• “RID failure”

• “class 2 CPU”

• “dynamic statement cache”

• “DSNZPARM”

• “DSNDB07 lotado”

---

☕ O PODER SOBRENATURAL DE UM ÍNDICE

Agora veja a mesma consulta com índice:

CREATE INDEX IXCPF
ON CLIENTES (CPF)

O cenário muda completamente.

Agora o DB2:

• acessa diretamente o valor

• evita scan massivo

• reduz GETPAGE

• diminui I/O

• baixa CPU

O que levava:

• 40 minutos

passa a levar:

• 2 segundos

Sem exagero.

No mundo IBM Z isso acontece TODOS OS DIAS.

---

🔥 O ERRO MAIS COMUM DOS PROGRAMADORES COBOL

Padawan…

grave isso na alma:

“O COBOL não mata CPU sozinho.”

“O SQL dentro dele mata.”

Um clássico infernal:

PERFORM VARYING WS-I FROM 1 BY 1
   EXEC SQL
      SELECT ...
   END-EXEC
END-PERFORM

Parabéns.

Você acabou de criar:

☠️ O APOCALIPSE DO ROW-BY-ROW PROCESSING

Também conhecido como:

• slow by slow

• chatty SQL

• cursor abuse

O programa funciona.

Mas em produção:

• executa milhões de SQLs

• congestiona DB2

• aumenta context switch

• explode CPU

O júnior acha:

“Funcionou no teste.”

O veterano olha e já sente dor física.

---

🧠 O MITO DO “SELECT *”

Outra heresia clássica:

SELECT *

Isso é praticamente um ritual proibido em ambientes críticos.

Porque talvez você precise:

• 2 colunas

Mas o DB2 entrega:

• 180 colunas

• LOBs

• dados inúteis

• mais I/O

• mais buffer

• mais sort

• mais CPU

O correto:

SELECT NOME, CPF

No mainframe:

eficiência é religião.

---

☕ RUNSTATS — O ALIMENTO DO OPTIMIZER

O optimizer do DB2 depende de estatísticas.

Sem elas:

ele fica cego.

RUNSTATS informa:

• quantidade de linhas

• distribuição

• cardinalidade

• clustering

• seletividade

Sem RUNSTATS atualizada…

o DB2 toma decisões absurdas.

Exemplo real:

Tabela cresceu de:

• 10 milhões
  para

• 800 milhões linhas

Mas estatística continua antiga.

O optimizer acredita que a tabela ainda é pequena.

Escolhe nested loop inadequado.

Resultado:

💣 CPU 100x maior

---

🔥 EXPLAIN — O RAIO-X DA ALMA DO SQL

Veterano de DB2 não confia em “achismo”.

Ele usa:

EXPLAIN PLAN

Porque EXPLAIN revela:

• índice usado

• join method

• scans

• sorts

• custo estimado

• stage 1 / stage 2

• parallelism

É literalmente:

a anatomia do pensamento do DB2.

---

☕ STAGE 2 — O CEMITÉRIO DA INDEXABILITY

Veja isso:

WHERE SUBSTR(NOME,1,3) = 'MAR'

Parece elegante.

Mas pode impedir uso eficiente de índice.

Outro clássico:

WHERE YEAR(DATA) = 2025

Muito bonito.

Muito moderno.

Muito destrutivo.

Melhor:

WHERE DATA BETWEEN '2025-01-01'
              AND '2025-12-31'

Porque agora:

• o índice pode respirar

• o optimizer consegue navegar melhor

---

🔥 GETPAGE — A PALAVRA QUE FAZ DBA SUAR FRIO

No DB2 z/OS:

GETPAGE = acesso à página de dados.

Muito GETPAGE:

• mais CPU

• mais latch

• mais memória

• mais I/O

Veteranos monitoram:

• GETPAGE

• sync read

• class 1

• class 2

• lock wait

• RID list

como cardiologista monitorando ECG.

---

☕ “RÁPIDO” NÃO SIGNIFICA “BARATO”

Essa é uma das maiores lições do mainframe.

Às vezes:

• elapsed time está ótimo

MAS:

• CPU está monstruosa.

O usuário acha:

“Nossa, ficou rápido!”

O financeiro vê:

💸🔥💸🔥💸🔥

Porque no IBM Z:

CPU custa dinheiro real.

---

🤖 A ERA DA IA NO TUNING DB2

Hoje ferramentas modernas analisam:

• SQLs problemáticos

• regressão de access path

• mudanças após REBIND

• índices ausentes

• scans perigosos

• CPU anomalies

E algumas usam IA para:

• prever degradação

• sugerir rewrite

• detectar padrões tóxicos

• identificar SQLs assassinos

O futuro do tuning DB2 já começou.

---

🏛️ O QUE O SYSprog JÚNIOR PRECISA ENTENDER URGENTEMENTE

Mainframe não é:

• “computador velho”

• “COBOL antigo”

• “legado ultrapassado”

Mainframe é:

engenharia extrema de throughput.

E DB2 for z/OS é:

um dos motores transacionais mais eficientes já criados pela humanidade.

Ele processa:

• bancos

• cartões

• bolsa

• aviação

• seguros

• governo

• PIX

• ATM

• clearing financeira

Em escala absurda.

---

☕ A GRANDE VERDADE FINAL

O mundo moderno fala:

• cloud

• containers

• microservices

• IA

Mas nos bastidores…

existe um IBM Z executando milhões de transações por segundo…

e um DBA desesperado tentando descobrir:

🔥 “QUAL SQL ESTÁ QUEIMANDO A CPU?” 🔥

Porque no fim…

o COBOL processa o negócio…

o CICS coordena as transações…

mas:

💾 É O ACCESS PATH DO DB2 QUE DECIDE QUANTO CUSTA MANTER O MUNDO FUNCIONANDO. ☕🔥

⚡💣 LAB CICS — MEM CRÍTICO 🚨 “QUANDO A MEMÓRIA ACABA… O CICS PEDE SOCORRO” 🚨

 

Bellacosa Mainframe memoria critica no CICS

⚡💣 LAB CICS — MEM CRÍTICO

🚨 “QUANDO A MEMÓRIA ACABA… O CICS PEDE SOCORRO” 🚨

👉 Tema: SOS (Short on Storage) + degradação + decisão de failover

---

🎬 🎯 CENÁRIO

Você está operando uma região do
IBM CICS

🕐 14:32 — horário crítico
📍 Região: CICSPRD1
📍 Ambiente: Produção

---

💥 ALERTAS INICIAIS

• Tempo de resposta subindo
• Tasks WAITING
• CPU irregular
• Storage aumentando rápido

---

💣 LOGS (CSMT)

DFHSM0133 Short on storage condition detected
DFHSM0606 Storage violation detected

👉 Tradução Bellacosa:

“O CICS está ficando sem memória — e isso escala rápido.”

---

🧠🔥 FASE 1 — DIAGNÓSTICO INICIAL

🔎 Comando:

CEMT I SYS

🔥 Resultado típico:

• Storage > 90%
• Tasks acumulando
• Sistema degradando

---

❓ O que você faz?

A) Reinicia CICS
B) Ignora
C) Analisa storage
D) Derruba tudo

---

✅ RESPOSTA: C

👉 Reiniciar agora pode piorar
👉 Você precisa entender quem está consumindo storage

---

🔍 FASE 2 — INVESTIGAÇÃO DE STORAGE

🔎 Ver tasks:

CEMT I TASK

👉 Procure:

• Tasks longas
• Muitas instâncias
• Status WAITING

---

💡 Padrão clássico:

• Programa não liberando storage
• Loop com GETMAIN
• Leak de memória

---

📊 FASE 3 — IDENTIFICAR VILÃO

🔎 Filtro:

CEMT I TASK TRA(ORDR)

👉 Resultado:

• Muitas tasks
• Alto consumo
• Crescendo continuamente

---

❓ Diagnóstico provável:

A) CPU
B) Storage leak
C) Rede
D) MQ

---

✅ RESPOSTA: B

🔥 Você está vendo um memory leak em CICS

---

☠️💣 FASE 4 — CONTENÇÃO IMEDIATA

Agora vem decisão crítica.

🎯 Objetivo:

• parar consumo
• evitar colapso

---

💥 Ações:

1. Derrubar tasks críticas:

CEMT SET TASK(501) PURGE

Se necessário:

CEMT SET TASK(501) FORCEPURGE

---

2. Bloquear transação:

CEMT SET TRAN(ORDR) DISABLED

👉 Isso é essencial.

---

🧬 FASE 5 — SITUAÇÃO PIORA 😈

Mesmo após purge:

• Storage não libera totalmente
• Região continua degradando

👉 Isso acontece porque:

• Fragmentação
• Storage preso
• Controle interno comprometido

---

🚨 FASE 6 — DECISÃO CRÍTICA (NÍVEL SYSPROG)

❓ O que fazer agora?

A) Continuar purge
B) Reiniciar região
C) Acionar failover
D) Ignorar

---

✅ RESPOSTA IDEAL: C

👉 Você entra no modo resiliência

---

🌍⚡ FAILOVER COM GDPS

Utilizando:

IBM GDPS

---

💥 Ação:

• Transferir workload
• Ativar região standby
• Redirecionar usuários

---

🎯 Resultado esperado:

• Continuidade de serviço
• Zero downtime perceptível (ou mínimo)

---

🧯 FASE 7 — ESTABILIZAÇÃO

Após failover:

• Região secundária assume
• Sistema normaliza
• Usuários voltam

---

🔬 FASE 8 — ANÁLISE PROFUNDA

Agora você investiga a causa real.

🔎 Ferramentas:

• IBM IPCS
• IBM Fault Analyzer

---

💣 Descoberta:

• Programa COBOL com loop de GETMAIN
• Sem FREEMAIN
• Leak progressivo

---

🔧 FASE 9 — CORREÇÃO DEFINITIVA

📋 Ações:

• Corrigir código
• Garantir FREEMAIN
• Revisar uso de storage
• Testar em QA

---

🧠💡 LIÇÕES DE OURO

👉 SOS nunca é “só performance”
👉 É risco de colapso total

👉 Sempre:

• monitore storage
• detecte crescimento anormal
• tenha failover preparado

---

🧩😄 EASTER EGGS

• “SOS não avisa duas vezes”
• “Se chegou no SOS… alguém esqueceu FREEMAIN”
• “Memory leak em CICS é assassino silencioso”

---

🏁 SCORE FINAL

Critério	Resultado
Diagnóstico	🧠 Excelente
Tempo de reação	⚡ Crítico
Contenção	🎯 Precisa
Resiliência	🛡️ Nível enterprise

---

🎯💬 FECHAMENTO

Esse lab é o divisor de águas.

👉 Aqui você deixa de ser operador
👉 e vira engenheiro de sobrevivência do mainframe

 

Bellacosa Mainframe apresenta um Simulador CICS

🚨💥 SIMULADOR CICS — “GUERRA EM PRODUÇÃO” 💥🚨

🎮 Modo: Interativo | 🎯 Objetivo: Restaurar o serviço sem causar dano colateral

Você está no comando de uma região do IBM CICS em produção.

---

🎬 CENÁRIO INICIAL

🕐 10:02 — Pico de acesso
📍 Região: CICS01
📍 Aplicação crítica: pagamentos

💥 Sintomas:

• Tempo de resposta > 5s
• CPU subindo rápido
• Usuários travando
• Chamados explodindo 😄

---

🧠 FASE 1 — PRIMEIRA DECISÃO

Você precisa agir rápido.

❓ O que você faz primeiro?

A) Reinicia o CICS
B) Analisa logs e tasks
C) Derruba todas as tasks
D) Ignora (pode ser pico)

👉 Escolha mentalmente antes de continuar

---

✅ RESPOSTA CORRETA: B

👉 Reiniciar = impacto massivo
👉 Derrubar tudo = caos
👉 Ignorar = carreira curta 😄

---

🔍 FASE 2 — INVESTIGAÇÃO

Você executa:

CEMT I TASK

🔥 Resultado:

• 40 tasks da transação PAY1
• Todas RUNNING
• Mesmo USERID

---

❓ Próxima ação?

A) Esperar normalizar
B) Filtrar por transação
C) Derrubar aleatoriamente
D) Reiniciar região

👉 Escolha…

---

✅ RESPOSTA: B

CEMT I TASK TRA(PAY1)

👉 Agora você tem visibilidade total

---

📊 FASE 3 — DIAGNÓSTICO

Você analisa uma task:

CEMT I TASK TAS(401)

🔎 Observação:

• CPU TIME alto
• STATUS: RUNNING
• Sem I/O

👉 Isso indica:

❓

A) Espera de recurso
B) Loop CPU
C) Falha de rede
D) Storage baixo

---

✅ RESPOSTA: B (LOOP CPU)

🔥 Você achou o vilão.

---

☠️ FASE 4 — DECISÃO CRÍTICA

Agora vem a parte que separa operador de sysprog.

❓ O que fazer?

A) PURGE uma task
B) FORCEPURGE todas
C) Desabilitar transação
D) Nada

---

✅ RESPOSTA IDEAL: A + C

💥 Execução:

CEMT SET TASK(401) PURGE

Depois:

CEMT SET TRAN(PAY1) DISABLED

👉 Você:

• remove impacto imediato
• evita novas ocorrências

---

🧬 FASE 5 — INVESTIGAÇÃO PROFUNDA

Agora você precisa entender a causa.

💥 Gerar dump:

CEMT SET TRD(PAY1) DUMP

🔎 Análise com:

• IBM IPCS
• IBM Fault Analyzer

---

💣 Resultado:

• Loop em programa COBOL
• Falta de condição de saída

👉 Erro clássico de desenvolvimento 😄

---

🧯 FASE 6 — ESTABILIZAÇÃO

Você monitora:

CEMT I SYS

✅ Resultado:

• CPU normalizando
• Tasks reduzindo
• Usuários voltando

---

🔧 FASE 7 — PÓS-INCIDENTE

Agora entra maturidade real.

📋 Ações obrigatórias:

• Corrigir código
• Criar alerta de CPU
• Monitorar transação
• Revisar deploy

---

🏁 RESULTADO FINAL

🧾 SCORE

Critério	Resultado
Tempo de reação	⚡ Excelente
Impacto evitado	🛡️ Alto
Diagnóstico	🧠 Correto
Ação	🎯 Precisa

👉 🎉 Você salvou a produção.

---

🧩😄 VARIAÇÕES DO SIMULADOR (PRÓXIMO NÍVEL)

Se quiser evoluir o treinamento:

💣 Cenário 2

• Deadlock com DB2

💥 Cenário 3

• MQ travando fila

🔥 Cenário 4

• SOS (Short on Storage)

⚡ Cenário 5

• Região inteira degradando

---

🎯💬 FECHAMENTO

Esse tipo de simulador treina:

• raciocínio sob pressão
• tomada de decisão
• domínio real de CICS

👉 Porque no mundo real:

“Quem hesita… derruba produção.”

 

 

Bellacosa Mainframe desafio LAB C|ICS

🚨💥 LAB CICS: “A TASK QUE PAROU A EMPRESA” — DO CAOS À RECUPERAÇÃO 💥🚨

🎬 🎯 CENÁRIO

📍 Ambiente: Produção
📍 Região: CICS01
📍 Horário: 10:17 (pico)
📍 Sintoma:

• Usuários travados
• Tempo de resposta absurdo
• CPU subindo
• Reclamação geral 😄

👉 Clássico incidente crítico.

---

🧠🔥 FASE 1 — DETECÇÃO (O ALERTA)

🔎 Primeira ação: ver mensagens

CEMT I SYS

👉 Você percebe:

• Tasks acumulando
• Sistema lento

Agora vá direto ao log:

CEBR CSMT

💣 Você encontra:

DFHAC2001 TRANSACTION PAY1 ABENDED WITH CODE ASRA

👉 Tradução:

• Programa quebrando (provável S0C4)
• Pode estar em loop/restart

---

🕵️‍♂️ FASE 2 — IDENTIFICAR O PROBLEMA

🔍 Listar tasks:

CEMT I TASK

🔥 Saída suspeita:

Tas(000345) Tra(PAY1) Use(APPUSR) Sta(RUN)
Tas(000346) Tra(PAY1) Use(APPUSR) Sta(RUN)
Tas(000347) Tra(PAY1) Use(APPUSR) Sta(RUN)

👉 ALERTA:

• Mesma transação
• Mesmo user
• Muitas instâncias
• Todas rodando

💡 Possível cenário:

• Loop
• Deadlock
• Programa bugado

---

🎯 Filtro cirúrgico:

CEMT I TASK TRA(PAY1)

👉 Resultado:

• 30+ tasks abertas 😄

Agora ficou sério.

---

📊⚡ FASE 3 — ANÁLISE DE CONSUMO

🔎 Ver comportamento:

CEMT I TASK TAS(345)

👉 Observe:

• CPU TIME alto
• STATUS RUNNING contínuo
• Sem I/O

👉 Isso é clássico:

🔥 LOOP CPU (runaway task)

---

🧬 FASE 4 — INVESTIGAÇÃO PROFUNDA (DUMP)

Agora você quer prova técnica.

💥 Gerar dump:

CEMT SET TRD(PAY1) DUMP

ou automático via abend

---

🧠 Análise do dump:

Ferramentas:

• IBM IPCS
• IBM Fault Analyzer

🔎 Você encontra:

• Loop em programa COBOL
• Parágrafo sem EXIT 😄
• Variável nunca alterada

👉 Bingo.

---

☠️💣 FASE 5 — CONTENÇÃO (AÇÃO IMEDIATA)

Agora você precisa salvar o ambiente.

💥 Derrubar tasks:

CEMT SET TASK(345) PURGE

Se resistir:

CEMT SET TASK(345) FORCEPURGE

👉 Repita para as demais:

CEMT I TASK TRA(PAY1)

---

🚫 Bloquear entrada da transação:

CEMT SET TRAN(PAY1) DISABLED

👉 Isso evita novas execuções

---

🧯 FASE 6 — ESTABILIZAÇÃO

Agora observe:

CEMT I SYS

👉 Esperado:

• CPU normalizando
• Tasks reduzindo
• Sistema respondendo

💡 Se não normalizar:

• Ver DB2 locks
• Ver filas MQ
• Ver storage

---

🔧 FASE 7 — CORREÇÃO DEFINITIVA

Agora vem o pós-incidente.

📌 Ações:

• Corrigir programa COBOL
• Revisar lógica de loop
• Adicionar timeout/escape
• Validar com QA

---

🧠💡 FASE 8 — LIÇÕES DE OURO

👉 Sempre monitore:

• Transações com crescimento rápido
• CPU anormal
• Tasks duplicadas

👉 Crie alertas para:

• ASRA recorrente
• Volume de tasks
• Tempo de resposta

---

🧩😄 EASTER EGGS DO LAB

• “Toda FORCEPURGE tem história”
• “Loop em COBOL sempre aparece na sexta”
• “Se tem ASRA em massa… prepara café” ☕

---

🧪🎯 QUIZ — NÍVEL OPERADOR / SYSPROG

1️⃣ O que indica muitas tasks RUNNING com CPU alto?

A) I/O intenso
B) Loop CPU
C) Problema de rede
D) Storage baixo

👉 Resposta: B

---

2️⃣ Comando para ver tasks:

A) CEDF
B) CEMT I TASK
C) CICS LIST
D) DISPLAY TASK

👉 Resposta: B

---

3️⃣ Diferença entre PURGE e FORCEPURGE?

A) Nenhuma
B) FORCEPURGE força finalização imediata
C) PURGE é mais agressivo
D) PURGE mata região

👉 Resposta: B

---

4️⃣ O que é ASRA?

A) Timeout
B) Falha lógica COBOL
C) Erro de storage/execução
D) Deadlock

👉 Resposta: C

---

5️⃣ Melhor ação inicial?

A) Reiniciar CICS
B) Derrubar tudo
C) Analisar tasks e logs
D) Ignorar

👉 Resposta: C

---

🎯💬 FECHAMENTO ESTILO BELLOCAZZA

Ser SysProg de CICS não é saber comando.

É:

• ler comportamento
• antecipar desastre
• agir rápido
• e salvar produção sem pânico

👉 Porque no mundo real:

“Uma única task errada… pode derrubar milhares de usuários.”

 

 

Bellacosa Mainframe apresenta o HLASM

💾🔥 HLASM: O “MICROCÓDIGO HUMANO” QUE DOMA O MAINFRAME — DIRETO DO FERRO PARA A HISTÓRIA 🔥💾

Se tem uma linguagem que não conversa com o sistema… ela conversa com o hardware. E faz isso com elegância brutal. Bem-vindo ao universo do HLASM — onde cada instrução é praticamente um pulso elétrico com intenção.

---

🧬 ORIGEM: DO ASM/360 AO HLASM

A história do HLASM começa lá atrás, com o lendário IBM System/360 (1964). Na época, o assembler era o ASM/360, evoluindo depois para:

• Assembler F
• Assembler H
• Assembler XF
• E finalmente o HLASM

📅 Lançamento do HLASM: década de 1990 (oficialmente por volta de 1992–1994), acompanhando a evolução dos sistemas z/OS

👉 A ideia foi clara:
Manter o poder do assembler, mas adicionar recursos “high level” como:

• macros mais poderosas
• melhor diagnóstico
• estruturação mais legível
• integração moderna com o ambiente z/OS

---

⚙️ O QUE TORNA O HLASM DIFERENTE?

HLASM não é “baixo nível raiz”. Ele é um assembler evoluído, com inteligência embutida.

💡 Destaques:

• Macros sofisticadas (quase uma metalinguagem)
• Controle avançado de fluxo
• Suporte a debug e listagens detalhadas
• Integração com ferramentas modernas IBM
• Performance absurda (nível hardware)

👉 Em resumo:
Você escreve assembler… mas com superpoderes.

---

🏛️ COMPATIBILIDADE: A RELÍQUIA QUE NUNCA MORRE

HLASM mantém compatibilidade com décadas de código legado.

Isso significa:

• Código dos anos 70 ainda roda hoje 😳
• Integra com:
  • CICS
  • DB2
  • IMS
• Funciona perfeitamente nos atuais IBM Z

👉 Isso não é retrocompatibilidade…
É imortalidade corporativa.

---

🧠 FILOSOFIA: QUANDO VOCÊ PENSA COMO O PROCESSADOR

Programar em HLASM é entender:

• registradores
• endereçamento
• instruções de máquina
• pipeline do processador

É quase como conversar direto com a CPU:

“Carregue isso. Compare aquilo. Salte agora.”

Sem intermediários. Sem abstrações.

---

⚔️ HLASM vs ASSEMBLY DO MUNDO PC

Agora começa a parte divertida 😄

🖥️ x86 / x64 (PC, Windows, Linux, macOS)

• Usado em NASM, MASM
• Arquiteturas:
  • 8 bits (8080, 8085)
  • 16 bits (8086)
  • 32 bits (80386)
  • 64 bits (x86-64)

👉 Características:

• Forte dependência de registradores limitados
• Segmentação histórica (16 bits)
• Instruções mais “bagunçadas” (CISC complexo)

---

🧊 HLASM (Mainframe)

• Arquitetura limpa e consistente desde o System/360
• Registradores bem definidos (R0–R15)
• Endereçamento poderoso
• Foco em processamento massivo e confiabilidade

👉 Diferença brutal:

Aspecto	HLASM	x86/x64
Estabilidade	Décadas sem ruptura	Mudanças constantes
Legado	Totalmente preservado	Parcial
Clareza	Alta consistência	Muitas exceções
Performance	Otimizado para I/O e batch	Otimizado para geral

---

🧪 CURIOSIDADES QUE POUCA GENTE SABE

💡 HLASM é usado até hoje em:

• Núcleos bancários
• Sistemas de pagamento
• Processamento de milhões de transações por segundo

💡 Muitas rotinas críticas em COBOL chamam HLASM por baixo

💡 Algumas empresas NUNCA reescreveram seus códigos assembler… só foram evoluindo

💡 HLASM é tão eficiente que às vezes substitui C/C++ em partes críticas

---

🛠️ DICAS DE OURO (ESTILO BELLACOSA 😎)

🔥 1. Aprenda registradores como extensão do seu cérebro
R1 não é número… é propósito.

🔥 2. Domine macros
Macro em HLASM = produtividade + elegância

🔥 3. Leia listagens (LISTING)
É ali que você vira mestre.

🔥 4. Entenda o fluxo de execução real
Branch errado = desastre silencioso

🔥 5. Combine com COBOL
COBOL + HLASM = performance + legibilidade

---

🧾 COMENTÁRIO REALISTA (SEM ROMANTIZAR)

HLASM não é para iniciantes.

Ele exige:

• disciplina
• atenção absurda
• entendimento profundo do sistema

Mas em troca?

👉 Você ganha controle TOTAL.

---

🧠 ANALOGIA FINAL

Se linguagens modernas são:

• Java = carro automático
• Python = carro elétrico
• C = carro manual esportivo

👉 HLASM é:

um caça supersônico com painel analógico.

Você não dirige…
Você pilota.

---

🚀 FECHAMENTO

O HLASM não é só uma linguagem.

É um legado vivo.
Uma ponte entre 1964 e o futuro.
Um lembrete de que, às vezes…

👉 o caminho mais direto ainda é o mais poderoso.