MVSFORUMS.com Forum Index MVSFORUMS.com
A Community of and for MVS Professionals
 
 FAQFAQ   SearchSearch   Quick Manuals   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

SPLIT PDS

 
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Job Control Language(JCL)
View previous topic :: View next topic  
Author Message
anbesivam
Beginner


Joined: 09 Aug 2006
Posts: 66
Topics: 14

PostPosted: Mon Oct 02, 2006 7:20 am    Post subject: SPLIT PDS Reply with quote

Hi,

I have searched the forum for the following requirement. But couldn't find any help.

Could any one please help me on this.

I have

Code:
MASTER. DATASET --> PDS
member1
member2
member3
member4

CHILD1. DATASET --> PDS
member1
member2

CHILD2. DATASET--> PDS
member3
member4


I need to spilt the PDS in to two different PDS (two half). Please advise.
Back to top
View user's profile Send private message
shekar123
Advanced


Joined: 22 Jul 2005
Posts: 528
Topics: 90
Location: Bangalore India

PostPosted: Mon Oct 02, 2006 7:28 am    Post subject: Reply with quote

anbesivam,

Can u not simply move the members MEMBER3 & MEMBER4 from the MASTER. DATASET PDS to another new PDS say NEW.PDS ?
_________________
Shekar
Grow Technically
Back to top
View user's profile Send private message
anbesivam
Beginner


Joined: 09 Aug 2006
Posts: 66
Topics: 14

PostPosted: Mon Oct 02, 2006 7:30 am    Post subject: Reply with quote

Hi Shekar123,

Thanks for your response.

My MASTER PDS contains around 12500 members. That's why i am looking for other ways.
Back to top
View user's profile Send private message
shekar123
Advanced


Joined: 22 Jul 2005
Posts: 528
Topics: 90
Location: Bangalore India

PostPosted: Mon Oct 02, 2006 9:06 am    Post subject: Reply with quote

anbesivam,

1.Go to option 3.3
2.If you want to Move the members from the original PDS whose members name start with A* do the following which will copy members starting with A only and similary do it for other letters whose name starts with as a result all desired members will be moved to NEW PDS.
Code:

                              Move/Copy Utility                0 members moved
Option ===> M                                                                 
                                                                   More:     +
 C  Copy data set or member(s)          CP Copy and print                     
 M  Move data set or member(s)          MP Move and print                     
 L  Copy and LMF lock member(s)         LP Copy, LMF lock, and print           
 P  LMF Promote data set or member(s)   PP LMF Promote and print               
                                                                               
Specify "From" Data Set below, then press Enter key                           
                                                                               
From ISPF Library:                                                             
   Project . . .               (--- Options C, CP, L, and LP only ---)         
   Group . . . .          . . .          . . .          . . .                 
   Type  . . . .                                                               
   Member  . . .                  (Blank or pattern for member list,           
                                   "*" for all members)                       
                                                                               
From Other Partitioned or Sequential Data Set:                                 
   Data Set Name . . . 'USERID.OLD.PDS(A*)'                                 
   Volume Serial . . .            (If not cataloged)                         





MOVE     From USERID.OLD.PDS                                               
Command ===>                                                                   
                                                                   More:     +
Specify "To" Data Set Below                                                   
                                                                               
To ISPF Library:                                                               
   Project  . .                  Replace option:                               
   Group  . . .                     Enter "/" to select option                 
   Type . . . .                     /  Replace like-named members             
                                                                               
To Other Partitioned or Sequential Data Set:                                   
   Data Set Name . . . 'USERID.NEW.PDS'                                   
   Volume Serial . . .           (If not cataloged)                           
                                                                               
Data Set Password  . .           (If password protected)                       
                                                                               
To Data Set Options:                                                           
   Sequential Disposition        Pack Option         SCLM Setting             
   1  1. Mod                     3  1. Yes           3  1. SCLM               
      2. Old                        2. No               2. Non-SCLM             




MOVE        USERID.OLD.PDS     TO USERID.NEW.PDS            Row 00001 of 00003
Command ===> S *                                              Scroll ===> CSR 
   Name     Prompt          Size    Created           Changed            ID   
. A1PGM                     86    2005/12/28   2006/08/29 22:03:23    USERID 
. A2PGM                     255   2006/02/12   2006/08/18 13:43:16    USERID 
. A3PGM                     232   2006/02/12   2006/08/12 18:17:32    USERID 
  **End**                                                                     


_________________
Shekar
Grow Technically
Back to top
View user's profile Send private message
anbesivam
Beginner


Joined: 09 Aug 2006
Posts: 66
Topics: 14

PostPosted: Mon Oct 02, 2006 9:29 am    Post subject: Reply with quote

Hi Shaker123,

Thanks much for your effort.

Some what, this is the way I have moved the members.

But,

Is it possible to make a SPLIT while writng in to Master Dataset ? or Is there any utilities can SPLIT after getting master dataset ?

Please let me know.
Back to top
View user's profile Send private message
coolman
Intermediate


Joined: 03 Jan 2003
Posts: 283
Topics: 27
Location: US

PostPosted: Mon Oct 02, 2006 4:20 pm    Post subject: Reply with quote

Is it a blind split like the first 6250 would go to Child 1 and the second 6250 would go to Child 2? Have you looked at LM services as an option?
________
herbalaire review


Last edited by coolman on Sat Feb 05, 2011 1:53 am; edited 1 time in total
Back to top
View user's profile Send private message
kolusu
Site Admin
Site Admin


Joined: 26 Nov 2002
Posts: 12370
Topics: 75
Location: San Jose

PostPosted: Tue Oct 03, 2006 7:05 am    Post subject: Reply with quote

anbesivam wrote:

Is it possible to make a SPLIT while writng in to Master Dataset ? or Is there any utilities can SPLIT after getting master dataset ?

Please let me know.


Yes it is possible. Follow these steps.

1. Flatten the PDS to PS using IEBPTPCH
2. Now split this flat file into 2 files using SORT
3. You can remove the headers and replace it IEBCOPY compatible statements in sort step itself
4. Run IEBCOPY with the split datasets.


Hope this helps...

Cheers

Kolusu
_________________
Kolusu - DFSORT Development Team (IBM)
DFSORT is on the Web at:
www.ibm.com/storage/dfsort

www.linkedin.com/in/kolusu
Back to top
View user's profile Send private message Send e-mail Visit poster's website
dz
Beginner


Joined: 02 Apr 2006
Posts: 26
Topics: 0

PostPosted: Wed Oct 04, 2006 3:02 pm    Post subject: Reply with quote

FileAid Copy option (3.3) contains member name filtering (see "Specify Member Selection Option"):

Quote:

Code:
File-AID ----------------- PDS Processing Options -----------------------------
COMMAND ===>                                                                   
                                                                               
FROM Dataset: PDS1                                         
    Copy entire member            ===> Y        (Y = Yes;                     
                                                 N = No, selected records only)
    Copy empty members            ===> N        (Y = Yes; N = No)             
    Process in JCL format         ===> N        (Y = Yes; N = No)             
                                                                               
TO Dataset:   PDS2
    Replace like-named members    ===> Y        (Y = Yes; N = No)             
                                                                               
    Rename copied members mask    ===>                                         
                                                                               
Specify Member Selection Options (Blank for All Members)                       
    Member name mask              ===>                                         
    Member name range             ===>          to ===>                       
    Last modified userid          ===>          to ===>                       
    Creation date                 ===>          to ===>          (YY/MM/DD)   
    Modification date             ===>          to ===>          (YY/MM/DD)   
                                                                               
    Display member selection list ===> Y        (Y = Yes; N = No)
Back to top
View user's profile Send private message
anbesivam
Beginner


Joined: 09 Aug 2006
Posts: 66
Topics: 14

PostPosted: Thu Oct 05, 2006 6:38 am    Post subject: Reply with quote

Hi All,

I am really Happy to part of this Forum. Very Happy

I have tried all your valuable soultions. I have learned most of the things from the soultions.

Thanks you so much for providing different way of solving this problem.
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Job Control Language(JCL) All times are GMT - 5 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


MVSFORUMS
Powered by phpBB © 2001, 2005 phpBB Group