IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Declaring array variables in rexx panels


IBM Mainframe Forums -> TSO/ISPF
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
Roshnii

New User


Joined: 30 Sep 2008
Posts: 45
Location: bangalore

PostPosted: Wed May 27, 2009 3:55 pm
Reply with quote

I'm creating a panel which looks like this
Code:

  ddname       file     disp parameters
1 ______    ________   __ __ ___
2 ______    ________   __ __ ___
3 ______    ________   __ __ ___
4 ______    ________   __ __ ___


Is it possible to decalre these fields like ddname 1, 2 3 and 4 as array variables?

Thanks
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10873
Location: italy

PostPosted: Wed May 27, 2009 3:56 pm
Reply with quote

NO
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales

PostPosted: Wed May 27, 2009 4:06 pm
Reply with quote

But it is possible to convert them to stem variables during the REXX process.
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10873
Location: italy

PostPosted: Wed May 27, 2009 9:34 pm
Reply with quote

testing with a panel will take too much time
but here is a code snippet that will assign variables with panel compliant names to stem variables and the other way around

Code:
a1 = "za1"
a2 = "za2"
a3 = "za3"
a4 = "za4"
a5 = "za5"
a6 = "za6"

/* assign a1-6 to stem var */
do   i = 1 to 6
   interpret "a.i = a"i
   say i a.i
end

/* assign stem var to b1-6 */
do   i = 1 to 6
   interpret "b"i "= a.i"
end

say 1 b1
say 2 b2
say 3 b3
say 4 b4
say 5 b5
say 6 b6
Back to top
View user's profile Send private message
Roshnii

New User


Joined: 30 Sep 2008
Posts: 45
Location: bangalore

PostPosted: Fri May 29, 2009 6:36 pm
Reply with quote

Thank you so much for the solutions. This serves my purpose. icon_smile.gif icon_smile.gif
Thanks
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> TSO/ISPF

 


Similar Topics
Topic Forum Replies
No new posts Compile Several JCL JOB Through one r... CLIST & REXX 4
No new posts Running REXX through JOB CLIST & REXX 13
No new posts Error to read log with rexx CLIST & REXX 11
No new posts isfline didnt work in rexx at z/OS ve... CLIST & REXX 7
No new posts run rexx code with jcl CLIST & REXX 15
Search our Forums:

Back to Top