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
 

 

Multiple Members to REXX

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CLIST & REXX
View previous topic :: :: View next topic  
Author Message
HameedAli

Active User


Joined: 16 Apr 2009
Posts: 151
Location: India

PostPosted: Tue May 26, 2009 7:36 pm    Post subject: Multiple Members to REXX
Reply with quote

Hi

Need assistance, on how to key in multiple members under one or more PDS as input to REXX from JCL?

Right now, my code looks like below

Code:
//DDIN     DD DSN=ABCD.EFGH.IJKL(TEST1),DISP=SHR
//             DD DSN=ABCD.EFGH.IJKL(TEST2),DISP=SHR
//             DD DSN=ABCD.EFGH.IJKL(TEST3),DISP=SHR


Here ABCD.EFGH.IJKL is the PDS which contains different members as
Test1, Test2 and Test3

Is it possible to input the member names like

Code:
//DDIN     DD DSN=ABCD.EFGH.IJKL,DISP=SHR
//??????             DD *
TEST1
TEST2
TEST3


What will be DD name for ??????


If I input multiple members to REXX will I be able to use the below
code to read the members one by one or I should look for alternatives?

Code:

"EXECIO * DISKR DDIN (STEM Code. FINIS "
"FREE FI(DDIN)"
Back to top
View user's profile Send private message

enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10257
Location: italy

PostPosted: Tue May 26, 2009 7:50 pm    Post subject: Reply to: Multiple Members to REXX
Reply with quote

it all depends on how Your rexx is written

for example
Code:
//DD1 DD ....,DSN=somepds(mbr1)
//    DD ....,DSN=somepds(mbr2)
//    DD ....,DSN=somepds(mbr3)

EXECIO * READ DD1 ( STEM LINES.


lines. will contain all the lines from the trhee members

if on the other side You have something like

Code:
//PDS DD ....,DSN=somepds1
//    DD ....,DSN=somepds2
//    DD ....,DSN=somepds3

//LST DD *
mbr1
mbr2
......
mbrn 
/*

EXCIO * READ LST ( STEM MBRS.


mbrs. will contain thelist of member to process
and using ispf LIBRARY services LM.... function
You will be able to process each member

but the best thing would be to refer to the manuals starting from
http://www-03.ibm.com/systems/z/os/zos/bkserv/index.html#other_pubs
and choosing Your zOS release
Back to top
View user's profile Send private message
HameedAli

Active User


Joined: 16 Apr 2009
Posts: 151
Location: India

PostPosted: Wed May 27, 2009 10:30 pm    Post subject: Reply to: Multiple Members to REXX
Reply with quote

Hi Enrico Sorichetti,

I tried, the above code for multiple member input, I tried displaying the member names

Code:
DO I = 1 TO MBRS.0                   
  SAY MBRS.I                         
END


I get the message "DDNAME MISSING"
Back to top
View user's profile Send private message
superk

Moderator Team Head


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

PostPosted: Wed May 27, 2009 11:17 pm    Post subject: Reply to: Multiple Members to REXX
Reply with quote

Can you post your JCL and a runtime TRACE of the REXX exec?
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6967
Location: porcelain throne

PostPosted: Wed May 27, 2009 11:35 pm    Post subject:
Reply with quote

Hameed Ali,

What do you think would have caused a msg like "DDNAME MISSING"?

certainly not scrolling thru a stem variable.

possibly a I/O on a file not allocated? - maybe no DD statement in your JCL?
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 -> CLIST & REXX All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
This topic is locked: you cannot edit posts or make replies. Need help on If condition continuatio... ashok_uddaraju CLIST & REXX 4 Fri May 19, 2017 8:55 am
No new posts Unable to create multiple files using... mbattu COBOL Programming 3 Fri May 05, 2017 5:35 pm
This topic is locked: you cannot edit posts or make replies. SDSF multiple spool datasets extracte... PJAlarcon CLIST & REXX 1 Fri Apr 21, 2017 10:50 pm
No new posts Running an REXX EXEC implicitly sho7hills CLIST & REXX 3 Thu Apr 20, 2017 8:14 am
No new posts Need help in REXX CALL program Raje1002 CLIST & REXX 5 Wed Apr 19, 2017 11:18 pm


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