An EXTENDED GDG can have 999 generations active. I believe that a GDG must be defined as EXTENDED, it isn't ALTERable.
One thing to keep in mind is that with an EXTENDED GDG, each generation has its own catalog entry. That could cause a significant catalog size increase. I don't know why it was implemented this way. sas On Tue, Dec 20, 2016 at 2:33 PM, Allan Staller <[email protected]> wrote: > What Sri said! > > <sbnip> > > Step 1 : Get Listcat information for the GDG Base Step 2 : parse the > Listcat information for the migrated generations and generate HRECALL > commands using DFSORT > Step3 : Run the commands from step 2 > > //*************************************************************** > //* GET THE LIST OF DATASETS NAMES USING LISTCAT ON GDG BASE * > //*************************************************************** > //STEP0100 EXEC PGM=IKJEFT01 > //SYSTSPRT DD DSN=&&L,DISP=(,PASS),SPACE=(CYL,(25,25),RLSE), > // DCB=(LRECL=80,RECFM=FB,BLKSIZE=27920) > //SYSTSIN DD * > LISTCAT LEVEL('Your GDG Base Name') ALL > //* > //*************************************************************** > //* PARSE THE LISTCAT INFO TO GENERATE THE HRECALL STATEMENTS * > //*************************************************************** > //STEP0200 EXEC PGM=SORT > //SYSOUT DD SYSOUT=* > //SORTIN DD DISP=SHR,DSN=&&L > //SORTOUT DD DSN=&&H,DISP=(,PASS),SPACE=(CYL,(25,25),RLSE), > // DCB=(LRECL=80,RECFM=FB,BLKSIZE=27920) > //SORTOUT DD SYSOUT=* > //SYSIN DD * > OPTION COPY > INREC IFTHEN=(WHEN=GROUP,BEGIN=(1,7,CH,EQ,C'NONVSAM'), > PUSH=(82:17,44)), > IFTHEN=(WHEN=(8,6,CH,EQ,C'VOLSER',AND,26,5,CH,EQ,C'MIGRAT'), > OVERLAY=(81:C'P')) > > OUTFIL INCLUDE=(81,1,CH,EQ,C'P'), > BUILD=(82,44,JFY=(SHIFT=LEFT,LEAD=C' HRECALL ''', > TRAIL=C''' NOWAIT',LENGTH=80)) > //* > //**************************************************************** > //* RUN THE HRECALL COMMANDS * > //**************************************************************** > //STEP0300 EXEC PGM=IKJEFT01 > //SYSTSPRT DD SYSOUT=* > //SYSTSIN DD DISP=SHR,DSN=&&H > //* > </snip> > > > ::DISCLAIMER:: > ------------------------------------------------------------ > ------------------------------------------------------------ > ---------------------------- > > The contents of this e-mail and any attachment(s) are confidential and > intended for the named recipient(s) only. > E-mail transmission is not guaranteed to be secure or error-free as > information could be intercepted, corrupted, > lost, destroyed, arrive late or incomplete, or may contain viruses in > transmission. The e mail and its contents > (with or without referred errors) shall therefore not attach any liability > on the originator or HCL or its affiliates. > Views or opinions, if any, presented in this email are solely those of the > author and may not necessarily reflect the > views or opinions of HCL or its affiliates. Any form of reproduction, > dissemination, copying, disclosure, modification, > distribution and / or publication of this message without the prior > written consent of authorized representative of > HCL is strictly prohibited. If you have received this email in error > please delete it and notify the sender immediately. > Before opening any email and/or attachments, please check them for viruses > and other defects. > > ------------------------------------------------------------ > ------------------------------------------------------------ > ---------------------------- > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to [email protected] with the message: INFO IBM-MAIN > -- sas ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
