On Tue, 8 Jan 2008 21:19:27 -0600, Paul Gilmartin <[EMAIL PROTECTED]> wrote:
>On Tue, 8 Jan 2008 13:48:30 -0600, Mark Zelden wrote: >> >>>Acutally IEBCOPY (we are at z/OS V1.7) has COPYGRP. May fit the bill. >> >>Not unless the input or output or both are PDSE. See the fine manual for >>details. >> >Hmmm. So could one circumvent by COPYGRP from a PDS to a temporary PDSE, >thence to a destination PDS? Weird. And two trips through the Binder. > Exactly. Even though I always carry PDS (PDS86) with me, I like to rely on tools that are available everywhere. This is in my "tool kit": //MYJOB JOB (ACCT),CLASS=A,... //* //* "TRICK" TO USE COPYGRP TO COPY ALIASES FROM A PDS TO //* ANOTHER PDS SINCE COPYGRP ONLY WORKS WITH PDSE //* //STEP1 EXEC PGM=IEBCOPY,REGION=4M,PARM='WORK=4M' //SYSPRINT DD SYSOUT=* //SYSUDUMP DD SYSOUT=* //SYSUT3 DD UNIT=VIO,SPACE=(CYL,(1,1)) //SYSUT4 DD UNIT=VIO,SPACE=(CYL,(1,1)) //IN1 DD DSN=SOME.PDS,DISP=SHR //OUT1 DD DSN=&&TMPPDSE, // DISP=(NEW,PASS),UNIT=SYSALLDA, // DSNTYPE=LIBRARY, // SPACE=(CYL,(25,25,1)), // DCB=(LRECL=80,BLKSIZE=32760,RECFM=U,DSORG=PO) //* //* MYPROG CAN BE AN ALIAS OR THE REAL LMOD //* //SYSIN DD * COPYGRP INDD=IN1,OUTDD=OUT1 S M=MYPROG /* //STEP2 EXEC PGM=IEBCOPY,REGION=4M,PARM='WORK=4M' //SYSPRINT DD SYSOUT=* //SYSUDUMP DD SYSOUT=* //SYSUT3 DD UNIT=VIO,SPACE=(CYL,(1,1)) //SYSUT4 DD UNIT=VIO,SPACE=(CYL,(1,1)) //IN1 DD DSN=&&TMPPDSE,DISP=(OLD,DELETE) //OUT1 DD DSN=SOME.OTHER.PDS,DISP=SHR //SYSIN DD * COPYGRP INDD=IN1,OUTDD=OUT1 /* -- Mark Zelden Sr. Software and Systems Architect - z/OS Team Lead Zurich North America / Farmers Insurance Group - ZFUS G-ITO mailto:[EMAIL PROTECTED] z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/ Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.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
