Re: REXX MVSVAR SYMDEF behavoiur

2020-03-29 Thread Seymour J Metz
frame Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Jeremy Nicoll [jn.ls.mfrm...@letterboxes.org] Sent: Sunday, March 29, 2020 6:38 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: REXX MVSVAR SYMDEF behavoiur On Sun, 29 Mar 2020, at 00:08, Seymour J Metz wrote: > SYMSUB is a REXX routine t

Re: REXX MVSVAR SYMDEF behavoiur

2020-03-29 Thread Jeremy Nicoll
On Sun, 29 Mar 2020, at 00:08, Seymour J Metz wrote: > SYMSUB is a REXX routine that he wrote to pass the argument to > MVSVAR('SYMDEF',*) and display or return the result. Yes of course, I understand that. What I don't understand is where the ampersand and dot are coming from in the displayed

Re: REXX MVSVAR SYMDEF behavoiur

2020-03-28 Thread Seymour J Metz
Sent: Saturday, March 28, 2020 10:26 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: REXX MVSVAR SYMDEF behavoiur Hello Jeremy, I have been coding the single quote around 'MVSVAR' and other TSO External Functions seemingly forever. I assume that I have to do that as I run with SIGNAL NOVALUE

Re: REXX MVSVAR SYMDEF behavoiur

2020-03-28 Thread Bruce Hewson
Hello Jeremy, I have been coding the single quote around 'MVSVAR' and other TSO External Functions seemingly forever. I assume that I have to do that as I run with SIGNAL NOVALUE enabled. On Thu, 26 Mar 2020 19:09:40 +, Jeremy Nicoll wrote: > >Apart from the documented behaviour of MVSVA

Re: REXX MVSVAR SYMDEF behavoiur

2020-03-28 Thread Seymour J Metz
behalf of Jeremy Nicoll [jn.ls.mfrm...@letterboxes.org] Sent: Saturday, March 28, 2020 1:46 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: REXX MVSVAR SYMDEF behavoiur On Sat, 28 Mar 2020, at 04:28, Bruce Hewson wrote: > Hi, > > examples using the code I posted. > > %SYMSUB 

Re: REXX MVSVAR SYMDEF behavoiur

2020-03-28 Thread Jeremy Nicoll
On Sat, 28 Mar 2020, at 04:28, Bruce Hewson wrote: > Hi, > > examples using the code I posted. > > %SYMSUB 'testing &sysname in &sysplex' > &'TESTING TSYS IN PLEX40'. > READY > %SYMSUB 'Foo' >

Re: REXX MVSVAR SYMDEF behavoiur

2020-03-27 Thread Bruce Hewson
Hi, examples using the code I posted. %SYMSUB 'testing &sysname in &sysplex' &'TESTING TSYS IN PLEX40'. READY %SYMSUB 'Foo' READY

Re: REXX MVSVAR SYMDEF behavoiur

2020-03-27 Thread Bruce Hewson
Hello, here is the code:- /*REXX/ Trace 'o' Parse Source opsys calltype execname . /*=

Re: REXX MVSVAR SYMDEF behavoiur

2020-03-27 Thread Seymour J Metz
: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Jeremy Nicoll [jn.ls.mfrm...@letterboxes.org] Sent: Friday, March 27, 2020 5:23 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: REXX MVSVAR SYMDEF behavoiur On Fri, 27 Mar 2020, at 21:17, Seymour J Metz wrote: > Well, you could

Re: REXX MVSVAR SYMDEF behavoiur

2020-03-27 Thread Jeremy Nicoll
On Fri, 27 Mar 2020, at 21:17, Seymour J Metz wrote: > Well, you could do > >symvalue = 'MVSVAR'('SYMDEF','SYMNAME') > > I doubt that it will pass code review. What do you mean by "code review"? Informal checks by colleagues, or something else? The point though is that in the OP's origina

Re: REXX MVSVAR SYMDEF behavoiur

2020-03-27 Thread Seymour J Metz
U] on behalf of Jeremy Nicoll [jn.ls.mfrm...@letterboxes.org] Sent: Friday, March 27, 2020 5:08 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: REXX MVSVAR SYMDEF behavoiur On Fri, 27 Mar 2020, at 20:07, Seymour J Metz wrote: > MVSVAR is not an external functions If someone was foolish enough to wr

Re: REXX MVSVAR SYMDEF behavoiur

2020-03-27 Thread Seymour J Metz
@LISTSERV.UA.EDU] on behalf of Paul Gilmartin [000433f07816-dmarc-requ...@listserv.ua.edu] Sent: Friday, March 27, 2020 4:25 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: REXX MVSVAR SYMDEF behavoiur On Fri, 27 Mar 2020 20:07:06 +, Seymour J Metz wrote: >MVSVAR is not an external functi

Re: REXX MVSVAR SYMDEF behavoiur

2020-03-27 Thread Jeremy Nicoll
On Fri, 27 Mar 2020, at 20:07, Seymour J Metz wrote: > MVSVAR is not an external functions If someone was foolish enough to write their own one, perhaps having it call the built-in MVSVAR() wouldn't it be possible for an exec to call the local one in preference to the built-in one? -- Jeremy Nic

Re: REXX MVSVAR SYMDEF behavoiur

2020-03-27 Thread Paul Gilmartin
On Fri, 27 Mar 2020 20:07:06 +, Seymour J Metz wrote: >MVSVAR is not an external functions. > It's documented as among TSO/E external functions in https://www.ibm.com/support/knowledgecenter/SSLTBW_2.4.0/com.ibm.zos.v2r4.ikja300/tsofunc.htm Is a clarification RCF needed? >Further, REXX

Re: REXX MVSVAR SYMDEF behavoiur

2020-03-27 Thread Seymour J Metz
frame Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Paul Gilmartin [000433f07816-dmarc-requ...@listserv.ua.edu] Sent: Friday, March 27, 2020 1:59 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: REXX MVSVAR SYMDEF behavoiur On Fri, 27 Mar 2020 12:16:50 -0500, Dale R. Smith wrote: >On

Re: REXX MVSVAR SYMDEF behavoiur

2020-03-27 Thread Seymour J Metz
behalf of Dale R. Smith [dale-sm...@columbus.rr.com] Sent: Friday, March 27, 2020 3:00 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: REXX MVSVAR SYMDEF behavoiur On Fri, 27 Mar 2020 18:48:58 +, Seymour J Metz wrote: >That's the right answer to the wrong question. You removed the apo

Re: REXX MVSVAR SYMDEF behavoiur

2020-03-27 Thread Seymour J Metz
-MAIN@LISTSERV.UA.EDU Subject: Re: REXX MVSVAR SYMDEF behavoiur foo = SYSNAME . REXXTRY on TSO say 'Foo:' MVSVAR('SYMDEF','foo') Foo: . REXXTRY on TSO On F

Re: REXX MVSVAR SYMDEF behavoiur

2020-03-27 Thread Dale R. Smith
On Fri, 27 Mar 2020 18:48:58 +, Seymour J Metz wrote: >That's the right answer to the wrong question. You removed the apostrophes >around foo, so the results are irrelevant. Try my code as written and I >suspect that you will get results that differ from what's in the manual. > > >-- >Shmue

Re: REXX MVSVAR SYMDEF behavoiur

2020-03-27 Thread Seymour J Metz
du/~smetz3 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Dale R. Smith [dale-sm...@columbus.rr.com] Sent: Friday, March 27, 2020 2:39 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: REXX MVSVAR SYMDEF behavoiur On Fri, 27 Mar 2020 17:42:30 +,

Re: REXX MVSVAR SYMDEF behavoiur

2020-03-27 Thread Dale R. Smith
On Fri, 27 Mar 2020 12:59:44 -0500, Paul Gilmartin wrote: >But I wonder if a 23:59:59 error is possible if the date changes between >iterations of the loop? > >I raised this question a while ago concerning use of symbols in JCL. >Peter Relson replied, simply, "Yes". No circumvention suggested. >

Re: REXX MVSVAR SYMDEF behavoiur

2020-03-27 Thread Dana Mitchell
foo = SYSNAME . REXXTRY on TSO say 'Foo:' MVSVAR('SYMDEF','foo') Foo:

Re: REXX MVSVAR SYMDEF behavoiur

2020-03-27 Thread Dale R. Smith
On Fri, 27 Mar 2020 17:42:30 +, Seymour J Metz wrote: >Even if you accept "the sky's the limit" for undefined behavior, there's still >the undocumented issue of whether it is permissible to include a leading >ampersand or a trailing period with the symbol, which is permissible in the >SYMD

Re: REXX MVSVAR SYMDEF behavoiur

2020-03-27 Thread Paul Gilmartin
On Fri, 27 Mar 2020 12:16:50 -0500, Dale R. Smith wrote: >On Fri, 27 Mar 2020 16:28:30 +, Seymour J Metz wrote: > >>> Read the much improved doc in the z/OS V2.4 TSO/E REXX Reference for >>> MVSVAR(SYMDEF,xxx). >> >>That's what I was quoting. >> >>> I think everything will be clearer. >> >>

Re: REXX MVSVAR SYMDEF behavoiur

2020-03-27 Thread Seymour J Metz
le R. Smith [dale-sm...@columbus.rr.com] Sent: Friday, March 27, 2020 1:16 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: REXX MVSVAR SYMDEF behavoiur On Fri, 27 Mar 2020 16:28:30 +, Seymour J Metz wrote: >> Read the much improved doc in the z/OS V2.4 TSO/E REXX Reference for >> MVSVA

Re: REXX MVSVAR SYMDEF behavoiur

2020-03-27 Thread Dale R. Smith
On Fri, 27 Mar 2020 16:28:30 +, Seymour J Metz wrote: >> Read the much improved doc in the z/OS V2.4 TSO/E REXX Reference for >> MVSVAR(SYMDEF,xxx). > >That's what I was quoting. > >> I think everything will be clearer. > >Clear, but it matches neither my expectations nor the output that B

Re: REXX MVSVAR SYMDEF behavoiur

2020-03-27 Thread Seymour J Metz
J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Dale R. Smith [dale-sm...@columbus.rr.com] Sent: Friday, March 27, 2020 12:12 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: REXX MVSVAR SYMDEF behav

Re: REXX MVSVAR SYMDEF behavoiur

2020-03-27 Thread Dale R. Smith
Read the much improved doc in the z/OS V2.4 TSO/E REXX Reference for MVSVAR(SYMDEF,xxx). I think everything will be clearer. I wrote a REXX Program a few years ago to extract and display the various Static and Dynamic System Symbols that are defined in z/OS. I also included our inhouse define

Re: REXX MVSVAR SYMDEF behavoiur

2020-03-27 Thread Seymour J Metz
z3 ____ From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Bruce Hewson [bruce_hew...@hotmail.com] Sent: Friday, March 27, 2020 12:25 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: REXX MVSVAR SYMDEF behavoiur Guys, the code receives

Re: REXX MVSVAR SYMDEF behavoiur

2020-03-27 Thread Jeremy Nicoll
On Fri, 27 Mar 2020, at 04:25, Bruce Hewson wrote: > Guys, > > the code receives ... > The MVSVAR external function provides for this case, so it will > substitute for any symbols in the text string, thus building a new > SYMBOL name, repeating until all symbols are resolved, if possible. Are

Re: REXX MVSVAR SYMDEF behavoiur

2020-03-26 Thread Bruce Hewson
Guys, the code receives a text string which may contain one or more symbols, denoted by prefix "&" and optional suffix ".", as per my reading of how Z/OS handles symbol substitution. Say we have these symbols defined in IEASYM00:- &A1. = '01' &B1. = 'TEST &TEST01 = 'FOOBAR' text string contain

Re: REXX MVSVAR SYMDEF behavoiur

2020-03-26 Thread Seymour J Metz
26, 2020 5:22 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: REXX MVSVAR SYMDEF behavoiur On Wed, 25 Mar 2020 13:28:12 +, Seymour J Metz wrote: >"The MVSVAR('SYMDEF',string) function goes through REXX substitution for >string first, the result of which must be a 1-8 ch

Re: REXX MVSVAR SYMDEF behavoiur

2020-03-26 Thread Paul Gilmartin
On Wed, 25 Mar 2020 04:43:52 -0500, Bruce Hewson wrote: > >Say 'MVSVAR'("SYMDEF",'testing &sysname in &sysplex') > >which provides an unexpected result > >&'TESTING SYSA IN PLEX01'. > >The symbols &SYSNAME and &SYSPLEX were replaced. >And, sadly, the whole lot was uppercased. > >Couldn't find t

Re: REXX MVSVAR SYMDEF behavoiur

2020-03-26 Thread Jeremy Nicoll
On Thu, 26 Mar 2020, at 19:18, Paul Gilmartin wrote: > On Thu, 26 Mar 2020 19:09:40 +, Jeremy Nicoll wrote: > > >On Thu, 26 Mar 2020, at 04:23, Bruce Hewson wrote: > > > >> So far I have not seen anyone identify where this is fully documented. > > > >Apart from the documented behaviour of MVSV

Re: REXX MVSVAR SYMDEF behavoiur

2020-03-26 Thread Paul Gilmartin
On Wed, 25 Mar 2020 13:28:12 +, Seymour J Metz wrote: >"The MVSVAR('SYMDEF',string) function goes through REXX substitution for >string first, the result of which must be a 1-8 character symbolic-name >specifying the symbol that has been defined in the SYMDEF statement. Any other >values i

Re: REXX MVSVAR SYMDEF behavoiur

2020-03-26 Thread Seymour J Metz
ns. -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List on behalf of Paul Gilmartin <000433f07816-dmarc-requ...@listserv.ua.edu> Sent: Thursday, March 26, 2020 9:39 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: REXX MVSV

Re: REXX MVSVAR SYMDEF behavoiur

2020-03-26 Thread Paul Gilmartin
On Thu, 26 Mar 2020 19:09:40 +, Jeremy Nicoll wrote: >On Thu, 26 Mar 2020, at 04:23, Bruce Hewson wrote: > >> So far I have not seen anyone identify where this is fully documented. > >Apart from the documented behaviour of MVSVAR (which I found with Google) > Cite? >there's maybe the point th

Re: REXX MVSVAR SYMDEF behavoiur

2020-03-26 Thread Jeremy Nicoll
On Thu, 26 Mar 2020, at 04:23, Bruce Hewson wrote: > So far I have not seen anyone identify where this is fully documented. Apart from the documented behaviour of MVSVAR (which I found with Google) there's maybe the point that in your code you've got single quotes around "mvsvar". That, IIRC, s

Re: REXX MVSVAR SYMDEF behavoiur

2020-03-26 Thread Paul Gilmartin
On Wed, 25 Mar 2020 04:43:52 -0500, Bruce Hewson wrote: > >In a REXX exec I was building I stumbled onto:- > >Say 'MVSVAR'("SYMDEF",'testing &sysname in &sysplex') > >which provides an unexpected result > >&'TESTING SYSA IN PLEX01'. > >The symbols &SYSNAME and &SYSPLEX were replaced. >And, sadl

Re: REXX MVSVAR SYMDEF behavoiur

2020-03-25 Thread Bruce Hewson
Hi, I am writing a general subroutine that would replace system symbols in any text string. I had a fairly complicated piece of code to do the correct symbol replacement, including possible symbol concatenation, obeying all the replacement rules I could remember. My code still had somewhere to

Re: REXX MVSVAR SYMDEF behavoiur

2020-03-25 Thread Seymour J Metz
ERV.UA.EDU] on behalf of Paul Gilmartin [000433f07816-dmarc-requ...@listserv.ua.edu] Sent: Wednesday, March 25, 2020 12:44 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: REXX MVSVAR SYMDEF behavoiur On Wed, 25 Mar 2020 16:13:22 +, Seymour J Metz wrote: >If MFC doesn't know then it

Re: REXX MVSVAR SYMDEF behavoiur

2020-03-25 Thread Paul Gilmartin
On Wed, 25 Mar 2020 16:13:22 +, Seymour J Metz wrote: >If MFC doesn't know then it's probably impossible to find out why. > >BTW, I submitted and RCF on the conflict between text and example. > Thanks. Of course, no such problem exists if LONG_SYMBOL_NAME has been assigned a value no longer t

Re: REXX MVSVAR SYMDEF behavoiur

2020-03-25 Thread Seymour J Metz
ERV.UA.EDU] on behalf of Paul Gilmartin [000433f07816-dmarc-requ...@listserv.ua.edu] Sent: Wednesday, March 25, 2020 12:03 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: REXX MVSVAR SYMDEF behavoiur On Wed, 25 Mar 2020 15:43:47 +, Seymour J Metz wrote: >Why? I suspect that only Mike kno

Re: REXX MVSVAR SYMDEF behavoiur

2020-03-25 Thread Paul Gilmartin
On Wed, 25 Mar 2020 15:43:47 +, Seymour J Metz wrote: >Why? I suspect that only Mike knows. > MFC? I suspect it was out of his control before that happened. >Worse, the same manual has an example where the name is longer than 8 >characters. > Oh, don't you make me search for it. ITYM:

Re: REXX MVSVAR SYMDEF behavoiur

2020-03-25 Thread Paul Gilmartin
On Wed, 25 Mar 2020 11:24:30 -0400, Ken Smith wrote: >Useful, but this is closer and more clear (don't have a system to test) > >sysname = MVSVAR('SYMDEF','SYSNAME') >sysplex = MVSVAR('SYMDEF','sysplex') > >say 'Testing on' system 'in' sysplex > If, as described in the Ref.: The MVSVAR('SYMDE

Re: REXX MVSVAR SYMDEF behavoiur

2020-03-25 Thread Seymour J Metz
behalf of Paul Gilmartin [000433f07816-dmarc-requ...@listserv.ua.edu] Sent: Wednesday, March 25, 2020 11:28 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: REXX MVSVAR SYMDEF behavoiur On Wed, 25 Mar 2020 13:28:12 +, Seymour J Metz wrote: >"The MVSVAR('SYMDEF',string) fun

Re: REXX MVSVAR SYMDEF behavoiur

2020-03-25 Thread Paul Gilmartin
On Wed, 25 Mar 2020 13:28:12 +, Seymour J Metz wrote: >"The MVSVAR('SYMDEF',string) function goes through REXX substitution for >string first, the result of which must be a 1-8 character symbolic-name >specifying the symbol that has been defined in the SYMDEF statement. Any other >values in

Re: REXX MVSVAR SYMDEF behavoiur

2020-03-25 Thread Ken Smith
Useful, but this is closer and more clear (don't have a system to test) sysname = MVSVAR('SYMDEF','SYSNAME') sysplex = MVSVAR('SYMDEF','sysplex') say 'Testing on' system 'in' sysplex Ken Smith Retired Sysprog On Wed, Mar 25, 2020 at 11:01 AM Gerardo Toro wrote: > First excuse my English it i

Re: REXX MVSVAR SYMDEF behavoiur

2020-03-25 Thread Gerardo Toro
First excuse my English it is so bad. I put these sentences: I = MVSVAR('SYMDEF','SYSNAME') j = MVSVAR('SYMDEF','sysplex') SAY 'Testing MVSVAR(SYMDEF,sysname)' i 'in sysplex ' j and I obtained this ... Testing MVSVAR(SYMDEF,sysna

Re: REXX MVSVAR SYMDEF behavoiur

2020-03-25 Thread Jeremy Nicoll
On Wed, 25 Mar 2020, at 09:43, Bruce Hewson wrote: > Hi, > > In a REXX exec I was building I stumbled onto:- > > Say 'MVSVAR'("SYMDEF",'testing &sysname in &sysplex') > > which provides an unexpected result > > &'TESTING SYSA IN PLEX01'. > > The symbols &SYSNAME and &SYSPLEX were replaced.

Re: REXX MVSVAR SYMDEF behavoiur

2020-03-25 Thread Seymour J Metz
UA.EDU Subject: REXX MVSVAR SYMDEF behavoiur Hi, In a REXX exec I was building I stumbled onto:- Say 'MVSVAR'("SYMDEF",'testing &sysname in &sysplex') which provides an unexpected result &'TESTING SYSA IN PLEX01'. The symbols &SYSNAME and

REXX MVSVAR SYMDEF behavoiur

2020-03-25 Thread Bruce Hewson
Hi, In a REXX exec I was building I stumbled onto:- Say 'MVSVAR'("SYMDEF",'testing &sysname in &sysplex') which provides an unexpected result &'TESTING SYSA IN PLEX01'. The symbols &SYSNAME and &SYSPLEX were replaced. And, sadly, the whole lot was uppercased. Couldn't find this behaviour