Or why not just allocate a standard PS file and then clear it when you are done with it? *don*
On Tue, Jan 18, 2011 at 12:43 PM, McKown, John < john.mck...@healthmarkets.com> wrote: > Why not use DSN=GDG.DSNAME(0),DISP=(NEW,CATLG) instead of (+1)? > > -- > John McKown > Systems Engineer IV > IT > > Administrative Services Group > > HealthMarkets(r) > > 9151 Boulevard 26 * N. Richland Hills * TX 76010 > (817) 255-3225 phone * > john.mck...@healthmarkets.com * > www.HealthMarkets.com<http://www.healthmarkets.com/> > > Confidentiality Notice: This e-mail message may contain confidential or > proprietary information. If you are not the intended recipient, please > contact the sender by reply e-mail and destroy all copies of the original > message. HealthMarkets(r) is the brand name for products underwritten and > issued by the insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake > Life Insurance Company(r), Mid-West National Life Insurance Company of > TennesseeSM and The MEGA Life and Health Insurance Company.SM > > > > > -----Original Message----- > > From: IBM Mainframe Discussion List > > [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Fred Kaptein > > Sent: Tuesday, January 18, 2011 11:29 AM > > To: IBM-MAIN@bama.ua.edu > > Subject: GDG Question > > > > Hello, > > > > I have a question on GDGs > > We have a GDG data set GDG.DSNAME.G0001V00 and append data into > > this data set throughout the day. > > > > We then run a batch job where we do the following: > > 1. Read GDG.DSNAME(0) > > 2. Delete GDG.DSNAME(0) as follows > > //DELETE EXEC PGM=IEFBR14 > > //DD1 DD DSN=GDG.DSNAME(0), > > // DISP=(OLD,DELETE,DELETE) > > 3. Allocate a new GDG.DSNAME(+1) as > > follows: > > //ALLOC EXEC PGM=IEFBR14,COND=(4,LE) > > //DD1 DD DSN=ISM.SMF.ZHAD011(+1), > > // DISP=(NEW,CATLG,DELETE),UNIT=3390, > > // SPACE=(CYL,(50,50)) > > > > The ALLOC step actually allocates GDG dataset GDG.DSNAME.G0002V00 > > Besides changing SMS or running two batch jobs, is there any way to > > completely delete GDG.DSNAME(0) and allocate GDG.DSNAME(+1) where > > GDG.DSNAME(+1) will remain with the name GDG.DSNAME.G0001V00 > > > > ---------------------------------------------------------------------- > > For IBM-MAIN subscribe / signoff / archive access instructions, > > send email to lists...@bama.ua.edu 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 lists...@bama.ua.edu 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 lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html