There is a sample assembler program in xephon magazine. Find it in the cbttape website
ITschak בתאריך יום ג׳, 10 באוק׳ 2023 ב-21:46 מאת Matt Hogstrom <m...@hogstrom.org>: > Thanks Mike, this helps a lot. > > Matt Hogstrom > m...@hogstrom.org > +1-919-656-0564 > PGP Key: 0x90ECB270 > Facebook <https://facebook.com/matt.hogstrom> LinkedIn < > https://linkedin/in/mhogstrom> Twitter <https://twitter.com/hogstrom> > > “It may be cognitive, but, it ain’t intuitive." > — Hogstrom > > > On Oct 10, 2023, at 1:53 PM, Mike Shaw <techsupp...@quickref.com> wrote: > > > > Matt, > > > > I have Assembler code to decode the ISPF stats once you have the > directory > > entry in-hand. Here is the IBM mapping macro for the ISPF stats in a > > directory entry: > > > > MACRO > > ISPDSTAT , Macro from ISP.AISPMACS ISPF DLIB > > ISPFDIR DSECT > > ISPVERS DS X Version > > ISPMOD DS X Modification level > > ISPFLAGS DS X Flag byte > > ISPSCLM EQU X'80' Stats created by SCLM > > * EQU X'40' Reserved for ISPF > > ISPESTAT EQU X'20' Extended statistics > > * EQU X'10' Reserved for ISPF > > * EQU X'08' Reserved for ISPF > > * EQU X'04' Reserved for ISPF > > * EQU X'02' Reserved for ISPF > > * EQU X'01' Reserved > > ISPMSEC DS X ' Seconds portion of Mod Time > > * see the description of the TIME DEC macro for the format of > > * ISPCDATE and ISPMDATE > > ISPCDATE DS CL4 Date Statistics created > > ISPMDATE DS CL4 Date Statistics modified > > ISPMTIME DS CL2 Time modified HHMM > > ISPCLINE DS CL2 Current number of lines > > ISPILINE DS CL2 Initial number of lines > > ISPMLINE DS CL2 Number of modified lines > > ISPUSRID DS CL7 Userid > > ISPBLANK DS CL3 Reserved for ISPF > > * Next 10 bytes must not be > > * referenced unless ISPESTAT is > > * ON and SMDE_USRD_LEN = X'14' > > DS CL10 Reserved for ISPF > > * when ISPESTAT = On and SMDE_USRD_LEN = X'28' then > > ORG ISPBLANK+1 > > ISPECLIN DS CL4 Current number of lines > > ISPEILIN DS CL4 Initial number of lines > > ISPEMLIN DS CL4 Number of modified lines > > MEND > > > > > > Mike Shaw > > MVS/QuickRef Support Group > > Chicago-Soft, Ltd. > > > > On Tue, Oct 10, 2023 at 12:53 PM Matt Hogstrom <m...@hogstrom.org> > wrote: > > > >> I’m looking for a way to access ISPF statistics from Java or C outside > of > >> a TSO / ISPF environment. Does such an animal exist out there ? > >> > >> Matt Hogstrom > >> m...@hogstrom.org > >> > >> “It may be cognitive, but, it ain’t intuitive." > >> — Hogstrom > >> > >> > >> ---------------------------------------------------------------------- > >> 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 > > > ---------------------------------------------------------------------- > 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
