: Re; Rexx function STORAGE with weird behavior on Netview
Re: scripting: Not yet?
https://nam11.safelinks.protection.outlook.com/?url=https%3A%2F%2Fibm-z-software-portal.ideas.ibm.com%2Fideas%2FZNETVIEW-I-42=05%7C01%7Csmetz3%40gmu.edu%7C8c8d7d2a5eab4dd1366408dae2dc9915
Paul Gilmartin [042bfe9c879d-dmarc-requ...@listserv.ua.edu]
> Sent: Tuesday, December 20, 2022 10:58 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Re; Rexx function STORAGE with weird behavior on Netview
>
> On Tue, 20 Dec 2022 10:31:37 +, Jack Zukt wrote:
> >
>
Try putting a line like
numeric digits 20
somewhere before your first use of the storage function.
Some of the storage function calculations need more than the default 9 digits'
precision, depending on address values and memory contents.
I've had inconsistent results when I've forgotten to set
] on behalf of
Paul Gilmartin [042bfe9c879d-dmarc-requ...@listserv.ua.edu]
Sent: Tuesday, December 20, 2022 10:58 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Re; Rexx function STORAGE with weird behavior on Netview
On Tue, 20 Dec 2022 10:31:37 +, Jack Zukt wrote:
>
>The glitch was the N
Hi,
That was on a LINK provided by Sebastian Welton (thank you Sebastian):
https://www.ibm.com/docs/en/z-netview/6.2.0?topic=overview-netview-restrictions-rexx-functions
Regards,
Jack
On Tue, 20 Dec 2022 at 15:58, Paul Gilmartin <
042bfe9c879d-dmarc-requ...@listserv.ua.edu> wrote:
> On
On Tue, 20 Dec 2022 10:31:37 +, Jack Zukt wrote:
>
>The glitch was the NETVIEW REXXSTRF value thas was set to the default
>DISABLE. While we wait for an IPL, the OVERRIDE solves the issue.
>
Please describe OVERRIDE. Is that a parameter to NETVIEW?
Star Trek trope:
"Computer, access data
9d-dmarc-requ...@listserv.ua.edu>
Sent: Monday, December 19, 2022 3:01 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Rexx function STORAGE with weird behavior on Netview
On Mon, 19 Dec 2022 16:29:37 +, Seymour J Metz wrote:
>In REXX, a decimal number *IS* a string.
>
Yes. Trying the follo
Hello all,
The glitch was the NETVIEW REXXSTRF value thas was set to the default
DISABLE. While we wait for an IPL, the OVERRIDE solves the issue.
And as Kulosu noted, it is Mark Zelden's IPLINFO rexx that we are using,
not an IBM supplied one.
Thank you all for your time and valuable
Also ensure that it is not being called as a DATA REXX as described here, this
has hit me previously:
https://www.ibm.com/docs/en/z-netview/6.2.0?topic=overview-netview-restrictions-rexx-functions
Sebastian
>This is exactly what I was going to point to:
>REXXSTRF: ENABLE
>
On Mon, 19 Dec 2022 16:29:37 +, Seymour J Metz wrote:
>In REXX, a decimal number *IS* a string.
>
Yes. Trying the following instruction might be informative:
say c2x( 10 ) c2x( '10' ) c2x( "10" )
>... The semantics for the first parameter of STORAGE is the same on every
> REXX
This is exactly what I was going to point to:
REXXSTRF: ENABLE
https://www.ibm.com/docs/en/z-netview/6.4.0?topic=statements-defaults
https://www.ibm.com/docs/en/z-netview/6.4.0?topic=descriptions-defaults-nccf
REXXSTRF
Specifies whether the NetView operator can run REXX command lists that use
That's why you will come across truckloads of
/***
* PTR & STG & SWAREQ: *
* *
* Utility procedures to access
On Mon, 19 Dec 2022, 15:16 Paul Gorlinsky, wrote:
> Results from a zos 2.4 system
>
> /* */
> Say c2x(Storage("10",8))
> Say c2x(Storage(10+0,4))
> Say c2x(Storage(10+4,4))
> Z = c2x(Storage(10,4))
> Say c2x(Storage(Z,8))
>
> Results:
>
> 00FD4EA8
> 00FD4EA8
>
> 021800FED054
cember 19, 2022 10:51 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: [EXTERNAL] Re: Rexx function STORAGE with weird behavior on
> Netview
>
> Yes they all returned the appropriate values ...
>
> But unexpected since 10+0 should have been passed as a decimal number and
>
A local Rexx function doesn't override a BIF unless it's in the same Rexx
program. At least, not that I've ever seen.
This seems like it should be easy to diagnose: just write a tiny program
that just does that storage() call and trace it.
Gorlinsky
Sent: Monday, December 19, 2022 10:51 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: Rexx function STORAGE with weird behavior on Netview
Yes they all returned the appropriate values ...
But unexpected since 10+0 should have been passed as a decimal number and not a
string ... maybe
Did you check the value of REXXSTRF in the netview defaults???
Try a LIST DEFAULTS command in Netview and be sure that the values for
REXXSTRF is ENABLE
-Original Message-
From: IBM Mainframe Discussion List On Behalf Of
Jack Zukt
Sent: Monday, December 19, 2022
From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of
Paul Gorlinsky [p...@atsmigrations.com]
Sent: Monday, December 19, 2022 10:50 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Rexx function STORAGE with weird behavior on Netview
Yes
...@atsmigrations.com]
Sent: Monday, December 19, 2022 11:02 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Rexx function STORAGE with weird behavior on Netview
Say c2x(Storage(16-6,8))
Say c2x(Storage((1+1+1+1+21-15),8))
Say c2x(Storage(10,8))
Say c2x(Storage("10",8))
So here is the prob
Say c2x(Storage(16-6,8))
Say c2x(Storage((1+1+1+1+21-15),8))
Say c2x(Storage(10,8))
Say c2x(Storage("10",8))
So here is the problem I have, the address portion is being computed as decimal
numbers and yet the storage function is treating the final result as a string
of HEX numbers.
Yes they all returned the appropriate values ...
But unexpected since 10+0 should have been passed as a decimal number and not a
string ... maybe this is IBM REXX v ooREXX ... don't know...
10+4 is 14 decimal and storage treated it as 14 hex
just not the behavior I have seen with other REXX
Ooh, that's good! Someone on the erring system wrote a REXX subroutine and
named it STORAGE; I like it.
---
Bob Bridges, robhbrid...@gmail.com, cell 336 382-7313
/* Setting aside the scandal caused by His Messianic claims and His reputation
as a political firebrand, only two accusations of
:22 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Rexx function STORAGE with weird behavior on Netview
Should be ...
but look at the results of Storage(10+0,4) which should have treated 10+0 and
10+4 as numeric expressions but it didn't
, 2022 10:16 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Rexx function STORAGE with weird behavior on Netview
Results from a zos 2.4 system
/* */
Say c2x(Storage("10",8))
Say c2x(Storage(10+0,4))
Say c2x(Storage(10+4,4))
Z = c2x(Storage(10,4))
Say c2x(Storage(Z,8))
Results:
00FD4E
: Monday, December 19, 2022 10:22 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Rexx function STORAGE with weird behavior on Netview
Should be ...
but look at the results of Storage(10+0,4) which should have treated 10+0 and
10+4 as numeric expressions but it didn't
>> This is (I think) an IBM supplied REXX
Not really. I believe that you referring to Mark Zelden's utility IPLINFO. Here
is the link to it
http://www.mzelden.com/mvsfiles/iplinfo.txt
>> except on one system AND when executed by a NETVIEW address space
According to Mark none of his REXX execs
]
Sent: Monday, December 19, 2022 8:29 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Rexx function STORAGE with weird behavior on Netview
I'm not really great with rexx but everything I have, and seen shows all
lower case ?
c2d(storage(d2x( etc
Carmen
On 12/19/2022 7:20 AM, Jack Zukt wrote
My guess is that there is a routine (possibly CLIST or REXX) named STORAGE that
is not the REXX STORAGE function.
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of
Jack
From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of
Carmen Vitullo [petevi...@gmail.com]
Sent: Monday, December 19, 2022 8:29 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Rexx function STORAGE with weird behavior on Netview
I'm not really great
ecember 19, 2022 9:05 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Rexx function STORAGE with weird behavior on Netview
The first argument to STORAGE is a string. 16 would be wrong.
While it's possible that this won't fix it, the correct syntax would be:
CVT = C2d(Stor
decimal numeric values not hex
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Should be ...
but look at the results of Storage(10+0,4) which should have treated 10+0 and
10+4 as numeric expressions but it didn't
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to
Never say never,,, investigate ... We don't know the history of the
installation and ALL possibilities should be examined ...
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to
Results from a zos 2.4 system
/* */
Say c2x(Storage("10",8))
Say c2x(Storage(10+0,4))
Say c2x(Storage(10+4,4))
Z = c2x(Storage(10,4))
Say c2x(Storage(Z,8))
Results:
00FD4EA8
00FD4EA8
021800FED054
Any comments?
rlinsky [p...@atsmigrations.com]
Sent: Monday, December 19, 2022 9:53 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Rexx function STORAGE with weird behavior on Netview
As a string "10" or '10' but not 10
Storage("
Gorlinsky [p...@atsmigrations.com]
Sent: Monday, December 19, 2022 10:00 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Rexx function STORAGE with weird behavior on Netview
Humm
Is there a possibility of a STORAGE() function in a library on the failing
system that could be called instead
Humm
Is there a possibility of a STORAGE() function in a library on the failing
system that could be called instead of the intended version?
Maybe check the library concatenation sequences for another module ...
including linklst
There might have been another storage function from
As a string "10" or '10' but not 10
Storage("10",4) should be correct
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
alf
> Of Paul Gorlinsky
> Sent: 19 December 2022 13:52
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Rexx function STORAGE with weird behavior on Netview
>
> If you are trying to get the cut the address is x10 not 10 try 16 instead
> of 10… boundary issue if you use 10…
>
DU
Subject: Re: Rexx function STORAGE with weird behavior on Netview
If you are trying to get the cut the address is x10 not 10 try 16 instead of
10… boundary issue if you use 10…
--
For IBM-MAIN subscribe / signoff / arch
Yep…I guessed that it was a valid numeric address…
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
x function STORAGE with weird behavior on Netview
If you are trying to get the cut the address is x10 not 10 try 16 instead of
10… boundary issue if you use 10…
--
For IBM-MAIN subscribe / signoff / archive access instructions,
@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: Rexx function STORAGE with weird behavior on Netview
If you are trying to get the cut the address is x10 not 10 try 16 instead of
10… boundary issue if you use 10…
--
For IBM-MAIN subscribe
If you are trying to get the cut the address is x10 not 10 try 16 instead of
10… boundary issue if you use 10…
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the
Hi Jack, I would recommend that you put a Call Trace("I") statement
before this CVT variable set statement, and also add a Say
C2X(Storage(10,4)) statement before it, so you can see what is there.
This piece of code would look like:
Call Trace("I")
Say C2X(Storage(10,4))
CVT=
I'm not really great with rexx but everything I have, and seen shows all
lower case ?
c2d(storage(d2x( etc
Carmen
On 12/19/2022 7:20 AM, Jack Zukt wrote:
Hi,
My colleagues come to me with a weird situation for which I cannot find an
explanation.
You are probably familiar with the
46 matches
Mail list logo