Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Automatically generate no. of members in a pds using jc

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

New User


Joined: 31 Jan 2008
Posts: 15
Location: gurgaon

PostPosted: Wed Apr 09, 2008 9:29 am    Post subject: Automatically generate no. of members in a pds using jc
Reply with quote

hi all,

can we automatically generate no. of members in a pds using jcl....

regards,
pritanshu
Back to top
View user's profile Send private message

gcicchet

Senior Member


Joined: 28 Jul 2006
Posts: 1703
Location: Australia

PostPosted: Wed Apr 09, 2008 11:14 am    Post subject:
Reply with quote

Hi,
try this link http://ibmmainframes.com/viewtopic.php?t=6192&highlight=members+count+pds


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

New User


Joined: 31 Jan 2008
Posts: 15
Location: gurgaon

PostPosted: Wed Apr 09, 2008 11:33 am    Post subject:
Reply with quote

hi gerry,

i need to split a ps into 50 members of one pds i dont need to count this
i m asking is thr any way to generate no. of members in a pds rather than writing like this what i m doin previously:

//STEP01 EXEC PGM=IEBGENER
//SYSPRINT DD SYSOUT=*
//SYSUT1 DD DISP=SHR,DSN=TSUCJEI.NDB.COBBAT(TESTOUT)
//SYSUT2 DD DISP=SHR,DSN=TSUCJEI.NDB.SPLIT.OUT
//SYSIN DD *
GENERATE MAXNAME=5,MAXGPS=4
MEMBER NAME=PART1
RECORD IDENT=(6,'END-OF',30)
MEMBER NAME=PART2
RECORD IDENT=(6,'END-OF',30)
MEMBER NAME=PART3
RECORD IDENT=(6,'END-OF',30)
MEMBER NAME=PART4
RECORD IDENT=(6,'END-OF',30)
MEMBER NAME=PART5
/*
Back to top
View user's profile Send private message
dick scherrer

Site Director


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

PostPosted: Wed Apr 09, 2008 11:52 am    Post subject:
Reply with quote

Hello,

Your requirement is most unclear. Keep in mind that your question is comletely to you, but it may not be to those who read it.

Quote:
i need to split a ps into 50 members of one pds i dont need to count this
What is this telling us?

Quote:
i m asking is thr any way to generate no. of members in a pds rather than writing like this what i m doin previously
What do you want to generate?
Back to top
View user's profile Send private message
pritanshu

New User


Joined: 31 Jan 2008
Posts: 15
Location: gurgaon

PostPosted: Fri Apr 11, 2008 1:23 pm    Post subject:
Reply with quote

hi all ,
i have done this by using IEBGENER........
//SYSIN DD *
GENERATE MAXNAME=63,MAXGPS=62
MEMBER NAME=R3301R01
RECORD IDENT=(6,'END-OF',30)
MEMBER NAME=R3301R02
RECORD IDENT=(6,'END-OF',30)
MEMBER NAME=R3301R03
RECORD IDENT=(6,'END-OF',30)
MEMBER NAME=R3301R04
RECORD IDENT=(6,'END-OF',30)
MEMBER NAME=R3301R05
RECORD IDENT=(6,'END-OF',30)
and so on till 63 members
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: Fri Apr 11, 2008 2:46 pm    Post subject:
Reply with quote

Splitting a PS into x PDS members,

Call me a cynic - but HOMEWORK sort of springs to mind here icon_wink.gif
Back to top
View user's profile Send private message
pritanshu

New User


Joined: 31 Jan 2008
Posts: 15
Location: gurgaon

PostPosted: Fri Apr 11, 2008 2:51 pm    Post subject:
Reply with quote

ya sure
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
No new posts Generate Cohort report using SORT Indrajit_57 SYNCSORT 6 Wed Jun 01, 2016 9:41 am
No new posts Single step utility for compare and u... ramprakashn JCL & VSAM 5 Fri Apr 29, 2016 3:43 pm
No new posts How to map virtual printer in JCL, to... user_22 JCL & VSAM 6 Fri Apr 15, 2016 10:04 pm
No new posts Differences between copying members b... E.LAI TSO/ISPF 8 Wed Mar 30, 2016 12:35 pm
No new posts Generate a JCL using REXX spoorni CLIST & REXX 3 Sat Feb 06, 2016 6:45 am


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us