Translate

Mostrar mensagens com a etiqueta z15. Mostrar todas as mensagens
Mostrar mensagens com a etiqueta z15. Mostrar todas as mensagens

segunda-feira, 17 de agosto de 2015

🚀 🧪 LAB 1 — REXX + SDSF (MONITORAMENTO DE JOBS)

 

Bellacosa Mainframe coloque a prova seu conhecimento em REXX

🚀 🧪 LAB 1 — REXX + SDSF (MONITORAMENTO DE JOBS)

🎯 Objetivo

Listar jobs ativos e analisar status


💻 Código

/* REXX */
address sdsf

"ISFEXEC ST"

if rc <> 0 then do
say "Erro ao acessar SDSF"
exit
end

do i = 1 to isfrows
say isfjobname.i isfowner.i isfstatus.i
end

🧠 Explicação

  • address sdsf → muda ambiente
  • ISFEXEC ST → consulta status de jobs
  • isfrows → quantidade de jobs

💣 Insight

👉 Você acabou de acessar o spool do sistema
👉 Isso é praticamente um mini-monitor de produção


🚀 🧪 LAB 2 — FILTRANDO JOBS (PRODUÇÃO REAL)

🎯 Objetivo

Mostrar apenas jobs ativos do seu usuário


/* REXX */
address sdsf
"ISFEXEC ST"

do i = 1 to isfrows
if isfowner.i = userid() then
say isfjobname.i isfstatus.i
end

💣 Insight

👉 Isso é base para:

  • dashboards
  • monitoramento automático
  • alertas

🚀 🧪 LAB 3 — CANCELAR JOB (OPERAÇÃO REAL)

⚠️ cuidado: ambiente permite ou não dependendo do RACF

/* REXX */
address sdsf
"ISFEXEC ST"

do i = 1 to isfrows
if isfjobname.i = "JOBTEST" then do
"CANCEL " isfjobid.i
say "Job cancelado:" isfjobid.i
end
end

💣 Insight

👉 Isso é poder de operador
👉 Em produção → altamente controlado


🚀 🧪 LAB 4 — LER OUTPUT DE JOB (LOG ANALYSIS)

/* REXX */
address sdsf
"ISFEXEC ST"

do i = 1 to isfrows
if isfjobname.i = "JOBTEST" then do
"ISFACT ST TOKEN('"isftoken.i"') PARM(NP SA)"
end
end

🧠 Explicação

👉 você está acessando spool
👉 lendo logs de execução


💣 Uso real

  • detectar abend
  • analisar erro batch
  • auditoria

🚀 🧪 LAB 5 — JES2 COMMAND (OPERAÇÃO SISTEMA)

/* REXX */
address tso
"STATUS"

ou

address tso
"$D JOBQ"

💣 Insight

👉 $D JOBQ = comando JES2
👉 lista fila de jobs


🚀 🧪 LAB 6 — RACF CHECK (SEGURANÇA)

/* REXX */
address tso
"LU " userid()

🧠 Explicação

  • mostra info do usuário
  • grupos
  • permissões básicas

🚀 🧪 LAB 7 — VALIDAR ACESSO

/* REXX */
parse arg dsname

address tso
"LISTDS '"dsname"'"

if rc = 0 then
say "Acesso OK"
else
say "Sem acesso"

💣 Insight

👉 simula controle de segurança
👉 útil para auditoria


🚀 🧪 LAB 8 — MONITOR DE ERRO AUTOMÁTICO

/* REXX */
address sdsf
"ISFEXEC ST"

do i = 1 to isfrows
if isfstatus.i = "OUTPUT" then do
if pos("ABEND", isfjobname.i) > 0 then
say "Possível erro:" isfjobname.i
end
end

🚀 🧠 VISÃO NÍVEL BELLACOSA

Esses labs parecem simples…

👉 mas representam o que acontece em produção:


🔥 1. SDSF = Observabilidade

  • monitora jobs
  • lê logs
  • controla execução

🔥 2. JES2 = Orquestrador

  • fila de jobs
  • execução batch
  • scheduling

🔥 3. RACF = Segurança

  • autenticação
  • autorização
  • auditoria

💣 TRADUÇÃO BRUTAL

TecnologiaPapel
SDSFobservabilidade
JES2engine batch
RACFsegurança

🚀 🧪 DESAFIO (NÍVEL AVANÇADO)

Crie um script que:

👉 lista jobs
👉 identifica erro
👉 grava relatório em dataset