Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
How to copy n number of PDS to another pds at a time

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
pmn2cdac

New User


Joined: 23 Dec 2007
Posts: 27
Location: Bangalore

PostPosted: Wed May 14, 2008 10:23 am    Post subject: How to copy n number of PDS to another pds at a time
Reply with quote

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
View user's profile Send private message

yogeshwar_ade

Active User


Joined: 31 Aug 2006
Posts: 103
Location: INDIA

PostPosted: Wed May 14, 2008 10:27 am    Post subject: Re: How to copy n number of PDS to another pds at a time
Reply with quote

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
View user's profile Send private message
pmn2cdac

New User


Joined: 23 Dec 2007
Posts: 27
Location: Bangalore

PostPosted: Wed May 14, 2008 10:28 am    Post subject:
Reply with quote

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
View user's profile Send private message
gcicchet

Senior Member


Joined: 28 Jul 2006
Posts: 1703
Location: Australia

PostPosted: Wed May 14, 2008 10:35 am    Post subject:
Reply with quote

Hi,
try using IEBCOPY or ISPF 3.3.


Gerry
Back to top
View user's profile Send private message
pmn2cdac

New User


Joined: 23 Dec 2007
Posts: 27
Location: Bangalore

PostPosted: Wed May 14, 2008 10:44 am    Post subject:
Reply with quote

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
View user's profile Send private message
gcicchet

Senior Member


Joined: 28 Jul 2006
Posts: 1703
Location: Australia

PostPosted: Wed May 14, 2008 10:54 am    Post subject:
Reply with quote

Hi,
you can copy all members with one statement.


Code:
 COPY OUTDD=OUT,INDD=IN



Gerry
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8593
Location: Back in jolly old England

PostPosted: Wed May 14, 2008 11:26 am    Post subject:
Reply with quote

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
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10327
Location: italy

PostPosted: Wed May 14, 2008 12:41 pm    Post subject: Reply to: How to copy n number of PDS to another pds at a ti
Reply with quote

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 icon_cool.gif
think also of all the poor zOS componenents moving bytes around,
always the same bits.... that' s tedious
Back to top
View user's profile Send private message
mmwife

Super Moderator


Joined: 30 May 2003
Posts: 1592

PostPosted: Wed May 14, 2008 7:40 pm    Post subject:
Reply with quote

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
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
This topic is locked: you cannot edit posts or make replies. 00D3003B - time outs in DB2 when invo... chavinash2004 DB2 2 Mon Oct 09, 2017 4:39 pm
No new posts Copy 4 byte of data from the last rec... arunsoods DFSORT/ICETOOL 9 Fri Oct 06, 2017 12:15 pm
No new posts VSAM RLS Wait time blayek JCL & VSAM 2 Mon Oct 02, 2017 9:05 pm
No new posts Comparing 2 Files using Current time arunsoods SYNCSORT 9 Fri Sep 22, 2017 6:00 pm
No new posts XMITIP sends it out. Can it copy on l... Rommel Dayon Rustia IBM Tools 0 Tue Sep 05, 2017 10:16 am

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us