As an exercise, I invoked a REXX out of the EXEC(()) which did an EVALSYM on X.
The (unexpected and counter-intuitive) results were that ADDRESS was the same for every entry (the address of the first entry). The only thing that changed was ENTRY. I had to write a REXX to do the simple LIST command that I wished - EVALSYM and then (address+entry*length) Another issue is that the LIST command from the REXX (with an explicit calculated address) somehow inherited the ARRAY attribute and displayed much more storage than the specified LENGTH. I had to explicitly specify MULT(1) to get the results I expected^W wanted. On Mon, 27 Apr 2020 17:18:00 +0000 Seymour J Metz <[email protected]> wrote: :>I don't have access to a live system, so I have to rely on the documentation, which sometimes omits critical information. One thought is to package the IPCS command in a REXX, possibly preceded by an EQ, and to use that member name in the RUNARRAY subcommand. :> :> :>-- :>Shmuel (Seymour J.) Metz :>http://mason.gmu.edu/~smetz3 :> :>________________________________________ :>From: IBM Mainframe Discussion List [[email protected]] on behalf of Binyamin Dissen [[email protected]] :>Sent: Monday, April 27, 2020 9:38 AM :>To: [email protected] :>Subject: Re: Request: Examples of an IPCS RUNARRAY command where the EXEC clause display storage using a pointer as a displacement off of X :> :>Unrelated. :> :>Can you provide a working example? :> :>On Sun, 26 Apr 2020 21:19:12 +0000 Seymour J Metz <[email protected]> wrote: :> :>:>Is it failing even when everything is in the same address space? :> :>:>Shmuel (Seymour J.) Metz :>:>http://mason.gmu.edu/~smetz3 :> :>:>From: IBM Mainframe Discussion List [[email protected]] on behalf of Binyamin Dissen [[email protected]] :>:>Sent: Sunday, April 26, 2020 9:59 AM :>:>To: [email protected] :>:>Subject: Request: Examples of an IPCS RUNARRAY command where the EXEC clause display storage using a pointer as a displacement off of X :>:> :>:>I would like to see an examples of an IPCS RUNARRAY command where the EXEC :>:>clause display storage using a pointer as a displacement off of X. :>:> :>:>So far I have not been able to make it work. -- Binyamin Dissen <[email protected]> http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
