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

Reply via email to