mmwife
Super Moderator
Joined: 30 May 2003 Posts: 1592
|
|
|
|
Give this a try:
(You may have to edit the O/P dataset to give it the look you want.)
Code: |
//SEARCH EXEC PGM=ISRSUPC,
// PARM=(SRCHCMP,'ANYC')
//*EWDD DD DSN=SPEC.PROD.SOURCE,
//*EWDD DD DSN=JS6855.PJT.LIBRARY,
//NEWDD DD DSN=SPEC.PROD.JCL,
//*EWDD DD DSN=SPEC.QUAL.JCL,
//*EWDD DD DSN=SPEC.TEST.JCLLIB,
//*EWDD DD DSN=JS6855.PJT.JCLLIB,
//*EWDD DD DSN=RB6605.PWM.JCLLIB,
//*EWDD DD DSN=JS6855.PJT.PRDJCL,
//*EWDD DD DSN=SPEC.TEST.CNTLLIB,
//*EWDD DD DSN=SPEC.PROD.CNTLLIB,
//*EWDD DD DSN=JS6855.PJT.CNTLLIB,
//*EWDD DD DSN=JS6855.PJT.LISTLIB,
// DISP=SHR
//*OUTDD DD SYSOUT=(,),OUTPUT=*.LOCPTR
//*OUTDD DD SYSOUT=*
//OUTDD DD DSN=YRID.MYLIST,
// DISP=(,CATLG,DELETE),...
//SYSIN DD *
SRCHFOR '_'
SELECT INPLKBAT,FAPLKBAT,DWPLKBAT,HOPLKBAT,UMPLKBAT,REPLKBAT,DRPLKBAT
SELECT AUTMASTV,AUTMST95,AUTOMAST,AUTOMSTR,VAUTMAST
// |
|
|