I recently fought this battle when writing a verb exit that needed to access 64-bit storage. Perhaps it was because I couldn't see how to get ADPLSACC to access 64-bit storage.
The IPCS Customization doc mentions that the Storage Map Service (ADPLSMAP) can do it, so that's what I went with. It gets passed an XMSP area which points to another area that you need, the Storage Map Record, mapped by BLSRSASY. The XMSP points to the Storage Map Record via XMSPSAR. Looking at the verb exit, the other relevant parts to accessing 64-bit storage seem to be: - BLSRSASY specifying ABITS=64 - Setting flag XMSPV64 in the XMSP Items for using ADPLSMAP that don't seem to be unique to accessing 64-bit storage: - I used the "Address Space Type Code" (field SASYAST) of "CPU ASID" via setting SASYAST to EQUate ZZZASTCV. For this "protocol", the ASID from which to get the storage is set in the 2nd qualifier (SASYAS2). In my case, I got the ASID from ADPLASID. The first qualifier (SASYAS1) is set to x'FFFFFFFF'. This is mentioned towards the top of the BLSRSASY expansion. - Set XMSPCODE to EQUate XMSPACC indicating that we're accessing storage - Buffer to return storage into is pointed to by XMSPBUF - Address of storage to get from the dump is set in SASYLAD - Amount of storage to get is set in SASYFLE - Data type code SASYDTY set to EQUate ZZZDTYU, indicating "area" Those seem to be the important parts of what was required apart from the "administrative" stuff like setting the module name. I was also using an initialized BLSRSASY area from its macro invocation, so that could be setting (important) things that I missed mentioning. It took a bit of trial and error, so there could be a better way. But the Storage Map Service seems pretty powerful, so I liked the idea of having a working example of how to use it for future reference. =============================== Adam Johanson Broadcom Mainframe Software Division ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
