On Tue, 11 Nov 2008 08:22:40 +0100, Hunkeler Peter (KIUK 3) wrote:

>Try this:
>
>//SYSLIB    DD DDNAME=OWNSYSLB
>//          DD DISP=SHR,DSN=APPL.PROD.COPYLIB
>//*
>//OWNSYSLB  DD DISP=(NEW,KEEP),DSN=&&OWNSYSLB,
>//          SPACE=(TRK,(1,,1)),RECFM=U,LRECL=32760
>//*
I don't know about KEEP on a temporary DSN; I'd be more comfortable
with PASS.  But I'm very uncomfortable with DELETE in a PROC.
It has bad effects when I override with a catalogued data set and
forget to override DISP.

>If you need more than one private library, three in this
>example, code:
>//*
>//OWNSYSLB DD DISP=SHR,DSN=your.own.private.copy.lib1
>//         DD DISP=SHR,DSN=your.own.private.copy.lib2
>//         DD DISP=SHR,DSN=your.own.private.copy.lib3
>
I didn't know that worked with an entire catenation.  I had
thought the substitution was one-for-one.  How useful!

-- gil

----------------------------------------------------------------------
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

Reply via email to