View previous topic :: View next topic
|
Author |
Message |
subratarec
Active User
Joined: 22 Dec 2007 Posts: 130 Location: Bangalore
|
|
|
|
I have 10 datasets and I want to copy all these to GDG's (I have GDG Base:FDWS01.TEST.RESTORE) in one shot. Can we do that in one shot, maybe by using IEBGENER.
10 dtaasets
---------------------------
FDWS01.SUB.RESTORE1
FDWS01.SUB.RESTORE2
FDWS01.SUB.RESTORE3
;
;
FDWS01.SUB.RESTORE10
TO
GDG's
---------------------------------------
FDWS01.TEST.RESTORE.G0001V00
FDWS01.TEST.RESTORE.G0002V00
FDWS01.TEST.RESTORE.G0003V00
;
;
FDWS01.TEST.RESTORE.G0010V00
I tried and it seems to me that it is not possible but I want to recheck with you all. So is that means in this scenario I have write each step for each file to be copied into GDG?? |
|
Back to top |
|
|
karisurya
New User
Joined: 02 Aug 2007 Posts: 64 Location: Bangalore
|
|
|
|
Hi,
Can you clarify below statement
Quote: |
I have 10 datasets and I want to copy all these to GDG's (I have GDG Base:FDWS01.TEST.RESTORE) in one shot.
|
Are the generations already created or you are going to create gdg's in this job?
Are you trying to copy data from FDWS01.SUB.RESTORE1 to FDWS01.TEST.RESTORE.G0001V00 and so on?
Regards,
Surya |
|
Back to top |
|
|
PeterHolland
Global Moderator
Joined: 27 Oct 2009 Posts: 2481 Location: Netherlands, Amstelveen
|
|
|
|
IDCAMS REPRO will do the job. |
|
Back to top |
|
|
subratarec
Active User
Joined: 22 Dec 2007 Posts: 130 Location: Bangalore
|
|
|
|
Hi Surya..
Thanks for fast reply.
Nope the generations are not created. I have only the GDG Base created. But in one job I want to copy all these 10 flat sequential files into GDG's. |
|
Back to top |
|
|
Escapa
Senior Member
Joined: 16 Feb 2007 Posts: 1399 Location: IL, USA
|
|
|
|
Quote: |
Can we do that in one shot using a JCL |
There are no shots in JCL there are steps.
one or more steps....
Quote: |
I want to copy all these 10 flat files to a GDG versions flat files
|
You also need to get the difference between GDG versions and generations clear. See any of expats posts on this.
Coming back to your query...
You can do this using ICETOOL in one step. |
|
Back to top |
|
|
henry888
New User
Joined: 21 Sep 2009 Posts: 51 Location: china
|
|
|
|
if you haven't created the generations,I think you can not finish all the tasks in a single step because you have to firstly create new generation and then you can copy data to the created generation.
I suggest that in each step you create a new generation and then copy data to that generation.In every step a new generation is created and the data is copied into the generation.Doing like this will be clear and make no mistake. |
|
Back to top |
|
|
subratarec
Active User
Joined: 22 Dec 2007 Posts: 130 Location: Bangalore
|
|
|
|
Thanks for your reply.. you mean by using ICETOOL we can copy 10 sequential files into 10 GDG versions ? |
|
Back to top |
|
|
Escapa
Senior Member
Joined: 16 Feb 2007 Posts: 1399 Location: IL, USA
|
|
|
|
Sambhaji wrote: |
You also need to get the difference between GDG versions and generations clear. See any of expats posts on this.
|
subratarec wrote: |
you mean by using ICETOOL we can copy 10 sequential files into 10 GDG versions ? |
Now this makes me to loose temper...
Anyways...
Below DFSORT\ICETOOL step will give you desired result.
Code: |
//S1 EXEC PGM=ICETOOL
//SYSOUT DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//TOOLMSG DD SYSOUT=*
//IN1 DD dsn=inputdataset1
//IN2 DD dsn=inputdataset1
.
.
.
.
//OUT1 DD DSN=gdg.base.name(+1),DISP=(NEW,CATLG,DELETE)
//OUT2 DD DSN=gdg.base.name(+2),DISP=(NEW,CATLG,DELETE)
.
.
.
.
.
//TOOLIN DD *
COPY FROM(IN1) TO(OUT1)
COPY FROM(IN2) TO(OUT2)
.
.
.
.
.
/*
|
|
|
Back to top |
|
|
Anuj Dhawan
Superior Member
Joined: 22 Apr 2006 Posts: 6248 Location: Mumbai, India
|
|
|
|
henry888 wrote: |
... because you have to firstly create new generation and then you can copy data to the created generation. |
Not sure if I get it correctly... What's the problem in using somehting like
Code: |
.
.
.
//ddname1 DSN=gdg.base.name(+1),DISP=(NEW,CATLG,DELETE)
//ddname2 DD DSN=gdg.base.name(+2),DISP=(NEW,CATLG,DELETE)
.
.
.
|
|
|
Back to top |
|
|
Anuj Dhawan
Superior Member
Joined: 22 Apr 2006 Posts: 6248 Location: Mumbai, India
|
|
|
|
Pravesh wrote: |
you can use MULTIGEN program also. |
MULTIGEN is an in-house utility, which will not be available across shops. |
|
Back to top |
|
|
subratarec
Active User
Joined: 22 Dec 2007 Posts: 130 Location: Bangalore
|
|
|
|
Thanks for all your reply.. I have used IDCAMS to resolve this issue
We can do this using IDCAMS - REPRO
Give SYSIN as ->
//SYSIN DD *
REPRO INFILE(INDD1) OUTFILE(OTDD1)
REPRO INFILE(INDD2) OUTFILE(OTDD2)
REPRO INFILE(INDD3) OUTFILE(OTDD3)
REPRO INFILE(INDD4) OUTFILE(OTDD4)
REPRO INFILE(INDD5) OUTFILE(OTDD5)
REPRO INFILE(INDD6) OUTFILE(OTDD6)
REPRO INFILE(INDD7) OUTFILE(OTDD7)
REPRO INFILE(INDD8) OUTFILE(OTDD8)
REPRO INFILE(INDD9) OUTFILE(OTDD9)
REPRO INFILE(INDD10) OUTFILE(OTDD10)
Supply input files as INDD1 to INDD10 &
output GDGs as OTDD1 to OTDD10 - [TEST.RESTORE(+1) to TEST.RESTORE(+10)]
But the same thing can be done by using ICETOOL also...what Sambhaji
had suggested me.. |
|
Back to top |
|
|
Anuj Dhawan
Superior Member
Joined: 22 Apr 2006 Posts: 6248 Location: Mumbai, India
|
|
|
|
Thanks for keeping us posted, yes ICETOOL solution will also work just fine... |
|
Back to top |
|
|
expat
Global Moderator
Joined: 14 Mar 2007 Posts: 8796 Location: Welsh Wales
|
|
|
|
And by special request for Sambhaji ...........................
/RANT ON
When talking about GDS it is important to use the correct terminology, as both version and generation are both valid in terms of a GDS.
It is a well known fact that only one version of a GDS may exist at any one time, however, multiple generations may exist together.
Please learn and use the correct terminology when posting, as using the wrong term can cause confusion and possibly delay a resolution to your problem
/RANT OFF
You may also look at DFdss as a one STEP solution to your request. |
|
Back to top |
|
|
PeterHolland
Global Moderator
Joined: 27 Oct 2009 Posts: 2481 Location: Netherlands, Amstelveen
|
|
|
|
Damn, even after Xmas im still being ignored with my Einstein like
solutions. |
|
Back to top |
|
|
expat
Global Moderator
Joined: 14 Mar 2007 Posts: 8796 Location: Welsh Wales
|
|
|
|
PeterHolland wrote: |
Damn, even after Xmas im still being ignored with my Einstein likesolutions. |
Peter who ??? |
|
Back to top |
|
|
PeterHolland
Global Moderator
Joined: 27 Oct 2009 Posts: 2481 Location: Netherlands, Amstelveen
|
|
|
|
expat wrote: |
PeterHolland wrote: |
Damn, even after Xmas im still being ignored with my Einstein likesolutions. |
Peter who ??? |
The one who wanted you to invite for XMas but couldnt find you in the Brussel phone book. |
|
Back to top |
|
|
Robert Sample
Global Moderator
Joined: 06 Jun 2008 Posts: 8700 Location: Dubuque, Iowa, USA
|
|
|
|
Quote: |
Einstein like solutions. |
You mean relativistic and hard to comprehend?
Maybe "Zen-like solutions" would be a better fit?
We'll do better AFTER the new year, right everybody? |
|
Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006 Posts: 19243 Location: Inside the Matrix
|
|
|
|
Yeah, right, after new year. . .
When is that, by the way. . . |
|
Back to top |
|
|
Robert Sample
Global Moderator
Joined: 06 Jun 2008 Posts: 8700 Location: Dubuque, Iowa, USA
|
|
|
|
Quote: |
Yeah, right, after new year. . .
When is that, by the way. . . |
Chinese New Year -- February 14 2010.
|
|
Back to top |
|
|
|