View previous topic :: View next topic
|
Author |
Message |
pmn2cdac
New User
Joined: 23 Dec 2007 Posts: 27 Location: Bangalore
|
|
|
|
I am having different 74 pds,,,,and I want to copy it to another pds .
Can anybody please suggest the tips to resolve the same.
Thanks,
Praveen |
|
Back to top |
|
|
yogeshwar_ade
Active User
Joined: 31 Aug 2006 Posts: 103 Location: INDIA
|
|
|
|
pmn2cdac wrote: |
I am having different 74 pds,,,,and I want to copy it to another pds .
|
PDS to another PDS??? Or wants to copy PDS Member to another PDS? |
|
Back to top |
|
|
pmn2cdac
New User
Joined: 23 Dec 2007 Posts: 27 Location: Bangalore
|
|
|
|
For ex:
sspmn.ss2154 to sspmn.ss2155
sspmn.ss2196 to sspmn.ss2197
like this i am having 74 pds...and i want to copy at once all these.
Thanks,
Praveen |
|
Back to top |
|
|
gcicchet
Senior Member
Joined: 28 Jul 2006 Posts: 1702 Location: Australia
|
|
|
|
Hi,
try using IEBCOPY or ISPF 3.3.
Gerry |
|
Back to top |
|
|
pmn2cdac
New User
Joined: 23 Dec 2007 Posts: 27 Location: Bangalore
|
|
|
|
it will be tedious job to copy 74 pds to another pds one by one by iebcopy utility.
my requirment is that it should happen at once. |
|
Back to top |
|
|
gcicchet
Senior Member
Joined: 28 Jul 2006 Posts: 1702 Location: Australia
|
|
|
|
Hi,
you can copy all members with one statement.
Code: |
COPY OUTDD=OUT,INDD=IN
|
Gerry |
|
Back to top |
|
|
expat
Global Moderator
Joined: 14 Mar 2007 Posts: 8797 Location: Welsh Wales
|
|
|
|
pmn2cdac wrote: |
it will be tedious job to copy 74 pds to another pds one by one by iebcopy utility.
my requirment is that it should happen at once. |
Well, once you figure out how to do it in a non tedious fashion, please let us know. |
|
Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007 Posts: 10873 Location: italy
|
|
|
|
Quote: |
it will be tedious job to copy 74 pds to another pds one by one by iebcopy utility. |
if somebody should be annoyed, that one should be IEBCOPY himself
think also of all the poor zOS componenents moving bytes around,
always the same bits.... that' s tedious |
|
Back to top |
|
|
mmwife
Super Moderator
Joined: 30 May 2003 Posts: 1592
|
|
|
|
Hi Praveen,
I found this in the IBM JCL Guide on this site. Go to the COBOL Forum's thread about "changing a particular character" for other info. Need more help - ask.
Code: |
//COPY JOB ...
//JOBSTEP EXEC PGM=IEBCOPY
//SYSPRINT DD SYSOUT=A
//INOUTA DD DSNAME=DATASETA,UNIT=disk,VOL=SER=111113,
// DISP=OLD
//INB DD DSNAME=DATASETB,UNIT=disk,VOL=SER=111115,
// DISP=(OLD,KEEP)
//INC DD DSNAME=DATASETC,UNIT=disk,VOL=SER=111114,
// DISP=(OLD,KEEP)
//IND DD DSNAME=DATASETD,UNIT=disk,VOL=SER=111116,
// DISP=OLD
//INE DD DSNAME=DATASETE,UNIT=disk,VOL=SER=111117,
// DISP=OLD
//OUTX DD DSNAME=DATASETX,UNIT=disk,VOL=SER=111112,
// DISP=(NEW,KEEP),SPACE=(TRK,(3,1,2))
//SYSUT3 DD UNIT=SYSDA,SPACE=(TRK,(1))
//SYSIN DD *
COPERST1 COPY O=OUTX,I=INOUTA
COPY OUTDD=INOUTA,INDD=INOUTA
INDD=INB
COPY OUTDD=INOUTA
INDD=IND |
|
|
Back to top |
|
|
|