Try adding the (+1) to the define, or .G0002V00 if that doesn't work. And even if G0002V00 is created, it might not be part of the gdg. You would have to go through the limit to test the automatic delete.
On Tue, Sep 26, 2023 at 12:40 PM Frank Swarbrick <frank.swarbr...@outlook.com> wrote: > > Weird that it created generation 1 correctly (as a VSAM file), but only that > generation seems to work. Oh well! > Thanks, > Frank > ________________________________ > From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> on behalf of > Richard McIntosh <richard.mcint...@oracle.com> > Sent: Tuesday, September 26, 2023 11:32 AM > To: IBM-MAIN@LISTSERV.UA.EDU <IBM-MAIN@LISTSERV.UA.EDU> > Subject: Re: VSAM GDG > > GDG's are for sequential files. You can make a backup of a VSAM to a > sequential GDG though. > To create a new gen you should be using PROD.CVSC.AHI.BKP(+1) > > > > -----Original Message----- > From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> On Behalf Of > Frank Swarbrick > Sent: Tuesday, September 26, 2023 12:27 PM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: [External] : VSAM GDG > > Are VSAM GDGs supported? I created the GDG base using the JCL below and was > able to create the first generation, but when I run that job again it tries > to create generation 1 again, giving me a JCL error because the GDS already > exists. > > > //DEFGDG JOB ,'DEFINE AHI GDG > > //DEFINE EXEC PGM=IDCAMS > > //SYSPRINT DD SYSOUT=* > > //SYSIN DD * > > DELETE (PROD.CVSC.AHI.BKP) > > IF MAXCC LE 8 THEN SET MAXCC=0 > > DEFINE GDG ( - > > NAME(PROD.CVSC.AHI.BKP) - > > LIMIT(5) - > > SCRATCH - > > ) > > > Thanks, > > Frank > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, send email to > lists...@listserv.ua.edu with the message: INFO IBM-MAIN > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- Mike A Schwab, Springfield IL USA Where do Forest Rangers go to get away from it all? ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
