|
Below is a screen "snapshot" from a utility made by a former colleague some 10+ years ago. It let's you look at and change the associated space of any object (with the exception of those protected under the "new" security levels). Where there are pointers, you can "nest" further down the "object structure". At the time, we used it a lot to try to figure out the internal object structures", since we didn't have access to the S/38 microfiches. I know that the programmer who made this have added the option of setting pointers within the space being edited. Has anyone on this mailing list made a similar "tool"? Command Prompt: Edit Object Space (EDTOBJSPC) Type choices, press Enter. Object . . . . . . . . . . . . . *PCS____________________________ Library . . . . . . . . . . . . *LIBL_____ Name, *LIBL, *CURLIB, *MCHCTX Object type . . . . . . . . . . *ONLY___ *ONLY, *ALL, object type Internal object type . . . . . . ____ Object type Display starting position . . . *BEGIN_____ Number, *BEGIN Output format . . . . . . . . . *HEX_ *CHAR, *HEX Sample display with default values selected: (*PCS Process Control Space?) Edit Object Space Obj: QPADEV0004NFISKETJ 162787 Lib: Type: 1A EF Space size: FE0 Owner: Invocation: 1 Offset: Offset 0.1.2.3.4.5.6.7.8.9.A.B.C.D.E.F. 0123456789ABCDEF 0 _ SPP - QINSEPT QSYS 00000000 10 _ SYP - QWCBT01 QSYS 3F00 20 _ SYP - QDMCQ FF00 30 _ SYP - QPADEV0004 *MCHCTX *DEVD FF00 40 _ SYP - QTEMP 00AF827B0D76C62C8000 *MCHCTX FF00 50 _ SPP - QINTER 2 00000000 60 _ SPP - PDT 00000000 70 _ SYP - NFISKETJ *MCHCTX *USRPRF 0000 80 _ SYP - QMIRQ FF00 90 '00000000000000000000000000000000' '' A0 '00000000000000000000000000000000' '' B0 '00000000000000000000000000000000' '' C0 _ SPP - QWCLUWA 00000000 D0 '00000000000000000000000000000000' '' E0 _ SPP - SBS MONITOR DEVICE TABLE 00003300 F0 '00000000000000000000000000000000' '' + F3=Exit F10=Alter mode F12=Cancel Option 1=Select +--- | This is the MI Programmers Mailing List! | To submit a new message, send your mail to MI400@midrange.com. | To subscribe to this list send email to MI400-SUB@midrange.com. | To unsubscribe from this list send email to MI400-UNSUB@midrange.com. | Questions should be directed to the list owner/operator: dr2@cssas400.com +---
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.