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"


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

Tecnologia	Papel
SDSF	observabilidade
JES2	engine batch
RACF	segurança

El Jefe Midnight Lunch

Translate

segunda-feira, 17 de agosto de 2015