TABLE-STATS

An area sufficiently sized to receive the table statistics from the LT command; it will return up to 80 bytes of table statistics. The copybook OCCURS clause must be changed to match the number of rows specified by the LIST-REQD field of the LIST-BLOCK parameter. The size of each table related statistics row (specified by LIST-SIZE) determines how many fields within the row are returned.

 01  TABLE-STATS.
     05 LIST-TABLE-ENTRY             OCCURS 36 TIMES.
        10 TABLE-NAME                PIC X(8).
        10 TABLE-OPEN-STATUS         PIC X.
        10 TABLE-LOCAL-VTS           PIC X.
        10 TABLE-ALT-INVOKED         PIC X.
        10 FILLER                    PIC X.
        10 TABLE-CALLS               PIC S9(9) COMP.
        10 TABLE-SIZE                PIC S9(9) COMP.
        10 TABLE-ROWS                PIC S9(9) COMP.
        10 TABLE-RWS-BF-EXP          PIC S9(9) COMP.
        10 TABLE-DATATBL-VTSNAME     PIC X(8).
        10 TABLE-UPDATE-CALLS-TRUNC  PIC S9(9) COMP.
        10 TABLE-DATE-TIME           PIC 9(12).
        10 FILLER                    PIC 9(4).
        10 TABLE-CALLS               PIC S9(18) COMP.
        10 TABLE-UPDATE-CALLS        PIC S9(18) COMP.
        10 TABLE-VTSNAME             PIC X(8).