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

How to split the PDS in two halves


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

New User


Joined: 13 Dec 2006
Posts: 5
Location: Mumbai

PostPosted: Wed Dec 13, 2006 3:30 am
Reply with quote

Hi All,

Can any body guide me how to split a pds in to two halfs.Is there any utility for this,If so please reply me with a sample example
Back to top
View user's profile Send private message
muthukannan

New User


Joined: 03 Aug 2006
Posts: 42
Location: Chennai

PostPosted: Wed Dec 13, 2006 11:36 am
Reply with quote

Hi Kishore,

Can you tell me why you want to split the pds. And please elaborate your question. Meaning how you want to split.

Thank you,
MK icon_smile.gif
Back to top
View user's profile Send private message
Kishore_in_IBM

New User


Joined: 13 Dec 2006
Posts: 5
Location: Mumbai

PostPosted: Thu Dec 14, 2006 12:19 am
Reply with quote

Hello Mutthu,

We have are many test regions .When ever i try to transmit the pds to one test region to another test region,the complete members in the pds are not able to transmit.So generally i will copy the whole members manually into two different datasets and i then i will transmit.

This is very time consuming process.So i want a jcl or utility so that i can able to copy the members of a dataset in to two different datasets.I tried with IEBCOPY but evey time i need to change the member names in select member field since i will be using different dataset.
Back to top
View user's profile Send private message
Kevin

Active User


Joined: 25 Aug 2005
Posts: 234

PostPosted: Thu Dec 14, 2006 3:19 am
Reply with quote

1. Create & format the member list.
2. Using ICETOOL, count the number of directory entries, and build the process to split the member list into two using the SPLIT1R= command.
3. Run IEBCOPY for the first split.
4. Run IEBCOPY for the second split.
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


Joined: 23 Nov 2006
Posts: 19244
Location: Inside the Matrix

PostPosted: Thu Dec 14, 2006 3:21 am
Reply with quote

Hello,

How are you "transmitting" the pds to the target region?

Using ftp usually works much better than "send" via tso.

To streamline the process, compress a copy of the pds on the "from" region, ftp it to the "to" region, and then decompress it on the target region. This will migrate the entire data set and remove the need to split it.
Back to top
View user's profile Send private message
Kevin

Active User


Joined: 25 Aug 2005
Posts: 234

PostPosted: Thu Dec 14, 2006 3:25 am
Reply with quote

The PDS could also be "PUNCHED" into a single sequential dataset, sent to the other node, and then reconstituted back into the target PDS.

Also, I would think that the PDS could be converted to a sequential dataset using IEBCOPY, sent to the other node, and then reconstituted using IEBCOPY again.
Back to top
View user's profile Send private message
Kishore_in_IBM

New User


Joined: 13 Dec 2006
Posts: 5
Location: Mumbai

PostPosted: Thu Dec 14, 2006 3:55 am
Reply with quote

Kevin,

Can you please elobarate your first reply to this query.

1. Create & format the member list.
2. Using ICETOOL, count the number of directory entries, and build the process to split the member list into two using the SPLIT1R= command.
3. Run IEBCOPY for the first split.
4. Run IEBCOPY for the second split.


If possible give me an example jcl.

Thanks in advance.

Kishore
Back to top
View user's profile Send private message
William Thompson

Global Moderator


Joined: 18 Nov 2006
Posts: 3156
Location: Tucson AZ

PostPosted: Thu Dec 14, 2006 5:32 am
Reply with quote

Programers are, by their nature, experimenters, go, experiment....If you can crash the system, it's not your fault, blame the security guy.... icon_lol.gif
Back to top
View user's profile Send private message
superk

Global Moderator


Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA

PostPosted: Thu Dec 14, 2006 5:41 pm
Reply with quote

Kishore_in_IBM wrote:

Can you please elabarate your first reply to this query.
1. Create & format the member list.


There are many previous posts that deal with generating PDS member lists. Here's a few:

ibmmainframes.com/viewtopic.php?t=6192
ibmmainframes.com/viewtopic.php?t=235
ibmmainframes.com/viewtopic.php?t=5667

Kishore_in_IBM wrote:

2. Using ICETOOL, count the number of directory entries, and build the process to split the member list into two using the SPLIT1R= command.


Again, this topic has already been discussed:

ibmmainframes.com/viewtopic.php?t=10081

Of course, all of this would be greatly simplified if you were to write a program that would do all this instead.
Back to top
View user's profile Send private message
shitij

New User


Joined: 09 Sep 2005
Posts: 31
Location: Delhi

PostPosted: Fri Dec 15, 2006 5:00 pm
Reply with quote

Run this job:

Code:

//SPLITBY EXEC PGM=ICEMAN
//SYSOUT DD SYSOUT=*
//SORTIN DD  DISP=SHR,DSN=DWT.FILE
//OUT1   DD  DSN=DWT.FILE.SPLIT01,
//             SPACE=(402,(1000,200),RLSE),
//             DCB=(RECFM=FB,LRECL=400,DSORG=PS,BLKSIZE=0),
//             AVGREC=K,
//             DISP=(NEW,CATLG),UNIT=SYSDA
//OUT2   DD  DSN=DWT.FILE.SPLIT02,
//             SPACE=(402,(1000,200),RLSE),
//             DCB=(RECFM=FB,LRECL=400,DSORG=PS,BLKSIZE=0),
//             AVGREC=K,
//             DISP=(NEW,CATLG),UNIT=SYSDA
//SYSIN DD *
  SORT FIELDS=COPY
  OUTFIL FNAMES=(OUT1,OUT2),SPLIT
/*
//*


I hope it solves the problem...else get back to me.
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 How to split large record length file... DFSORT/ICETOOL 10
No new posts JCL/SORT to Split Records SYNCSORT 28
No new posts Synctool-dynamic split job for varyin... JCL & VSAM 7
No new posts Split large FB file based on Key coun... DFSORT/ICETOOL 4
No new posts Split a record with data in a differe... DFSORT/ICETOOL 8
Search our Forums:

Back to Top