Page 1 of 1

Creating PDS members using REXX

PostPosted: Thu Oct 31, 2013 12:18 am
by santosh bm
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)'

Re: Creating PDS members using REXX

PostPosted: Thu Oct 31, 2013 12:29 am
by enrico-sorichetti
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

Re: Creating PDS members using REXX

PostPosted: Thu Oct 31, 2013 12:29 am
by dick scherrer
Hello,

What error(s) are happening?

Re: Creating PDS members using REXX

PostPosted: Thu Oct 31, 2013 12:49 am
by Akatsukami
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.

Re: Creating PDS members using REXX

PostPosted: Thu Oct 31, 2013 1:14 am
by enrico-sorichetti
today is wednesday, psychic day for me ;)

Re: Creating PDS members using REXX

PostPosted: Thu Oct 31, 2013 2:11 am
by santosh bm
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.

Re: Creating PDS members using REXX

PostPosted: Thu Oct 31, 2013 4:39 am
by Pedro
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.

Re: Creating PDS members using REXX

PostPosted: Fri Nov 01, 2013 12:16 am
by santosh bm
@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 ...