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: 10291
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: 4650
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: 6968
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
No new posts Match two files using multiple keys a... santoshks1987 SYNCSORT 10 Fri Aug 18, 2017 10:50 am
This topic is locked: you cannot edit posts or make replies. how to code for GDG in Rexx cvnlynn CLIST & REXX 13 Wed Aug 09, 2017 9:13 pm
No new posts Multiple VSAM files single output fil... Mohan Kothakota DFSORT/ICETOOL 11 Wed Aug 09, 2017 7:57 pm
This topic is locked: you cannot edit posts or make replies. rexx to create a tso command Bharath Vikraman CLIST & REXX 1 Tue Aug 08, 2017 3:32 pm
This topic is locked: you cannot edit posts or make replies. rexx code to create a ps file Bharath Vikraman CLIST & REXX 4 Mon Aug 07, 2017 10:30 am


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