View previous topic :: View next topic
|
Author |
Message |
kirankumarj
New User
Joined: 18 Dec 2007 Posts: 51 Location: delaware
|
|
|
|
Hi,
At the end of each day, I need to read all the existing generations of a GDG Base (Say X )and then backup all of them as one different GDG Version (Say Y+1).
How can I do that ? Thanks for your time and info. |
|
Back to top |
|
|
superk
Global Moderator
Joined: 26 Apr 2004 Posts: 4652 Location: Raleigh, NC, USA
|
|
|
|
Since you're in the Compuware Forum, is this a FILE-AID question? |
|
Back to top |
|
|
kirankumarj
New User
Joined: 18 Dec 2007 Posts: 51 Location: delaware
|
|
|
|
As such, it doesnt matter. I am thinking in terms of IEBGENER,IDCAMS or for that matter,anything that works. |
|
Back to top |
|
|
superk
Global Moderator
Joined: 26 Apr 2004 Posts: 4652 Location: Raleigh, NC, USA
|
|
|
|
Just read against the base entry using whatever utility you want. That will concatenate all of the generations together as a single input dataset. |
|
Back to top |
|
|
kirankumarj
New User
Joined: 18 Dec 2007 Posts: 51 Location: delaware
|
|
|
|
I want to copy all versions as one after processing.
Will that work too with IDCAMS? |
|
Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007 Posts: 10886 Location: italy
|
|
|
|
Your question is not very clear...
ok reading all the gdg generations ( not versions ) in one single shot
what is not clear is where You want the written to ..
Do You want them as a single dataset with the same dcb attributes of the original GDG
or is enough for You to have them in backup format..
Thing about space and time to backup
case 1
Code: |
//ieb exec pgm=icegener ( faster than iebgener )
//sysprint dd syout=*
//sysin dd dummy
//sysut1 dd disp=shr,dsn=X not using a gneration will concatenate all the generations
//sysut2 dd .... disp and dcb and allocation parameters
// dsn=y(+1) |
case 2
Code: |
//dump exec pgm=adrdssu
//sysprint dd sysout=*
//sysut2 dd .... disp and dcb and allocation parameters
// dsn=y(+1)
//sysin dd *
DUMP DATASET(INCLUDE -
(x.** -
)) -
OUTDD(sysut2) -
SHA -
SPHERE -
TOL(ENQF) ADMIN |
just snippets, look att the appropriate doc for the exact syntax
also remember after the copy/dump to delete all the input generations
otherwise the next day You will have them again in the copy/dump
if You need to have the copy/dump
contain only the daily generations and,
at the same time have them available,
then, alas, You need to review Your requirements |
|
Back to top |
|
|
Anuj Dhawan
Superior Member
Joined: 22 Apr 2006 Posts: 6248 Location: Mumbai, India
|
|
|
|
kirankumarj wrote: |
I want to copy all versions as one after processing.
Will that work too with IDCAMS? |
Quote: |
Just read against the base entry using whatever utility you want. |
What's the difference will it make about the choice of utility..if only back-up is needed...& why don't give a try if You need a choice..? |
|
Back to top |
|
|
kirankumarj
New User
Joined: 18 Dec 2007 Posts: 51 Location: delaware
|
|
|
|
//STEP1 EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//IN1 DD DSN=CCSDLTQX.TRANS.SN8115IR.KIRAN,DISP=SHR
//OUT1 DD DSN=CCSDLTQX.TRANS.SN8115IR.KIRAN.TEST(+1),
// DCB=(RECFM=FB,LRECL=200),
// SPACE=(CYL,(2,1),RLSE),UNIT=SYSDA,
// DISP=(NEW,CATLG,DELETE)
//SYSIN DD *
REPRO INFILE(IN1) OUTFILE(OUT1)
//*==================================================================*
//STEP2 EXEC PGM=IEFBR14,COND=(0,NE,STEP1)
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//IN1 DD DSN=CCSDLTQX.TRANS.SN8115IR.KIRAN,
// DISP=(OLD,DELETE,DELETE) |
|
Back to top |
|
|
kirankumarj
New User
Joined: 18 Dec 2007 Posts: 51 Location: delaware
|
|
|
|
The above code worked. Thanks to all. |
|
Back to top |
|
|
Anuj Dhawan
Superior Member
Joined: 22 Apr 2006 Posts: 6248 Location: Mumbai, India
|
|
|
|
Hi,
Yup.. Your code will work & the other which were suggested earlier.
Thanks for sharing Your solution... |
|
Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007 Posts: 10886 Location: italy
|
|
|
|
it will work, but from a performance point of view
idcams is certainly the worst choice...
again i suggest ...
"ICEGENER" if You need to process the data
"ADRDSSU" if You simply need a backup |
|
Back to top |
|
|
Phrzby Phil
Senior Member
Joined: 31 Oct 2006 Posts: 1049 Location: Richmond, Virginia
|
|
|
|
Note an interesting/odd feature: referencing the GDG base only concatenates the gens in reverse order! |
|
Back to top |
|
|
|