Concatenar librerias SYSPROC con comando ALLOCATE

Todo lo relacionado con TSO e ISPF.
Responder
Avatar de Usuario
fernypa
Colaborador
Colaborador
Mensajes: 118
Registrado: 28 Sep 2007, 11:09
País: ESPAÑA
Ciudad: MADRID
Ocupación: IT Specialist
Ubicación: Madrid / España

Concatenar librerias SYSPROC con comando ALLOCATE

Mensaje por fernypa » 09 Abr 2019, 11:31

Hola a todos

Estaba haciendo unas pruebas y resulta que cuando alocas una librería como SYSPROC con el comando ALLOCATE
ALLOCATE FI(SYSPROC) da(LIBRERIA.REXX) SHR REUSE
Resulta que quita todas las librerias que tienes en SYSPROC y solo deja esa, esto lo veo con ISRDDN
¿ es posible de alguna manera concatenar la librería sin que se quiten las que tienes en el procedimiento de LOGON ?
Si incluyes estas librerias como SYSUEXEC o SYSUPROC te aparecen en ISRDDN pero no funcionan (pensaba que eran DD de usuario)

un saludo
fernypa

Avatar de Usuario
fernypa
Colaborador
Colaborador
Mensajes: 118
Registrado: 28 Sep 2007, 11:09
País: ESPAÑA
Ciudad: MADRID
Ocupación: IT Specialist
Ubicación: Madrid / España

Re: Concatenar librerias SYSPROC con comando ALLOCATE

Mensaje por fernypa » 10 Abr 2019, 09:48

Una aclaración

Lo que intento hacer, es añadir dinamicamente una librería para poder ejecutar una macro

Un saludo
fernypa

f_caballero
Usuario avanzado
Usuario avanzado
Mensajes: 61
Registrado: 25 Sep 2007, 16:36
País: España
Ciudad: Madrid
Ocupación: Analista de desarrollo

Re: Concatenar librerias SYSPROC con comando ALLOCATE

Mensaje por f_caballero » 13 Abr 2019, 07:44

Hola, prueba el comando ALTLIB, yo lo he usado en algún programa REXX para poder llamar a otros míos también.

altlib activate application(clist) dataset(clist.name) uncond quiet

Aquí va la URL del manual por si quieres ver más cosillas:
https://www.ibm.com/support/knowledgece ... mple_3.htm

Esto es código que yo he usado ya en un REXX:
ADDRESS TSO "ALTLIB ACT APPL(EXEC) DATASET('mi.dataset')"

Para liberar, cuando acabes, utiliza "DEACTIVATE"

Suerte
Salud y fortuna.
Fernando Caballero

Abbys
Usuario
Usuario
Mensajes: 24
Registrado: 29 Sep 2015, 01:37
País: España
Ciudad: Madrid
Ocupación: Otra
Contactar:

Re: Concatenar librerias SYSPROC con comando ALLOCATE

Mensaje por Abbys » 13 Abr 2019, 08:22

Buenas fernypa

Yo lo suelo hacer un programita en REXX como el siguiente:

/* REXX */
/* Concatena y activa librerias de usuario a SYSUEXEC para ejecutar */
/* REXX mediante "TSO %comando" */
ADDRESS TSO "ALLOCATE FI(SYSUEXEC) DA('IBMUSER.REXX') SHR REU"
ADDRESS TSO "ALTLIB ACTIVATE USER(EXEC)"

Eso aloca la librería que quieras a la DD SYSUEXEC. Lo ejecutas y, de esta forma, podrás ejecutar las macros que quieras.
Si tengo un rato, haré una entrada más detallada sobre esto en https://emuframe.com/

Te dejo más información de la DD SYSUEXEC
https://www.ibm.com/support/knowledgece ... ommand.htm

¡Espero que te sirva!
Mi blog de Mainframe: https://emuframe.com

Responder