Creating PDS members using REXX



IBM's Command List programming language & Restructured Extended Executor

Creating PDS members using REXX

Postby santosh bm » Thu Oct 31, 2013 12:18 am

How many PDS members can we create using REXX ??

My code of creating members inside a PDS creates 101 members max... Beyond that it wont create any members.
I believe its not the directory value which restricts the members being created. Because my PDS has CYL (100,50) 10 directory blocks. which is sufficient enough to create more than 101 members.
Moreover,when i try creating members manually, it allows to create member in the same PDS. I mean more than 101. !!! :?

The code to create PDS members is as below :

"ALLOC DA('"PDS_MEM"') F(MYOTDD) OLD REUSE"

whewe PDS_MEM = 'userid.rexx.pds(member1)'
santosh bm
 
Posts: 14
Joined: Tue Oct 29, 2013 11:53 pm
Has thanked: 0 time
Been thanked: 0 time

Re: Creating PDS members using REXX

Postby enrico-sorichetti » Thu Oct 31, 2013 12:29 am

if what You posted is the REAL wording I.E.

the member name is the concatenation of the string MEMBER with the sequence 1,2,3, .....
then at most You would be able to write at most 99 members
remember... the member name must be at max 8 chars
cheers
enrico
When I tell somebody to RTFM or STFW I usually have the page open in another tab/window of my browser,
so that I am sure that the information requested can be reached with a very small effort
enrico-sorichetti
Global moderator
 
Posts: 3003
Joined: Fri Apr 18, 2008 11:25 pm
Has thanked: 0 time
Been thanked: 164 times

Re: Creating PDS members using REXX

Postby dick scherrer » Thu Oct 31, 2013 12:29 am

Hello,

What error(s) are happening?
Hope this helps,
d.sch.
User avatar
dick scherrer
Global moderator
 
Posts: 6268
Joined: Sat Jun 09, 2007 8:58 am
Has thanked: 3 times
Been thanked: 93 times

Re: Creating PDS members using REXX

Postby Akatsukami » Thu Oct 31, 2013 12:49 am

enrico-sorichetti wrote:if what You posted is the REAL wording I.E.

the member name is the concatenation of the string MEMBER with the sequence 1,2,3, .....
then at most You would be able to write at most 99 members
remember... the member name must be at max 8 chars

I don't see where he purports to be iterating the name at all :?

Like Mr. Scherrer, I want to see the exact error messages, including the message numbers. Failing that I want to see the actual code -- a copy-and-paste, not some re-typed garbage -- with a trace, enclosed in Code tags.
"You have sat too long for any good you have been doing lately ... Depart, I say; and let us have done with you. In the name of God, go!" -- what I say to a junior programmer at least once a day
User avatar
Akatsukami
Global moderator
 
Posts: 1058
Joined: Sat Oct 16, 2010 2:31 am
Location: Bloomington, IL
Has thanked: 6 times
Been thanked: 51 times

Re: Creating PDS members using REXX

Postby enrico-sorichetti » Thu Oct 31, 2013 1:14 am

today is wednesday, psychic day for me ;)
cheers
enrico
When I tell somebody to RTFM or STFW I usually have the page open in another tab/window of my browser,
so that I am sure that the information requested can be reached with a very small effort
enrico-sorichetti
Global moderator
 
Posts: 3003
Joined: Fri Apr 18, 2008 11:25 pm
Has thanked: 0 time
Been thanked: 164 times

Re: Creating PDS members using REXX

Postby santosh bm » Thu Oct 31, 2013 2:11 am

I'm reading a seq file containing JOBNAME and some numer field.inp rec looks like this jobname1 234567890.
for each record i read, i create a pds member with the jobname. then i parse the input rec to get jobnames in JOBNAME.I variable, number into REQNUM.I variable. then i write the REQNUM.I into a new member to be created in a pds with the JOBNAME.I as the member name.
santosh bm
 
Posts: 14
Joined: Tue Oct 29, 2013 11:53 pm
Has thanked: 0 time
Been thanked: 0 time

Re: Creating PDS members using REXX

Postby Pedro » Thu Oct 31, 2013 4:39 am

repeating Akatsukami's request in case you somehow missed it:
I want to see the exact error messages, including the message numbers. Failing that I want to see the actual code -- a copy-and-paste, not some re-typed garbage -- with a trace, enclosed in Code tags.


Your last post is only useful for us to imagine how we would solve the problem, but not at all useful to help you resolve your defects.
Pedro Vera
User avatar
Pedro
 
Posts: 686
Joined: Thu Jul 31, 2008 9:59 pm
Location: Silicon Valley
Has thanked: 0 time
Been thanked: 53 times

Re: Creating PDS members using REXX

Postby santosh bm » Fri Nov 01, 2013 12:16 am

@Pedro : i'm not getting any error messages, instead getting ly 101 members in the pds, not more than that.

@ Akatsukami

You are absolutely right.. i used JOBANME instead of JOBNAME.I
i.e., avoided using iterator 'I' in the JOBANME variable. in my code JOBNAME = MEMBERNAME.
Now my code creates more than 100 members..:-)

Thanks all, for your replies ...
santosh bm
 
Posts: 14
Joined: Tue Oct 29, 2013 11:53 pm
Has thanked: 0 time
Been thanked: 0 time


Return to CLIST & REXX

 


  • Related topics
    Replies
    Views
    Last post