Interesting historical research, at the least. I don't think I'd try to use that on an employer's live systems even without the possible SP253 GETMAIN, but only on a system programmer test LPAR, to one of which I unfortunately do not have any access.
Thanks for the research anyway. Peter -----Original Message----- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Tony Harminc Sent: Friday, September 21, 2018 8:42 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Is there an API to a "storage dump line" formatting routine? EXTERNAL EMAIL On 21 September 2018 at 14:15, Farley, Peter x23353 <peter.far...@broadridge.com> wrote: > It's Friday, so how about an off-the-wall question I have always wondered > about. > > I think the answer to my question is "no", but I thought it worth asking > anyway. > > Standard system storage dumps (SYSUDUMP, SNAP/SNAPX, etc.) format storage > displays like this in a 121-character line: > > 36B219C0 00000000 00000000 00000000 00000000 00000000 00000000 00000000 > 00000000 *................................* Or like this in a 204-character line: 36B219C0 00000000 00000000 00000000 00000000 00000000 00000000 00000000 00000000 *................................* I know of no supported routine, but you could perhaps call IEAVAD71 (which is in LPA module IGC0005A (SVC 51) along with lots of other stuff, but you could link just that CSECT with your program, I imagine). This routine formats as much storage as you like, and handles all the boundary stuff plus insertion of "SAME AS ABOVE" for replicated lines. The arguments to this routine are described in macro IHAABDA in SYS1.MODGEN, which has no comment on whether this is a programming interface. I strongly suspect it isn't, because I found it only by looking at the MVS 3.8 source code from 1978 or so. [Of course I don't know that this module is even still in use on modern systems - it could be baggage that no one has removed.] Looks like you'd have to set up at least fields ABDBLOCK and ABDLENTH, ABDBUFAD and ABDBUFS2, and who knows what other things like work areas it might require. But it would be harmless to try calling it from a user program. Standard OS-type linkage with R1 -> IHAABDA and R15 -> the module. Oh oh - I see the 3.8 version does a work area GETMAIN from SP 253, so that's not going to work for your average caller. :-( I don't know if that's still in there - maybe zap it to SP 0...? You could also take the entire MVS 3.8 version and assemble it. But that may well not handle storage above 16MB, and the argument list has probably changed a bit. And in any case I gather you aren't looking for a program to modify. Happy Friday! Tony H. ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN This message and any attachments are intended only for the use of the addressee and may contain information that is privileged and confidential. If the reader of the message is not the intended recipient or an authorized representative of the intended recipient, you are hereby notified that any dissemination of this communication is strictly prohibited. If you have received this communication in error, please notify us immediately by e-mail and delete the message and any attachments from your system. ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN