☕ EXECIO no REXX Mainframe O canivete suíço de I/O que todo mundo usa… e quase ninguém respeita

 

☕ EXECIO no REXX Mainframe

O canivete suíço de I/O que todo mundo usa… e quase ninguém respeita

“Quando o REXX toca no disco, o EXECIO está por trás.
E quando o disco fica lento, geralmente é culpa de quem não entendeu o EXECIO.”

---

🧠 Introdução – Onde o REXX encontra o mundo real

REXX é excelente para controle, decisão e orquestração.
Mas em algum momento ele precisa fazer o que todo batch faz desde 1964:

👉 Ler dados
👉 Escrever dados

É aí que entra o EXECIO.

Simples no nome.
Perigoso no impacto.

---

🕰️ Origem histórica – Por que o EXECIO nasceu?

Antes do EXECIO:

• REXX era fortemente interativo

• I/O era dependente de comandos externos

• Ler arquivos sequenciais era lento e improvisado

Com a popularização do REXX no TSO/E e no batch, a IBM precisava de:

• Um método padrão

• Um comando eficiente

• Compatível com DDNAME

• Funcional tanto em TSO quanto em batch

Assim nasceu o EXECIO, no final dos anos 80, como ponte direta entre:

REXX ⇄ QSAM ⇄ MVS

---

📜 O que é EXECIO?

EXECIO é o comando REXX responsável por:

• Ler registros de um DDNAME

• Escrever registros em um DDNAME

• Transferir dados entre datasets e variáveis REXX

Ele trabalha sempre com:

• DDNAME alocado

• Registros sequenciais

• Stem variables

---

🧪 Sintaxe essencial

EXECIO <quantidade> DISKR <ddname> (STEM var.
EXECIO <quantidade> DISKW <ddname> (STEM var.

Exemplo básico:

EXECIO * DISKR SYSIN (STEM linhas.

Aqui:

• * = todas as linhas

• DISKR = leitura

• SYSIN = DDNAME

• linhas. = onde os dados vão morar

---

🧩 Curiosidades que pouca gente comenta

🧩 1. EXECIO não entende “arquivo”

Ele entende DDNAME.

Se o DDNAME não existe:

• RC pode ser enganoso

• O erro aparece em mensagem

• GETMSG vira obrigatório

---

🧩 2. EXECIO * carrega tudo na memória

EXECIO * DISKR BIGFILE (STEM big.

Se o arquivo tem:

• 10 mil linhas → ok

• 1 milhão → boa sorte

EXECIO * é confortável… até não ser.

---

🧩 3. A variável .0 manda mais que você

Após leitura:

say linhas.0

Ela contém quantos registros foram lidos.

Ignorar .0 é convite a loop errado.

---

🥚 Easter Eggs técnicos

🥚 1. Leitura parcial estratégica

EXECIO 1 DISKR INDD (STEM linha.

Ótimo para:

• Ler cabeçalhos

• Identificar layout

• Decidir processamento sem ler tudo

---

🥚 2. EXECIO + Data Stack

É possível combinar:

• EXECIO

• PUSH / QUEUE

• PARSE PULL

Criando pipelines “à moda antiga”.

---

🥚 3. EXECIO em SYSREXX

No batch, EXECIO:

• Roda sem terminal

• Depende totalmente do JCL

• É mais rápido

• É mais perigoso

---

🧠 Exemplo prático – Batch inteligente

EXECIO * DISKR INPUT (STEM in.
DO i = 1 TO in.0
  IF POS('ERRO', in.i) > 0 THEN DO
     SAY 'Erro detectado na linha' i
     EXIT 8
  END
END
EXECIO in.0 DISKW OUTPUT (STEM in.

Esse REXX:

• Lê

• Analisa

• Decide

• Escreve

Tudo antes do COBOL rodar.

---

⚠️ Riscos reais do EXECIO

• Arquivo grande → consumo de memória

• DISKW sem controle → overwrite silencioso

• DISKR sem validação → loop infinito

• Falta de fechamento → dados inconsistentes

Boa prática Jedi

EXECIO 0 DISKW OUTDD

Força flush e fechamento correto.

---

🛡️ EXECIO e segurança

EXECIO respeita:

• RACF

• Permissões de dataset

• Contexto do job

Mas:

REXX que escreve dados é tão poderoso quanto um utility IBM.

Controle de acesso é obrigatório.

---

☕ Comentário Bellacosa Mainframe

O EXECIO é o momento em que:

• O REXX deixa de ser “script”

• E passa a mexer em dados corporativos

Quem trata EXECIO como “detalhe”:

• Cria batch frágil

• Gera incidentes silenciosos

• Descobre o erro em produção

EXECIO não é comando.
É compromisso com o dado.

---

🧠 Frase final para colar no monitor

Se o REXX leu, ele é responsável.
Se escreveu, ele é culpado até prova em contrário.

 

Iniciação ao REXX – Quando o Mainframe Te Apresenta um Novo Amigo

“REXX não é moda. REXX é sobrevivência.”

Quem trabalha com z/OS, z/VM ou IBM Z cedo ou tarde chega a essa constatação:
não importa quantos produtos enterprise você tenha, sempre haverá aquele momento em que o problema é pequeno demais para COBOL, complexo demais para JCL e burocrático demais para justificar uma nova ferramenta.

É exatamente nesse espaço — invisível para muitos — que mora o REXX.

Subestimado, silencioso, quase sempre ignorado… até o dia em que você descobre que ele resolve 80% das dores do dia a dia com meia dúzia de linhas.

Este post é um convite:
👉 conhecer o REXX não como linguagem, mas como companheiro de trincheira no mainframe.

---

📜 Um pouco de história (porque nada no mainframe surge do nada)

O REXX (Restructured Extended Executor) nasceu em 1979, dentro da IBM, criado por Mike Cowlishaw.
A motivação era simples e genial:

Criar uma linguagem fácil de ler, difícil de quebrar e totalmente integrada ao sistema.

Enquanto o mundo brigava com sintaxe pesada, pontuação excessiva e códigos ilegíveis, o REXX nasceu com uma ideia revolucionária para a época:

• tudo é string

• tipagem dinâmica

• sintaxe próxima do inglês

• tolerância a erro humano

📌 Curiosidade:
REXX é mais antigo que Perl, Python e Ruby — e já fazia muita coisa que elas só popularizaram décadas depois.

---

🧠 REXX não vive sozinho: ambientes de processamento e comando

Aqui está o primeiro choque para quem vem de linguagens “tradicionais”:

👉 REXX não existe fora de um ambiente.

Antes de escrever código, você precisa entender onde ele roda e com quem ele conversa.

Ambientes de Processamento

• TSO/E

• ISPF

• Batch TSO

• Batch não-TSO

• z/VM (CMS / CP)

O mesmo EXEC pode se comportar de forma totalmente diferente dependendo do ambiente.

📌 Easter egg de sobrevivência:

Se você não sabe em que ambiente está, o erro não é do REXX — é seu.

---

Ambientes de Comandos

REXX não executa comandos diretamente.
Ele endereça comandos a um ambiente específico.

address tso "listcat level('USER01')"
address ispexec "display panel(MYPANEL)"

Isso explica por que REXX é tão poderoso:
ele fala a língua do sistema.

---

🧱 Fundamentos do REXX – Simples, mas não simplório

Filosofia da linguagem

• Tudo é string

• Conversão automática quando necessário

• Pouca pontuação

• Código legível

• Menos regras, mais resultado

say 'Hello, Mainframe!'

Sem ponto e vírgula.
Sem BEGIN obrigatório.
Sem cerimônia.

📌 Curiosidade perigosa:
Variáveis não inicializadas não geram erro.
Elas retornam o próprio nome.
Ótimo para debug… péssimo se você não souber 😄

---

Entrada, saída e lógica

• SAY → saída

• PULL → entrada (stack)

• IF / THEN / ELSE

• DO / END

• EXIT

Aqui o REXX começa a mostrar sua vocação: automatizar decisões, não apenas executar código.

---

🖥️ REXX e o Ambiente TSO – Onde a mágica começa

Com REXX você:

• aloca datasets

• consulta catálogos

• automatiza comandos

• elimina JCL desnecessário

address tso "allocate fi(arq1) da('user.test.ps') shr"
address tso "listalc"

📌 Comentário Bellacosa:
REXX + TSO = menos JCL, menos erro, menos dor de cabeça.

---

📦 CLISTs x EXECs – O passado e o presente

CLIST fez história.
Mas o REXX fez melhor.

• EXECs são mais poderosos

• Mais legíveis

• Mais fáceis de manter

• Melhor integração

Entender a sequência de busca (SYSEXEC, SYSPROC…) é obrigatório.

📌 Easter egg clássico:
“EXEC não encontrado” quase sempre é DD errado, não código errado.

---

🔁 Programação REXX – Onde o iniciante vira sysprog

Aqui o REXX mostra que não é brinquedo:

• Funções e subrotinas

• Escopo de variáveis

• DO composto

• ITERATE e LEAVE

• SELECT (case statement elegante)

• SIGNAL e SIGNAL VALUE

• INTERPRET (meta-programação!)

cmd = "say 'REXX é poderoso'"
interpret cmd

📌 Comentário raiz:
INTERPRET é um sabre de luz.
Poderoso… mas não entregue para qualquer padawan.

---

🌳 Variáveis, Strings e o poder do PARSE

Stems – arrays antes dos arrays

nome.1 = 'Ana'
nome.2 = 'João'
nome.0 = 2

PARSE – o superpoder escondido

parse var linha campo1 ',' campo2

📌 Curiosidade:
PARSE elimina dezenas de IFs, SUBSTRs e gambiarras.

---

📂 EXECIO – O mini DFSORT do dia a dia

"EXECIO * DISKR ARQ1 (STEM LIN.)"

Com EXECIO você:

• lê arquivos

• grava datasets

• processa linhas

• automatiza relatórios

Tudo sem sair do REXX.

---

🧪 Depuração – Porque errar faz parte

REXX não te abandona quando algo dá errado:

• TRACE

• RC

• SIGL

• SOURCELINE

• CONDITION

📌 Curiosidade histórica:
Debug nativo em REXX era luxo quando muitas linguagens nem sonhavam com isso.

---

⚙️ Batch, endereços e ambientes avançados

REXX roda:

• em batch TSO

• fora do TSO

• em múltiplos ambientes de comando

say address()

📌 Comentário Bellacosa:

Antes de perguntar “por que falhou”, pergunte “onde estou rodando”.

---

🚀 Compilador REXX – Performance e proteção

Sim, REXX pode ser compilado:

• melhora performance

• protege código

• usado em ambientes críticos

Mesmo compilado, ele não perde sua alma dinâmica.

---

☕ Conclusão – Por que REXX vira amigo

REXX não tenta competir com COBOL.
Não substitui Assembler.
Não briga com produtos enterprise.

Ele faz algo muito mais valioso:

👉 resolve problemas reais com o que já existe no sistema.

Quem domina REXX:

• automatiza mais

• depende menos

• entende melhor o ambiente

• sobrevive melhor no data center

No mainframe, o melhor amigo
não é o software mais caro…
é o que resolve às 3 da manhã.

Bem-vindo ao REXX.
Ele sempre esteve aí. ☕🖥️