IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Copy multiple PS datasets into PDS


IBM Mainframe Forums -> JCL & VSAM
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
gylbharat

Active Member


Joined: 31 Jul 2009
Posts: 565
Location: Bangalore

PostPosted: Wed Nov 09, 2011 1:27 pm
Reply with quote

Hi,

I want to copy 100 PS datasets - HLQ.MODE.DATA.* to a PDS dataset having 100 members

LRECL-80

Can any one please let me know how to do this?
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales

PostPosted: Wed Nov 09, 2011 1:58 pm
Reply with quote

IEBGENER
IEBUPDTE
REXX
IDCAMS
Manually - but I suspect that the idea of this post is to reduce the amount of work that you need to do
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10872
Location: italy

PostPosted: Wed Nov 09, 2011 2:06 pm
Reply with quote

no way to reduce the manual labor, unless there is an algorithmic way of creating the MEMBER name
in which case ( if there is an algorithmic solution) a SORT or REXX solution should be used to build the COPY/CREATE jcl
Back to top
View user's profile Send private message
gylbharat

Active Member


Joined: 31 Jul 2009
Posts: 565
Location: Bangalore

PostPosted: Wed Nov 09, 2011 2:36 pm
Reply with quote

Can you please post a sample JCL in SORT
Back to top
View user's profile Send private message
Bill Woodger

Moderator Emeritus


Joined: 09 Mar 2011
Posts: 7309
Location: Inside the Matrix

PostPosted: Wed Nov 09, 2011 2:41 pm
Reply with quote

Do a listcat, output to a dataset.

Use the editor to create a list of the datasets you are interested in (find, exclude, column shifts).

Feed that into a SORT step which is going to create the control cards and DD statements for whatever you decide to use for the copy.

Test it.

Put the generated stuff into some JCL.

Test it.

Run it for real.
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales

PostPosted: Wed Nov 09, 2011 3:05 pm
Reply with quote

Enrico, good point about the member name, but seeing as the OP has only used a single * as the LLQ, I would have been tempted to use the LLQ as the member name, and invoking IEBGENER from within the REXX code.
Back to top
View user's profile Send private message
gylbharat

Active Member


Joined: 31 Jul 2009
Posts: 565
Location: Bangalore

PostPosted: Wed Nov 09, 2011 5:09 pm
Reply with quote

Thanks Guys.... for the inputs.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> JCL & VSAM

 


Similar Topics
Topic Forum Replies
No new posts INCLUDE OMIT COND for Multiple values... DFSORT/ICETOOL 5
No new posts Replace Multiple Field values to Othe... DFSORT/ICETOOL 12
No new posts VB to VB copy - Full length reached SYNCSORT 8
No new posts Multiple table unload using INZUTILB DB2 2
No new posts Grouping by multiple headers DFSORT/ICETOOL 7
Search our Forums:

Back to Top