No, in many cases you can use compound variables to avoi9d using value(). The 
two ugly issues for converting CLIST to REXX are keyword parameters and the 
stack interface (see DATA PROMPT).

VARNX = VARN.VARN.GLCV
if VARNX = SYMBOL then do
   VARFND = 1
   VARVX  = VARV.VARV.GLCV
   SYMBOL = strip((VARVX)
   end

Note that foo and foo. are different; if you don't like using similar names, 
pick different names for the stems.


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3

________________________________________
From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
David Crayford [dcrayf...@gmail.com]
Sent: Thursday, March 19, 2020 10:20 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Does anybody remember CLIST?

I'm trying to convert CLIIST to REXX and CLIST has symbolic
substitution. I've used this before in NCL but it's a long time ago.

Can anybody tell me what this does and translate to REXX? I'm guessing I
need to use interpret or value()!

SET VARNX = &&VARN&GLCV
IF (&VARNX = &SYMBOL) THEN DO
   SET VARFND = 1
   SET VARVX  = &&VARV&GLCV
   SET SYMBOL = &STR(&VARVX)
END

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Reply via email to