They could of had had a exlst on the DCBE with xl5 ds x for the code and xl4 for the address
-----Original Message----- From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> On Behalf Of Binyamin Dissen Sent: Sunday, February 19, 2023 10:38 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: BSAM Read 31 bit mode On Sun, 19 Feb 2023 08:37:39 -0600 Paul Gilmartin <0000042bfe9c879d-dmarc-requ...@listserv.ua.edu> wrote: :>On Sun, 19 Feb 2023 12:15:40 +0200, Binyamin Dissen wrote: :> :>>The fact that your code is AMODE 31 does not mean that the access method MUST :>>be above the line. : :>>The actual expansion had an XR 15,15 before the ICM. : :>>Why do you think that there is an issue? BALR does not change the AMODE. : :>With one line more context: :>>:>ICM 15,B'0111',49(R6) :>>:> BALR 14,15 : :>THe ICM clears bits 0-7 of the (SYNAD?) address. If the user provides this, it :>must be below the line; RMODE 24. Will it be called in 24-bit or 31-bit mode? The ICM does not touch 0-7. And it is the access method address, not the SYNAD :>It's dismaying that after almost 4 decades programmers must be concerned with :>24-bit limitations. Library macros should be sensitive to some option such as :>OPTABLE and generate code accordingly. The cost of downward compatibility. One could argue that IBM should supply GLUE routines, but instead they did the DCBE. One wonders how much effort it is worth to support legacy access methods from above the bar. :>31-bit is underreaching. Should be 64. Reasonable people can disagree. -- Binyamin Dissen <bdis...@dissensoftware.com> http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
