MVSFORUMS.com Forum Index MVSFORUMS.com
A Community of and for MVS Professionals
 
 FAQFAQ   SearchSearch   Quick Manuals   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

Return multiple parameters in REXX

 
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> TSO and ISPF
View previous topic :: View next topic  
Author Message
Dibakar
Advanced


Joined: 02 Dec 2002
Posts: 700
Topics: 63
Location: USA

PostPosted: Tue Aug 02, 2005 5:02 am    Post subject: Return multiple parameters in REXX Reply with quote

How can I return multiple parameters or a stem to the calling program?

Thanks,
Diba.
Back to top
View user's profile Send private message Send e-mail
kolusu
Site Admin
Site Admin


Joined: 26 Nov 2002
Posts: 12375
Topics: 75
Location: San Jose

PostPosted: Tue Aug 02, 2005 5:54 am    Post subject: Reply with quote

Dibakar,

If you know the no: of entires then you can use PULL. Just Queue them up and use PULLS for the no: entries times.

Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu
Back to top
View user's profile Send private message Send e-mail Visit poster's website
Phantom
Data Mgmt Moderator
Data Mgmt Moderator


Joined: 07 Jan 2003
Posts: 1056
Topics: 91
Location: The Blue Planet

PostPosted: Tue Aug 02, 2005 6:12 am    Post subject: Reply with quote

In the same lines as Kolusu said:

Even if you are unsure of the number of entries, you can PUSH all the entries and store a count in another variable say PUSH_CNT and finally issue a PUSH on the PUSH_CNT variable. In the callling program the first PULL will be the count.

Code:

Main-program
PULL P-CNT
DO I = 1 TO P-CNT
     PULL PARM_VAR
     .....
END


Hope this helps,

Thanks,
Phantom
Back to top
View user's profile Send private message
semigeezer
Supermod


Joined: 03 Jan 2003
Posts: 1014
Topics: 13
Location: Atlantis

PostPosted: Tue Aug 02, 2005 8:02 am    Post subject: Reply with quote

or use queued(), assuming you cleared the stack beforehand
Back to top
View user's profile Send private message Visit poster's website
Dibakar
Advanced


Joined: 02 Dec 2002
Posts: 700
Topics: 63
Location: USA

PostPosted: Wed Aug 03, 2005 3:12 am    Post subject: Reply with quote

Thanks everybody, this will serve my purpose.
Back to top
View user's profile Send private message Send e-mail
Display posts from previous:   
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> TSO and ISPF All times are GMT - 5 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


MVSFORUMS
Powered by phpBB © 2001, 2005 phpBB Group