> -----Original Message-----
> From: IBM Mainframe Discussion List On Behalf Of Paul Gilmartin
>
> 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!
Think "override" rather than "substitution". Occasionally there is use
for a "null override" as well. For example, suppose your PROC had the
three libraries as listed above:
//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
and you wanted to add a fourth library, but make it second in the
concatenation and move the current second library to the fourth
position. Your invocation JCL need contain only:
//OWNSYSLB DD
// DD DISP=SHR,DSN=your.own.private.copy.lib4
// DD
// DD DISP=SHR,DSN=your.own.private.copy.lib2
-jc-
----------------------------------------------------------------------
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
