TSO ISRDDN MEMBER(xpto) - Achar onde um determinado carga esta!

Por vezes precisei procurar onde um maldito carga executado, CLIST, REXX ou que seja que era excutado direto via TSO estava .

O comando em epigrafe resolve o mistério!

Mainframe, mega dica boa

---

Atualizacao em 11.06.2025, via IA

Como usar o ISRDDN no Mainframe TSO/ISPF

O que é o ISRDDN?

O ISRDDN é uma ferramenta diagnóstica do z/OS, fundamental para quem trabalha com TSO/ISPF no mainframe. Ela permite listar todos os DDNAMEs (datasets, bibliotecas, arquivos) alocados na sua sessão TSO, facilitando a localização de módulos, cargas e bibliotecas em uso no momento.

Principais funcionalidades

• Lista todos os DDNAMEs e datasets alocados na sessão TSO/ISPF.
• Mostra em quais bibliotecas estão os módulos executáveis (load modules).
• Ajuda a identificar duplicidades, conflitos e bibliotecas vazias.
• Permite examinar, editar, navegar e executar comandos sobre os datasets listados.
• Exibe a ordem de busca de módulos (STEPLIB, ISPLLIB, LINKLIST, LPA, etc.).

Como acessar o ISRDDN

1. No ISPF, digite TSO ISRDDN ou DDLIST na linha de comando e pressione Enter.
2. Será exibida uma tela com todos os DDNAMEs e datasets alocados na sua sessão.
3. Você pode pesquisar, navegar, editar ou examinar qualquer dataset diretamente dessa lista.

Exemplo de uso prático

• Descobrir de onde um programa está sendo carregado: Procure pelo nome do módulo nas bibliotecas LOAD listadas (STEPLIB, ISPLLIB, LINKLIST, etc.).
• Verificar se uma atualização está ativa: Veja se o módulo atualizado está na biblioteca correta e em uso.
• Diagnóstico de problemas: Identifique bibliotecas duplicadas, vazias ou conflitos de datasets.
• Análise de ambiente: Veja todas as bibliotecas que sua sessão está usando, incluindo as do sistema e pessoais.

Recursos avançados

• Visualizar ENQs (locks) e contendas.
• Navegar na memória (útil para suporte avançado).
• Adicionar bibliotecas do sistema à visualização para checar se um módulo está em LPA ou LINKLIST.

Resumo

O ISRDDN é uma ferramenta essencial para suporte, análise e troubleshooting em ambientes mainframe. Com ele, você descobre exatamente de onde está vindo qualquer módulo ou carga em uso na sua sessão, facilitando o diagnóstico e a administração do ambiente z/OS.

Mainframe - Prova de conceito captura de telas terminal 3270 e execução de comandos via script/macro

Próximos Passos

Com essa base, você pode:

1. Automatizar testes de programas COBOL
2. Integrar com pipelines CI/CD
3. Monitorar execução de jobs via scripts

Video 1 : Macro script em execução rodando comandos do windows no mainframe

Automatizando Tarefas no Mainframe: Script com ws3270 e Transferência de Arquivos

Neste video, demonstramos como automatizar conexões, transferências de arquivos e submissão de jobs no mainframe usando o emulador ws3270 e scripts batch.

Tudo capturado e documentado para reprodutibilidade!

Configuração do Ambiente

Arquivos Necessários

Na pasta C:\Ferramentas\ws3270, temos:

- x3270ifTest.bat    # Script principal
- x3270if.exe        # Utilitário de automação
- HELLOWORLD.txt     # Programa COBOL a ser transferido
- OUTPUT.TXT         # Arquivo de log das telas capturadas

Script Batch (x3270ifTest.bat)

# Autenticação e navegação inicial
x3270if -t 5000 -v "Connect(192.86.32.159)"
x3270if -t 5000 -v "Wait(InputField)"
x3270if -t 5000 -v "String(logon AU04660)"
x3270if -t 5000 -v "Enter()"

# Transferência do arquivo
x3270if -t 5000 -v "Transfer(Direction=send,Localfile=HELLOWORLD.txt,HostFile=AU04660.HELLOWRD)"

# Navegação e submissão do job
x3270if -t 5000 -v "Tab(4)"
x3270if -t 5000 -v "Enter()"
x3270if -t 5000 -v "String(sub)"
x3270if -t 5000 -v "Enter()"

Execução do Processo

Comando usado para iniciar a automação e capturar logs:

cmd> x3270ifTest.bat >> output.txt

Exemplo de Tela Capturadas no Output.txt

Figura 1: Conexao ao z/Os pela macro

Captura do 'sub no job'

*** JOB AU04660Z (JOB09955) SUBMITTED ***

Detalhes do Job Submetido

O programa COBOL transferido (HELLOWRD):

//AU04660Z JOB R8,'BUGA',MSGLEVEL=(1,1),CLASS=K,MSGCLASS=1,RD=NC,
// NOTIFY=&SYSUID
//CLG EXEC IGYWCLG
//COBOL.SYSIN DD *
    ID DIVISION.
        PROGRAM-ID. BUGA001.
    PROCEDURE DIVISION.
        DISPLAY "Hello world!"
        STOP RUN.
/*
//LKED.SYSLMOD DD DSN=AU04660.LOADS(BUGA001),DISP=OLD

Resultados e Aplicações

• ✅ Autenticação automática no TSO
• ✅ Upload de arquivos via script
• ✅ Navegação por menus do ISPF
• ✅ Submissão de job com número JOB09955
• ✅ Log completo em output.txt

Emulador de Mainframe ** Hercules - z/OS ** MicroFocus Mainframe Express - Enterprise Developer Edition

Ambiente de mainframe para estudos: materiais, dicas e emuladores

Atualização 2024 09 25 - Só valor histórico, quase nada funciona mais.

Fique a vontade para entrar em contato caso queira/ache algo que possa ser util ou mesmo para reescrevemos a postagem.


Tem um gitbook que esta um pouco mais atualizado, clica aqui pra conhece-lo!