View previous topic :: View next topic
|
Author |
Message |
sudheeshnithya
New User
Joined: 22 Jul 2008 Posts: 2 Location: chennai
|
|
|
|
Hi All,
I have GDG having 300 generations. I want to copy all generations into another GDG file. Is there a way to copy from GDG base with all generations to another GDG file or sequential file. I have tried the following job to copy. But many times i ran the same job to copy all generations. Can anyone give me idea how to copy in one step ?
//TRKD0100 EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//SORTWK01 DD SPACE=(CYL,(20,5),RLSE)
//SORTWK02 DD SPACE=(CYL,(20,5),RLSE)
//SORTWK03 DD SPACE=(CYL,(20,5),RLSE)
//SORTWK04 DD SPACE=(CYL,(20,5),RLSE)
//SYSPRINT DD SYSOUT=*
//SORTIN DD DISP=SHR,DSN=NDTK.TRHG.TG.FILE(-1)
// DD DISP=SHR,DSN=NDTK.TRHG.TG.FILE(-2)
// DD DISP=SHR,DSN=NDTK.TRHG.TG.FILE(-3)
//SORTOUT DD DSN=NDTK.NEWFILE.TEST(+1),
// DISP=(NEW,CATLG,DELETE),
// SPACE=(CYL,(1000,500),RLSE),
// DCB=(*.SORTIN)
//* DCB=(RECFM=VB,LRECL=32756)
//SYSIN DD *
SORT FIELDS=COPY |
|
Back to top |
|
|
karthikr44
Active User
Joined: 25 Aug 2007 Posts: 235 Location: Chennai
|
|
|
|
Hi,
In sortin just give the base name. It will copy all generations.
Regards
R KARTHIK |
|
Back to top |
|
|
gcicchet
Senior Member
Joined: 28 Jul 2006 Posts: 1702 Location: Australia
|
|
|
|
Hi,
the only thing to remember when using just the GDG base name is that the files are read from the oldest first.
Gerry |
|
Back to top |
|
|
Arun Raj
Moderator
Joined: 17 Oct 2006 Posts: 2481 Location: @my desk
|
|
|
|
Rajan,
Quote: |
But many times i ran the same job to copy all generations. |
Why do you want to run the job multiple times?. I could nt get this part
Thanks,
Arun |
|
Back to top |
|
|
gcicchet
Senior Member
Joined: 28 Jul 2006 Posts: 1702 Location: Australia
|
|
|
|
Hi,
I have a question, how did you manage to get 300 GDG's, I'm assuming it's the same GDG base when 255 is the limit.
Gerry |
|
Back to top |
|
|
expat
Global Moderator
Joined: 14 Mar 2007 Posts: 8797 Location: Welsh Wales
|
|
|
|
gcicchet wrote: |
Hi,
I have a question, how did you manage to get 300 GDG's, I'm assuming it's the same GDG base when 255 is the limit.
Gerry |
Yeah, I'd like the answer to that one too. |
|
Back to top |
|
|
sudheeshnithya
New User
Joined: 22 Jul 2008 Posts: 2 Location: chennai
|
|
|
|
Hi,
I am new to this forum. Actually the active generation is started from G3740V00 to G3859V00. I want to copy the entire generations to another GDG or sequential file. sorry to say this, instead of 200 generations, i mentioned 300 generations in my previous mail. Thanks |
|
Back to top |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006 Posts: 6966 Location: porcelain throne
|
|
|
|
How about rename?
by the way, g3740 to g3859 is more like 119. |
|
Back to top |
|
|
gcicchet
Senior Member
Joined: 28 Jul 2006 Posts: 1702 Location: Australia
|
|
|
|
Hi Dick,
I agree 119 is closer to the mark but 120 is more accurate
Gerry |
|
Back to top |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006 Posts: 6966 Location: porcelain throne
|
|
|
|
gcicchet,
Du hast Recht. |
|
Back to top |
|
|
gcicchet
Senior Member
Joined: 28 Jul 2006 Posts: 1702 Location: Australia
|
|
|
|
Dick,
non so sempre corretto.
Gerry |
|
Back to top |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006 Posts: 6966 Location: porcelain throne
|
|
|
|
gcicchet,
I am not either, but you were this time. |
|
Back to top |
|
|
|