No, 10, '10' and "10" all represent the same string. Since ADDRESS interprets 
the address operand as a hexadecimal representation of the address, that is the 
CVT pointer. My guess is that the code uses a computed address and does not 
feed it into D2X.

     FOO = STORAGE(CVT+BAR,8)      /* Incorrect */
     FOO = STORAGE(D2X(CVT+BAR),8) /* Correct   */


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

________________________________________
From: IBM Mainframe Discussion List [[email protected]] on behalf of 
Eric D Rossman [[email protected]]
Sent: Monday, December 19, 2022 9:05 AM
To: [email protected]
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(Storage('10',4))                /* point to CVT         */

>From the TSO/E REXX Reference:
STORAGE returns length bytes of data from the specified address in storage. The 
address is a character
string containing the hexadecimal representation of the storage address from 
which data is retrieved.

-----Original Message-----
From: IBM Mainframe Discussion List <[email protected]> On Behalf Of 
Paul Gorlinsky
Sent: Monday, December 19, 2022 8:52 AM
To: [email protected]
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 / signoff / archive access instructions, send email to 
[email protected] with the message: INFO IBM-MAIN

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to