I'd report both as bugs, but I suspect that the second is WAD. I'm sending an RCF asking for clarification of the second.
-- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 ________________________________________ From: IBM Mainframe Discussion List [[email protected]] on behalf of Binyamin Dissen [[email protected]] Sent: Tuesday, April 28, 2020 7:51 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 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://secure-web.cisco.com/1r1z1xg90B41flgqoGnsPm3UNUqiH3O7SX9WXODuN_XBK8p2d-Qw5y0lPuNSMp9z3lk9zIieT9hMybq9RauojJGBTKCIji3-zZcjZBGcirq9n04oco9SPVhBXDPKl7pwyIePXsvIevOlQkhWw_o0koutt3npZyVY_ZWCzDG27j62KRr5gMViV5cAAdGzut6aMFW4fBbzGyrIA4CfGTUh2TdB8xdT2BGvgAxJ8Qy2NKwznBr2IGFety1CbjKk4QQxcHCxq8sVOeYCPlfbzPxwf6aOQcmb_S0aMHrxJgniRPabytkf8PzW2kVMOAky5VnkbbfFI8OofYgrSuYXo6Zy7ttb81_Ih32iH11IgjcIfoCXND3dg7Z1CeuhZ3S1QRP4GYHmftRHZTWIaPIXYd6UhnR22z_zrtt-kzpykjDRwRy3cYTJ7twxHjY8TOTtUh-ZW/http%3A%2F%2Fwww.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 ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
