Ver Mensaje Individual
  #3
Antiguo 28 de marzo de 2018, 12:10
RaulC
Forero Junior
Última Actividad 21.01.2026 09:48
Posts Posts: 5
Likes enviados Enviados: 4
Likes recibidos Recibidos: 2

Citación del post de Kuk Ver Mensaje
RaulC, a lo mejor podrías intentar grabando el dato que te interesa a un miembro de PDS el cual luego introduces en tu JCL con INCLUDE:

Código JCL:
  1. //   JCLLIB ORDER=MI.LIBRERIA.PDS
  2. //   INCLUDE MIEMBRO

Otra opción sería crear un JOB en dinámico (con un programa, o SORT OUTREC) y lanzarlo desde el JOB que lo ha creado con el siguiente step:

Código JCL:
  1. //STEPJCL  EXEC PGM=IEBGENER,COND=(5,LT)
  2. //SYSIN    DD DUMMY
  3. //SYSPRINT DD SYSOUT=*
  4. //SYSUT2   DD SYSOUT=(A,INTRDR)
  5. //SYSUT1   DD DSN=&&FICHJLC,DISP=(OLD,DELETE,DELETE)
  6. /*

Lugo está el REXX que no conozco mucho, pero se puede hacer muchas cosas. Lo mismo lo más fácil es tirar por ahí.
Estoy analizando las propuestas que me has comentado, aunque creo que están todas prohibidas en mi instalación.

He visto en algún ejemplo como se vuelcan fichas DD a variables JCL, como por ejemplo un sysprint. ¿Habría algún programa de utilidad o algo así para sacar el contenido de un fichero por sysout (u otra ficha DD)?

Voy a mirarlo en detalle, saludos y muchas gracias.
RaulC is offline   Responder Con Cita