Unless other FDR/FDRDSF/FDRABR users or Bruce Black of Innovation can think of something else, that's probably as close as you will get to your DF/DSS job.
>>> [EMAIL PROTECTED] 4/7/2006 12:57:48 PM >>> Richard, Thats something like what I tried with FDRAPPL, and as you say the disk datasets end up with generated names, but it doesnt work when the output is on SMS volumes. neither will it allow an output datsaset to exist on any of the input volumes. Thanks Roy Richard Pinion wrote: > Take a look at this, > > //STEP010 EXEC PGM=FDRARCH > //SYSPRINT DD SYSOUT=* > //SYSUDUMP DD SYSOUT=* > //ARCHIVE DD DSN=BHSRP.RWP.ARCHIVE, > // DISP=(,CATLG,DELETE),UNIT=SYSDA, > // SPACE=(TRK,(50)) > //SYSIN DD * > FORMAT RECS=9999 > //* > //STEP015 EXEC PGM=FDRABR > //SYSPRINT DD SYSOUT=* > //SYSPRIN1 DD SYSOUT=* > //SYSPRIN2 DD SYSOUT=* > //SYSUDUMP DD SYSOUT=* > //ABRMAP DD SYSOUT=* > //ARCHIVE DD DSN=BHSRP.RWP.ARCHIVE,DISP=SHR > //TAPE1 DD DSN=BHSRP.NOTHNG,DISP=(,KEEP,DELETE), > // UNIT=TAPE,LABEL=RETPD=61,VOL=(,,,255) > //SYSIN DD * > DUMP TYPE=APPL,ARCBACKUP=NO,FORMAT=NEW,MAXCARDS=9999,PRINT=ABR, > BUFNO=MAX,DSNENQ=NONE,ENQ=OFF,ENQERR=NO > SELECT CATDSN=ZOS15.SMPE.** > > Only hitch is that if you dump to a disk rather than tape the names on disk > won't be what you specify in the JCL. > ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
