Go to Home Page
Questions?
Call 1-800-572-5517
 
  Go to Home Page  
  See all products
  See price schedules
  See manuals, tutorials, articles
  Download a free 30-day trial
  See user testimonials
  About Pacific Systems Group
 
 
SMF Tools
  See SMF Record Layouts
  See Sample SMF Reports
  Learn How to Export SMF Data
  Download Free SMF Reporting Software (30 days)
 
One of the greatest SMF record parsing programming languages I've ever seen. Chief, Large Systems Services Branch, NIH
  Choose Spectrum Writer to add 4GL to your product
  Free 60-Page Book (PDF) - How to Make an SMF Report
Spectrum DCOLLECT Reporter - the 4GL DCOLLECT Report Writer.

Spectrum SMF Writer - the 4GL SMF Report Writer.

SMF Type 100 Record

This table shows the record layout for type 100 SMF records
(DATABASE 2 Statistics).

List of other SMF record layouts available.
List of sample SMF reports.

Purpose: DATABASE 2 (DB2) writes record type 100 to record transaction data collected at event monitoring points.


It's easy to report on SMF 100 data! (Jump to sample reports)

SMF Spectrum Writer
We have a low-cost 4GL report writer especially for SMF files. It's called Spectrum SMF Writer.

Spectrum SMF Writer handles the difficult SMF record parsing for you automatically. You just specify which fields you want to see.

Spectrum SMF Writer also converts the arcane date and time fields and reformats them into an attractive report.

Plus, Spectrum SMF Writer can export SMF data as comma delimited files to use on your PC.
 
Try It FREE Now!

The Spectrum Writer definitions for the SMF type 100 record below are based on the description provided by IBM in its "MVS Systems Management Facilities (SMF)" manual and/or DSECTs mapped by its Assembler macros.

 

Spectrum SMF Writer
File Definition for Type 100 SMF Records
DATABASE 2 Statistics

***********************************************************************
*          SPECTRUM SMF WRITER -- FILE DEFINITION STATEMENTS          *
*            SMF TYPE 100 RECORD - "DATABASE 2 STATISTICS"            *
***********************************************************************
FLD: QWST     LEN(4) TYPE(BIN) DISP(0)       /*SMF 100 RECORD IFCID 0*/
*******************************************************************
*  SMF COMMON HEADER MAPPING MACRO FOR STATISTICS TYPE 100
*******************************************************************
*
FLD: SM100BKE LEN(4) DISP(0)
                          /*END OF BLOCK ADDRESS WHEN COLLECTING DATA*/
FLD: SM100LEN LEN(2) DISP(0)      /*SM100 TOTAL LENGTH*/
FLD: SM100SGD LEN(2) DISP(2)      /*ZZ BYTES*/
FLD: SM100FLG LEN(1) DISP(4)      /*SYSTEM INDICATOR*/
FLD: SM100RTY LEN(1) DISP(5)      /*RECORD TYPE X'64'*/
FLD: SM100TME LEN(4) TYPE(B-SECS) DISP(6) DEC(2)
                                  /*TIME SMF MOVED RECORD*/
FLD: SM100DTE TYPE(P-CYYDDD) DISP(10)         /*DATE SMF MOVED RECORD*/
FLD: SM100SID LEN(4) DISP(14)     /*SYSTEM ID (SID)*/
FLD: SM100SSI LEN(4) DISP(18)     /*SUBSYSTEM ID*/
FLD: SM100STF LEN(1) DISP(22)     /*RESERVED*/
FLD: SM100RI  LEN(1) DISP(23)     /*RESERVED*/
FLD: SM100SEQ LEN(4) DISP(24)     /*RESERVED*/
FLD: SM100BUF LEN(4) DISP(24)     /*TEMPORARY POINTER TO BUFFER AREA*/
FLD: SM100END LEN(1) DISP(28)    /*START OF THE SELF DEFINING SECTION*/
*
FLD: SM100PSO LEN(4) TYPE(BIN) DISP(28)
                                  /*OFFSET TO THE PRODUCT SECTION*/
FLD: SM100PSL LEN(2) TYPE(BIN) DISP(32)
                                  /*LENGTH OF THE PRODUCT SECTION*/
FLD: SM100PSN LEN(2) TYPE(BIN) DISP(34)  /*NUMBER OF PRODUCT SECTIONS*/
*
*   STANDARD HEADER MAPPED BY DSNDQWHS

***********************************************************************
*   QWHS    DSNDQWHS   *   STANDARD HEADER ALWAYS APPEARS
*    QWHC    DSNDQWHC  *    CORRELATION HEADER MAY APPEAR
*    QWHT    DSNDQWHT  *    TRACE HEADER MAY APPEAR
*    QWHU    DSNDQWHU  *    CPU   HEADER MAY APPEAR
*    QWHD    DSNDQWHD  *    DISTRIBUTED HEADER MAY APPEAR
*    QWHA    DSNDQWHA  *    DATA SHARING HEADER
***********************************************************************
**** QWHS     DSECT                                                     
COMP: QWHS_OFFSET = 
        WHEN(SM100RTY=100 AND SM100PSN > 0) ASSIGN(SM100PSO)
        ELSE                                ASSIGN(99999)
FLD: QWHS     DISP(0) LEN(1) OFFSET(QWHS_OFFSET)
*
***********************************************************************
*                         PRODUCT SECTION
* THIS SECTION CONTAINS 1 OR MORE HEADERS. EACH HEADER CONTAINS		
* HEADER LENGTH, A HEADER TYPE CODE, AND VARIABLE INFORMATION
* DEPENDING UPON THE HEADER TYPE.
***********************************************************************
COMP: PSHDR_MAX_OFFSET  =      /* WILL POINT PAST ALL HDRS*/
        WHEN(SM100RTY=100 AND SM100PSN > 0) ASSIGN(SM100PSO +SM100PSL)
        ELSE                                ASSIGN(99999)
*
***********************************************************************
***                                                                  **
*** INSTRUMENTATION STANDARD HEADER DATA IN PRODUCT SECTION          **
***    THIS HEADER IS ALWAYS PRESENT AND IS ALWAYS THE 1ST HEADER    **
***********************************************************************
*
FLD: QWHSLEN  LEN(2) TYPE(BIN) DISP(0) /*LENGTH OF THE STANDARD HEADER*/
FLD: QWHSTYP  LEN(1)               /*HEADER TYPE*/
*
*  **              HEADER TYPE CONSTANTS                             **
COMP: QWHSHS01 = 1                 /*..STANDARD HEADER*/
COMP: QWHSHC02 = 2                 /*..CORRELATION HEADER*/
COMP: QWHSHT04 = 4                 /*..TRACE HEADER*/
COMP: QWHSHU08 = 8                 /*..CPU HEADER*/
COMP: QWHSHD16 = 16                /*..DISTRIBUTED HEADER*/
COMP: QWHSHA32 = 32                /*..DATA SHARING HEADER*/
*
FLD: QWHSRMID LEN(1)               /*RESOURCE MANAGER ID*/
FLD: QWHSIID  TYPE(HALF)           /*IFCID*/
FLD: QWHSRELN LEN(2)               /*RELEASE NUMBER AREA*/
FLD: QWHSNSDA LEN(1) TYPE(BIN) DISP(6) /*NUMBER OF SELF DEFINING AREAS*/
*
FLD: QWHSRN   LEN(1)               /*RELEASE INDICATOR NUMBER HEX*/
*
FLD: QWHSACE  TYPE(FULL)           /*ACE ADDRESS DISPATCH UNIT ADDRESS*/
FLD: QWHSSSID LEN(4)               /*SUBSYSTEM NAME*/
FLD: QWHSSTCK TYPE(STCKTIME)       /*STORE CLOCK VALUE OF HEADER*/
*                                 For data sharing, this is the sysplex
*                                 timer value.
*
* *********************************************************************
* * NOTE- THE FOLLOWING SEQUENCE NUMBERS ARE UNIQUE WITHIN A SINGLE   *
* * SUBSYSTEM INSTANCE AND ARE INITIALIZED TO ZERO ON RESTART.        *
* * BECAUSE OF MP CONSIDERATIONS THE NUMBERS MAY NOT ALWAYS BE        *
* * IN ASCENDING ORDER.                                               *
* *********************************************************************
*
FLD: QWHSISEQ TYPE(FULL)           /*SEQUENCE NUMBER FOR IFCID*/
FLD: QWHSWSEQ TYPE(FULL)           /*SEQUENCE NUMBER FOR DESTINATION*/
FLD: QWHSMTN  LEN(4)               /*ACTIVE TRACE NUMBER MASK*/
FLD: QWHSLOCN LEN(16)              /*%U LOCAL LOCATION NAME*/
*                                   Truncated if QWHSLOCN_Off¬=0
FLD: QWHSLWID LEN(24)              /*LUWID*/
FLD: QWHSNID  LEN(8) DISP(52)      /*NETWORK ID*/
FLD: QWHSLUNM LEN(8)               /*LUNAME*/
FLD: QWHSLUUV LEN(6)               /*UNIQUENESS VALUE*/
FLD: QWHSLUCC TYPE(FULL)           /*COMMIT COUNT*/
FLD: QWHSFLAG LEN(1)               /*Flags*/
COMP: QWHS_UNICODE = X'80'         /*%U fields contain Unicode (UTF 8)*/
FLD: QWHSLOCN_OFF TYPE(HALF) DISP(78)            /*Offset from QWHS to*/
*                                   LOCAL LOCATION NAME
*                                   If QWHSLOCN truncated
FLD: QWHSSUBV TYPE(HALF)         /*THE SUBVERSION FOR THE BASE RELEASE*/
FLD: QWHSEND  LEN(1)               /*END OF STANDARD HEADER*/
*
*
*

**** QWHSLOCN_D   Dsect                Use if QWHSLOCN_Off¬=0
COMP: QWHSLOCN_D_OFFSET = 
        WHEN(QWHSLOCN_Off <> 0) ASSIGN(QWHS_OFFSET + QWHSLOCN_Off)
        ELSE                    ASSIGN(99999)
           
FLD: QWHSLOCN_D DISP(0) LEN(1) OFFSET(QWHSLOCN_D_OFFSET)
                                  /*Use if QWHSLOCN_Off¬ 0*/
*
FLD: QWHSLOCN_LEN TYPE(HALF) DISP(0)   /*Length of the following field*/
FLD: QWHSLOCN_VAR LEN(128)         /*%U LOCAL LOCATION NAME*/
*
***THE FOLLOWING VALUES DEFINE THE IFCID IN QWHSIID                  **
***                          RMID: DESCRIPTION:                      **
COMP: QWHS0000 = 0                 /*..DEFAULT NORMAL TRACE RECORDS*/
COMP: QWHS0001 = 1                 /*26 ..SYSTEM STATISTICS*/
COMP: QWHS0002 = 2                 /*26 ..DATA BASE STATISTICS*/
COMP: QWHS0003 = 3                 /*26 ..ACCOUNTING*/
*

***********************************************************************
*    SOME OR ALL OF THESE HEADERS MAY NOW FOLLOW THE STD HEADER:
*    QWHC    DSNDQWHC  *  CORRELATION HEADER PRESENT ON ACCOUNTING
*    QWHT    DSNDQWHT  *  TRACE HEADER MAY APPEAR
*    QWHU    DSNDQWHU  *  CPU HEADER MAY APPEAR
*    QWHD    DSNDQWHD  *  DISTRIBUTED HEADER PRESENT ON ACCOUNTING
*    QWHA    DSNDQWHA  *  DATA SHARING HEADER
***********************************************************************
*
***********************************************************************
* DEFINE JUST THE LENGTH AND TYPE OF THE NEXT HEADER SECTION PRESENT  *
***********************************************************************
COMPUTE: PSHDR_2_TEST_OFFSET = QWHS_OFFSET + QWHSLEN  
COMPUTE: PSHDR_2_OFFSET =
  WHEN(PSHDR_2_TEST_OFFSET >= PSHDR_MAX_OFFSET) ASSIGN(99999)
  ELSE                                      ASSIGN(PSHDR_2_TEST_OFFSET)
*
FIELD:   PSHDR_2_LEN DISP(0) LEN(2) TYPE(BIN) OFFSET(PSHDR_2_OFFSET)
FIELD:   PSHDR_2_TYP         LEN(1) TYPE(BIN)
*

***********************************************************************
* DEFINE JUST THE LENGTH AND TYPE OF THE 3RD SECTION PRESENT          *
***********************************************************************
COMPUTE: PSHDR_3_TEST_OFFSET = PSHDR_2_OFFSET + PSHDR_2_LEN
COMPUTE: PSHDR_3_OFFSET =
  WHEN(PSHDR_3_TEST_OFFSET >= PSHDR_MAX_OFFSET) ASSIGN(99999)
  ELSE                                      ASSIGN(PSHDR_3_TEST_OFFSET)
*
FIELD:   PSHDR_3_LEN DISP(0) LEN(2) TYPE(BIN) OFFSET(PSHDR_3_OFFSET)
FIELD:   PSHDR_3_TYP         LEN(1) TYPE(BIN)
*
***********************************************************************
* DEFINE JUST THE LENGTH AND TYPE OF THE 4TH SECTION PRESENT          *
***********************************************************************
COMPUTE: PSHDR_4_TEST_OFFSET = PSHDR_3_OFFSET + PSHDR_3_LEN
COMPUTE: PSHDR_4_OFFSET =
  WHEN(PSHDR_4_TEST_OFFSET >= PSHDR_MAX_OFFSET) ASSIGN(99999)
  ELSE                                      ASSIGN(PSHDR_4_TEST_OFFSET)
*
FIELD:   PSHDR_4_LEN DISP(0) LEN(2) TYPE(BIN) OFFSET(PSHDR_4_OFFSET)
FIELD:   PSHDR_4_TYP         LEN(1) TYPE(BIN)
*
*
***********************************************************************
* DEFINE JUST THE LENGTH AND TYPE OF THE 5TH SECTION PRESENT          *
***********************************************************************
COMPUTE: PSHDR_5_TEST_OFFSET = PSHDR_4_OFFSET + PSHDR_4_LEN
COMPUTE: PSHDR_5_OFFSET =
  WHEN(PSHDR_5_TEST_OFFSET >= PSHDR_MAX_OFFSET) ASSIGN(99999)
  ELSE                                      ASSIGN(PSHDR_5_TEST_OFFSET)
*
FIELD:   PSHDR_5_LEN DISP(0) LEN(2) TYPE(BIN) OFFSET(PSHDR_5_OFFSET)
FIELD:   PSHDR_5_TYP         LEN(1) TYPE(BIN)
*
************************************************************************
* DEFINE JUST THE LENGTH AND TYPE OF THE 6TH SECTION PRESENT           *
************************************************************************
COMPUTE: PSHDR_6_TEST_OFFSET = PSHDR_5_OFFSET + PSHDR_5_LEN
COMPUTE: PSHDR_6_OFFSET =
  WHEN(PSHDR_6_TEST_OFFSET >= PSHDR_MAX_OFFSET) ASSIGN(99999)
  ELSE                                       ASSIGN(PSHDR_6_TEST_OFFSET)
*
FIELD:   PSHDR_6_LEN DISP(0) LEN(2) TYPE(BIN) OFFSET(PSHDR_6_OFFSET)
FIELD:   PSHDR_6_TYP         LEN(1) TYPE(BIN)
*
*
***********************************************************************
* CHOOSE OFFSET POINTER FOR CORRELATION HEADER
***********************************************************************
COMPUTE: QWHC_OFFSET =
   WHEN(PSHDR_2_TYP = QWHSHC02) ASSIGN(PSHDR_2_OFFSET)
   WHEN(PSHDR_3_TYP = QWHSHC02) ASSIGN(PSHDR_3_OFFSET)
   WHEN(PSHDR_4_TYP = QWHSHC02) ASSIGN(PSHDR_4_OFFSET)
   WHEN(PSHDR_5_TYP = QWHSHC02) ASSIGN(PSHDR_5_OFFSET)
   WHEN(PSHDR_6_TYP = QWHSHC02) ASSIGN(PSHDR_6_OFFSET)
   ELSE                         ASSIGN(99999) /*QWHC NOT PRESENT*/
*
*
***********************************************************************
* CHOOSE OFFSET POINTER FOR TRACE HEADER
***********************************************************************
COMPUTE: QWHT_OFFSET =
   WHEN(PSHDR_2_TYP = QWHSHT04) ASSIGN(PSHDR_2_OFFSET)
   WHEN(PSHDR_3_TYP = QWHSHT04) ASSIGN(PSHDR_3_OFFSET)
   WHEN(PSHDR_4_TYP = QWHSHT04) ASSIGN(PSHDR_4_OFFSET)
   WHEN(PSHDR_5_TYP = QWHSHT04) ASSIGN(PSHDR_5_OFFSET)
   WHEN(PSHDR_6_TYP = QWHSHT04) ASSIGN(PSHDR_6_OFFSET)
   ELSE                         ASSIGN(99999) /*QWHT NOT PRESENT*/
*
*
***********************************************************************
* CHOOSE OFFSET POINTER FOR CPU HEADER
***********************************************************************
COMPUTE: QWHU_OFFSET =
   WHEN(PSHDR_2_TYP = QWHSHU08) ASSIGN(PSHDR_2_OFFSET)
   WHEN(PSHDR_3_TYP = QWHSHU08) ASSIGN(PSHDR_3_OFFSET)
   WHEN(PSHDR_4_TYP = QWHSHU08) ASSIGN(PSHDR_4_OFFSET)
   WHEN(PSHDR_5_TYP = QWHSHU08) ASSIGN(PSHDR_5_OFFSET)
   WHEN(PSHDR_6_TYP = QWHSHU08) ASSIGN(PSHDR_6_OFFSET)
   ELSE                         ASSIGN(99999) /*QWHU NOT PRESENT*/
*
*
***********************************************************************
* CHOOSE OFFSET POINTER FOR DISTRIBUTED HEADER
***********************************************************************
COMPUTE: QWHD_OFFSET =
   WHEN(PSHDR_2_TYP = QWHSHD16) ASSIGN(PSHDR_2_OFFSET)
   WHEN(PSHDR_3_TYP = QWHSHD16) ASSIGN(PSHDR_3_OFFSET)
   WHEN(PSHDR_4_TYP = QWHSHD16) ASSIGN(PSHDR_4_OFFSET)
   WHEN(PSHDR_5_TYP = QWHSHD16) ASSIGN(PSHDR_5_OFFSET)
   WHEN(PSHDR_6_TYP = QWHSHD16) ASSIGN(PSHDR_6_OFFSET)
   ELSE                         ASSIGN(99999) /*QWHD NOT PRESENT*/
*
*
***********************************************************************
* CHOOSE OFFSET POINTER FOR DATA SHARING HEADER
***********************************************************************
COMPUTE: QWHA_OFFSET =
   WHEN(PSHDR_2_TYP = QWHSHA32) ASSIGN(PSHDR_2_OFFSET)
   WHEN(PSHDR_3_TYP = QWHSHA32) ASSIGN(PSHDR_3_OFFSET)
   WHEN(PSHDR_4_TYP = QWHSHA32) ASSIGN(PSHDR_4_OFFSET)
   WHEN(PSHDR_5_TYP = QWHSHA32) ASSIGN(PSHDR_5_OFFSET)
   WHEN(PSHDR_6_TYP = QWHSHA32) ASSIGN(PSHDR_6_OFFSET)
   ELSE                         ASSIGN(99999) /*QWHA NOT PRESENT*/
*
*

***********************************************************************
*    QWHA    DSNDQWHA  *  DATA SHARING HEADER
***********************************************************************
**** QWHA     DSECT                                                     
FLD: QWHA     DISP(0) LEN(1) OFFSET(QWHA_OFFSET)
*
*     /**************************************/
*     /*INSTRUMENTATION DATA SHARING HEADER */
*     /**************************************/
*
FLD: QWHALEN  LEN(2) TYPE(BIN) DISP(0)              /*LENGTH OF HEADER*/
FLD: QWHATYP  LEN(1)               /*TYPE OF HEADER DATA SHARING*/
*                         /*   NAME - QWHSHA32                       */
FLD: QWHAMEMN LEN(8) DISP(4)       /*DB2 MEMBER NAME*/
*                         /*   WITHIN A DB2 DATA SHARING GROUP, EACH */
*                         /*   MEMBER DB2 HAS A NAME.                */
FLD: QWHADSGN LEN(8)               /*DB2 DATA SHARING GROUP NAME*/
FLD: QWHAEND  LEN(1)


***********************************************************************
*    QWHU    DSNDQWHU  *  CPU HEADER MAY APPEAR
***********************************************************************
**** QWHU     DSECT                                                     
FLD: QWHU     DISP(0) LEN(1) OFFSET(QWHU_OFFSET)
*     /*INSTRUMENTATION CPU HEADER DATA  */
FLD: QWHULEN  LEN(2) TYPE(BIN) DISP(0)              /*LENGTH OF HEADER*/
FLD: QWHUTYP  LEN(1)              /*TYPE OF HEADER CPU MAPPED QWHSHU08*/
FLD: QWHUCPU  TYPE(STCKTIME) DISP(4)
                               /*CPU time of the currently dispatched*/
*                      /* execution unit (TCB or SRB).  This    */
*                      /* time includes CPU consumed on an IBM  */
*                      /* specialty engine.                     */
*                      /* Note: A given ACE token may           */
*                      /* run under one or more MVS dispatchable*/
*                      /* execution units. Thus the CPU time for*/
*                      /* a given ACE may decrease between      */
*                      /* events.  Binary zero indicates        */
*                      /* CPU time was not available.           */
FLD: QWHUCNT  LEN(2)               /*(S) COUNT FIELD RESERVED*/
FLD: QWHUEND  LEN(1)


***********************************************************************
*    QWHT    DSNDQWHT  *  TRACE HEADER MAY APPEAR
***********************************************************************
**** QWHT     DSECT                                                     
FLD: QWHT     DISP(0) LEN(1) OFFSET(QWHT_OFFSET)
*     /*INSTRUMENTATION TRACE HEADER DATA  */
FLD: QWHTLEN  LEN(2) TYPE(BIN) DISP(0)              /*LENGTH OF HEADER*/
FLD: QWHTTYP  LEN(1)               /*TYPE OF HEADER TRACE*/
FLD: QWHTFLG0 LEN(1)               /*FLAGS*/
COMP: QWHTALFG = X'20'             /*ON DATA USES ALET TOKEN*/
FLD: QWHTTID  TYPE(HALF)           /*ID SPECIFIED DSNWTRC MACRO*/
FLD: QWHTTAG  LEN(1)               /*TAG SPECIFIED DSNWTRC MACRO*/
FLD: QWHTFUNC LEN(1)               /*FUNC SPECIFIED DSNWTRC MACRO*/
FLD: QWHTEB   TYPE(FULL)           /*EB ADDRESS*/
FLD: QWHTPASI TYPE(HALF)           /*PASID EPAR*/
*  /*FOLLOWING FIELDS BELONG TO CALLERS MODULE WHICH INVOKED TRACE*/
FLD: QWHTR14A TYPE(HALF)           /*REGISTER 14 ASID*/
FLD: QWHTR14  TYPE(FULL)           /*REGISTER 14*/
FLD: QWHTR15  TYPE(FULL)           /*REGISTER 15*/
FLD: QWHTR0   TYPE(FULL)           /*REGISTER 0*/
FLD: QWHTR1   TYPE(FULL)           /*REGISTER 1*/
FLD: QWHTEXU  TYPE(FULL)           /*ADDRESS OF MVS EXECUTION UNIT*/
FLD: QWHTDIM  TYPE(HALF)           /*NUMBER OF DATA ITEMS*/
FLD: QWHTHASI TYPE(HALF)           /*HOME ASID*/
*  /*THE FOLLOWING FIELDS REPEAT FOR EACH  DATA ITEM              */
FLD: QWHTDATA TYPE(FULL)           /*ADDRESS OF THE DATA*/
FLD: QWHTFLAG TYPE(HALF)           /*FLAGS IN THE TRACE LIST*/
FLD: QWHTDATL TYPE(HALF)           /*LENGTH OF THE DATA*/
FLD: QWHTEND  TYPE(FULL)
FLD: QWHTALET TYPE(FULL) DISP(48)  /*ALET TOKEN FOR DATA FIELD*/
*


***********************************************************************
*    QWHC    DSNDQWHC  *  CORRELATION HEADER PRESENT ON ACCOUNTING
***********************************************************************
**** QWHC     DSECT                                                     
FLD: QWHC     DISP(0) LEN(1) OFFSET(QWHC_OFFSET)
*
*/*****************************************************************/
*/*                                                               */
*/*             INSTRUMENTATION CORRELATION DATA                  */
*/*                                                               */
*/*****************************************************************/
*
FLD: QWHCLEN  LEN(2) TYPE(BIN) DISP(0)
                                  /*LENGTH OF THE CORRELATION HEADER*/
FLD: QWHCTYP  LEN(1)               /*TYPE OF HEADER CORRELATION 2*/
*
*/*****************************************************************/
*/*  FOLLOWING VALUES ARE OBTAINED WHEN THE RECORD IS WRITTEN     */
*/*****************************************************************/
*
FLD: QWHCAID  LEN(8) DISP(4)       /*%U AUTHORIZATION ID*/
*                                  /*   Truncated if QWHCAID_Off¬=0  */
FLD: QWHCCV   LEN(12)              /*CORRELATION ID VALUE*/
FLD: QWHCCN   LEN(8)   /*CONNECTION NAME (NOT VALID ON END OF MEMORY &*/
*                        REFLECTS THE MVS HOME ASID CONNECTION NAME) */
FLD: QWHCPLAN LEN(8)               /*PLAN NAME*/
FLD: QWHCOPID LEN(8)               /*%U ORIGINAL OPERATOR ID*/
*                                  /*   Truncated if QWHCOPID_Off¬=0 */
FLD: QWHCATYP TYPE(FULL)           /*CONNECTING SYSTEM TYPE CODE*/
FLD: QWHCTOKN LEN(22)              /*ACCOUNTING TOKEN*/
FLD: QWHCRES2 LEN(2)               /*RESERVED*/
FLD: QWHCEUID LEN(16)              /*THE END USER'S USERID AT THE*/
*                                  /* USER'S WORKSTATION.            */
*                                  /*   Truncated if QWHCOPID_Off¬=0 */
FLD: QWHCEUTX LEN(32)              /*THE END USER'S TRANSACTION NAME.*/
FLD: QWHCEUWN LEN(18)              /*THE END USER'S WORKSTATION NAME.*/
*
FLD: QWHCAID_OFF TYPE(HALF)        /*Offset from QWHC to*/
*                                  /*   AUTHORIZATION ID             */
*                                  /*   If QWHCAID truncated         */
FLD: QWHCOPID_OFF TYPE(HALF)       /*Offset from QWHC to*/
*                                  /*   ORIGINAL OPERATOR ID         */
*                                  /*   If QWHCOPID truncated        */
FLD: QWHCEUID_OFF TYPE(HALF)       /*Offset from QWHC to*/
*                                  /*   THE END USER'S USERID        */
*                                  /*   If QWHCEUID truncated        */
*                                  /* Trusted context and role data  */
*                                  /* will be present if the record  */
*                                  /* is written by an agent running */
*                                  /* under a trusted context and    */
*                                  /* the trusted context data can   */
*                                  /* be accessed.                   */
FLD: QWHCTCXT_OFF TYPE(HALF)       /*Offset from QWHC to*/
*                                  /* Trusted Context name, if       */
*                                  /* running in a trusted context   */
FLD: QWHCROLE_OFF TYPE(HALF)       /*Offset from QWHC to*/
*                                  /* Role name associated with the  */
*                                  /* Authorization ID, if running   */
*                                  /* in a trusted context           */
FLD: QWHCOAUD_OFF TYPE(HALF)       /*Offset from QWHC to original*/
*                                  /* application USERID             */
FLD: QWHCCTKN_OFF TYPE(HALF)       /*Offset from QWHC to*/
*                                  /* the correlation token.         */
*                                  /* V9-Present only if QWHSSUBV    */
*                                  /*    is 1 or higher.             */
FLD: QWHCEND  TYPE(FULL)
*
*

**** QWHCAID_D    Dsect                 /* Use if QWHCAID_Off¬=0     
COMP: QWHCAID_D_OFFSET = 
        WHEN(QWHCAID_Off <> 0) ASSIGN(QWHC_OFFSET + QWHCAID_Off)
        ELSE                   ASSIGN(99999)
   
FLD: QWHCAID_D DISP(0) LEN(1) OFFSET(QWHCAID_D_OFFSET)
                                  /*Use if QWHCAID_Off¬ 0*/
FLD: QWHCAID_LEN TYPE(HALF) DISP(0)/*Length of the following field*/
FLD: QWHCAID_VAR LEN(128)          /*%U AUTHORIZATION ID*/
*
*

**** QWHCOPID_D   Dsect                 /* Use if QWHCOPID_Off¬=0       
COMP: QWHCOPID_D_OFFSET = 
        WHEN(QWHCOPID_Off <> 0) ASSIGN(QWHC_OFFSET + QWHCOPID_Off)
        ELSE                    ASSIGN(99999)

FLD: QWHCOPID_D DISP(0) LEN(1) OFFSET(QWHCOPID_D_OFFSET)
                                  /*Use if QWHCOPID_Off¬ 0*/
FLD: QWHCOPID_LEN TYPE(HALF) DISP(0)   /*Length of the following field*/
FLD: QWHCOPID_VAR LEN(128)         /*%U ORIGINAL OPERATOR ID*/
*
*

**** QWHCEUID_D   Dsect                 /* Use if QWHCEUID_Off¬=0       
COMP: QWHCEUID_D_OFFSET = 
        WHEN(QWHCEUID_Off <> 0) ASSIGN(QWHC_OFFSET + QWHCEUID_Off)
        ELSE                    ASSIGN(99999)

FLD: QWHCEUID_D DISP(0) LEN(1) OFFSET(QWHCEUID_D_OFFSET)
                                  /*Use if QWHCEUID_Off¬ 0*/
FLD: QWHCEUID_LEN TYPE(HALF) DISP(0)   /*Length of the following field*/
FLD: QWHCEUID_VAR LEN(128)         /*END USER'S USERID*/
*
*

**** QWHCTCXT_D   Dsect                 /* Use if QWHCTCXT_Off¬=0       
COMP: QWHCTCXT_D_OFFSET = 
        WHEN(QWHCTCXT_Off <> 0) ASSIGN(QWHC_OFFSET + QWHCTCXT_Off)
        ELSE                    ASSIGN(99999)

FLD: QWHCTCXT_D DISP(0) LEN(1) OFFSET(QWHCTCXT_D_OFFSET)
                                  /*Use if QWHCTCXT_Off¬ 0*/
FLD: QWHCTCXT_LEN TYPE(HALF) DISP(0)   /*Length of the following field*/
FLD: QWHCTCXT_VAR LEN(128)         /*%U Trusted Context name*/
*
*

**** QWHCROLE_D   Dsect                 /* Use if QWHCROLE_Off¬=0       
COMP: QWHCROLE_D_OFFSET = 
        WHEN(QWHCROLE_Off <> 0) ASSIGN(QWHC_OFFSET + QWHCROLE_Off)
        ELSE                    ASSIGN(99999)

FLD: QWHCROLE_D DISP(0) LEN(1) OFFSET(QWHCROLE_D_OFFSET)
                                  /*Use if QWHCROLE_Off¬ 0*/
FLD: QWHCROLE_LEN TYPE(HALF) DISP(0)   /*Length of the following field*/
FLD: QWHCROLE_VAR LEN(128)         /*%U Role name associated with*/
*                                  /*    authid                      */
*
*

**** QWHCOAUD_D   Dsect                 /* Use if QWHCOAUD_Off¬=0       
COMP: QWHCOAUD_D_OFFSET = 
        WHEN(QWHCOAUD_Off <> 0) ASSIGN(QWHC_OFFSET + QWHCOAUD_Off)
        ELSE                    ASSIGN(99999)

FLD: QWHCOAUD_D DISP(0) LEN(1) OFFSET(QWHCOAUD_D_OFFSET)
                                  /*Use if QWHCOAUD_Off¬ 0*/
FLD: QWHCOAUD_LEN TYPE(HALF) DISP(0)   /*Length of the following field*/
FLD: QWHCOAUD_VAR LEN(128)         /*%U Original application USERID*/
*
*

**** QWHCCTKN_D   Dsect                 /* Use if QWHCCTKN_Off¬=0       
COMP: QWHCCTKN_D_OFFSET = 
        WHEN(QWHCCTKN_Off <> 0) ASSIGN(QWHC_OFFSET + QWHCCTKN_Off)
        ELSE                    ASSIGN(99999)

FLD: QWHCCTKN_D DISP(0) LEN(1) OFFSET(QWHCCTKN_D_OFFSET)
                                  /*Use if QWHCCTKN_Off¬ 0*/
FLD: QWHCCTKN_LEN TYPE(HALF) DISP(0)   /*Length of the following field*/
FLD: QWHCCTKN_VAR LEN(128)         /*%U Correlation token.*/
*
*
*/*****************************************************************/
*/*      CONNECTION SYSTEM TYPE CONSTANTS                         */
*/*****************************************************************/
*
COMP: QWHCTSO = X'1'               /*TSO FOREGROUND AND BACKGROUND*/
COMP: QWHCDB2C = X'2'              /*DB2 CALL ATTACH*/
COMP: QWHCDLIB = X'3'              /*DL/I BATCH*/
COMP: QWHCCICS = X'4'              /*CICS ATTACH*/
COMP: QWHCIMSB = X'5'              /*IMS ATTACH BMP*/
COMP: QWHCIMSM = X'6'              /*IMS ATTACH MPP*/
COMP: QWHCDUW = X'7'               /*DB2 PRIVATE PROTOCOL*/
COMP: QWHCRUW = X'8'               /*DRDA PROTOCOL*/
COMP: QWHCICTL = X'9'              /*IMS CONTROL REGION*/
COMP: QWHCTBMP = X'A'              /*IMS TRANSACTION BMP*/
COMP: QWHCUTIL = X'B'              /*DB2 UTILITIES*/
COMP: QWHCTRRS = X'C'              /*RRSAF ATTACH*/


***********************************************************************
*    QWHD    DSNDQWHD  *  DISTRIBUTED HEADER PRESENT ON ACCOUNTING
***********************************************************************
**** QWHD     DSECT                                                     
FLD: QWHD     DISP(0) LEN(1) OFFSET(QWHD_OFFSET)
*
*/********************************************************************/
*/*             INSTRUMENTATION DISTRIBUTED DATA                     */
*/********************************************************************/
*
FLD: QWHDLEN  LEN(2) TYPE(BIN) DISP(0)
                                  /*LENGTH OF THE DISTRIBUTED HEADER*/
FLD: QWHDTYP  LEN(1)               /*TYPE OF HEADER DISTRIBUTED 16*/
*
*/********************************************************************/
*/* THE FOLLOWING VALUES ARE OBTAINED WHEN THE RECORD IS WRITTEN     */
*/********************************************************************/
*
FLD: QWHDRQNM LEN(16) DISP(4)
                         /*%U REQUESTER LOCATION NAME BLANK IF HEADER*/
*                            IS WRITTEN AT APPLICATION REQUESTER SITE
*                            THE NAME BY WHICH DB2 KNOWS THE APPLI-
*                            REQUESTER
*                            Truncated if QWHDRQNM_Off¬=0
FLD: QWHDTSTP LEN(8)               /*TIMESTAMP FOR DBAT TRACE RECORDS*/
FLD: QWHDSVNM LEN(16)     /*%U SRVNAM PARAMETER OF DRDA EXCSAT COMMAND*/
*                            WHAT A DRDA REQUESTER CALLS ITSELF.
*                            FOR PRIVATE PROTOCOLS SAME AS QWHDRQNM.
*                            ZEROES IF HEADER IS WRITTEN AT
*                            APPLICATION REQUESTER SITE.
*                            Truncated if QWHDSVNM_Off¬=0
FLD: QWHDPRID LEN(8)          /*PRDID PARAMETER OF DRDA ACCRDB COMMAND*/
*                            PRODUCT ID OF APPLICATION REQUESTER.
*                            FOR PRIVATE PROTOCOLS THIS FIELD WILL
*                            BE SET TO AN APPROPRIATE PRODUCT ID VALUE
*                            ZEROES IF HEADER IS WRITTEN AT APPLICA-
*                            TION REQUESTER SITE.
FLD: QWHDRQNM_OFF TYPE(HALF)       /*Offset from QWHD to*/
*                            REQUESTER LOCATION NAME
*                            If QWHDRQNM truncated
FLD: QWHDSVNM_OFF TYPE(HALF)       /*Offset from QWHD*/
*                            SRVNAM PARAMETER OF DRDA EXCSAT COMMAND
*                            If QWHDSVNM truncated
FLD: QWHDEND  TYPE(FULL)
*
*
*

**** QWHDRQNM_D   Dsect        Use if QWHDRQNM_Off¬=0  
COMP: QWHDRQNM_D_OFFSET = 
        WHEN(QWHDRQNM_Off <> 0) ASSIGN(QWHD_OFFSET + QWHDRQNM_Off)
        ELSE                    ASSIGN(99999)
                 
FLD: QWHDRQNM_D DISP(0) LEN(1) OFFSET(QWHDRQNM_D_OFFSET) 
FLD: QWHDRQNM_LEN TYPE(HALF) DISP(0)   /*Length of the following field*/
FLD: QWHDRQNM_VAR LEN(128)         /*%U REQUESTER LOCATION NAME*/
*
*
*

**** QWHDSVNM_D   Dsect        Use if QWHDSVNM_Off¬=0                   
COMP: QWHDSVNM_D_OFFSET = 
        WHEN(QWHDSVNM_Off <> 0) ASSIGN(QWHD_OFFSET + QWHDSVNM_Off)
        ELSE                    ASSIGN(99999)
                 
FLD: QWHDSVNM_D DISP(0) LEN(1) OFFSET(QWHDSVNM_D_OFFSET) 
FLD: QWHDSVNM_LEN TYPE(HALF) DISP(0)   /*Length of the following field*/
FLD: QWHDSVNM_VAR LEN(128)
                         /*%U SRVNAM PARAMETER OF DRDA EXCSAT COMMAND*/


***********************************************************************
* DB2 DSNDQWST SUBTYPE=0 STATISTICS RECORD SECTION MAPPING FPR        *
* SYSTEM SERVICES STATISTICS.  THE RECORD IS WRITTEN TO SMF AS A SMF  *
* TYPE 100 RECORD.                                                    *
*(SEE SYSTEM PLANNING AND ADMINISTRATION GUIDE FOR ADDITIONAL DETAIL) *
***********************************************************************
*   DSECT   MACRO      *  DESCRIPTION OF SECTIONS IN RECORD           *
*                                                                     *
*  NOTE: FIELDS DEFINED AS CHARACTER MAY CONTAIN HEX DATA             *
*-------------------------------------------------------------------- *
*   SM100   DSNDQWST   *  SMF HEADER SECTION                          *
*---------------------------------------------------------------------*
*                      * IFCID 0001 FOLLOWS
*                      *
*   QWS0    DSNDQWS0   *  SELF DEFINING SECTION - NOTE: USE OFFSETS
*                      *   IN QWS0 TO GET TO THE FOLLOWING SECTIONS
*----------------------*   BECAUSE THEIR EXACT POSITION VARIES
*                      *
*                      * See DSNDQWS0 for parsing algorithm for
*                      * varying length repeating group section(s):
*                      * QLST
*                      *
*                      *FOLLOWING SECTIONS BEGIN ON A WORD BOUNDARY
*                      *  PRODUCT SECTION. THE SECTION
*                      *  NORMALLY APPEARS AT THE END OF RECORD
*   QWHS    DSNDQWHS   *   STANDARD HEADER ALWAYS APPEARS
*    QWHC    DSNDQWHC  *    CORRELATION HEADER MAY APPEAR
*    QWHT    DSNDQWHT  *    TRACE HEADER MAY APPEAR
*    QWHU    DSNDQWHU  *    CPU   HEADER MAY APPEAR
*    QWHD    DSNDQWHD  *    DISTRIBUTED HEADER MAY APPEAR
*    QWHA    DSNDQWHA  *    DATA SHARING HEADER
*   QWSA    DSNDQWSA   *   CONTROL ADDRESS SPACES STATISTICS
*   QWSB    DSNDQWSB   *   IFC DESTINATION STATISTICS
*   QWSC    DSNDQWSC   *   IFCID STATISTICAL INFORMATION
*   Q3ST    DSNDQ3ST   *   SUBSYSTEM SUPORT STATISTICS
*   Q9ST    DSNDQ9ST   *   COMMAND STATISTICS
*   QWSD    DSNDQWSD   *   IFC CHECKPOINT INFORMATION - RELEASE 2
*   QVLS    DSNDQVLS   *   LATCH   STATISTICS
*   QVAS    DSNDQVAS   *   AGENT SERVICES STATISTICS
*   QSST    DSNDQSST   *   STORAGE MANAGER STATISTICS
*   QLST    DSNDQLST   *   DDF STATISTICS - V2R2
*   QJST    DSNDQJST   *   LOG MANAGER STATISTICS
*   QDST    DSNDQDST   *   DDF SYSTEM STATISTICS
*   QWOS    DSNDQWOS   *   ZOS SYSTEM STATISTICS
************************
***********************************************************************
**** QWS0     DSECT                                                     
***********************************************************************

COMP: QWS0_OFFSET =
           WHEN(SM100RTY=100 AND QWHSIID = 1) ASSIGN(28)
           ELSE                               ASSIGN(99999)
FLD: QWS0     DISP(0) LEN(1) OFFSET(QWS0_OFFSET)
* DB2 SELF DEFINING SECTION MACRO FOR SYSTEM STATISTICS (IFCID=0001)
*
*   PRODUCT SECTION FOR SYSTEM STATISTICS CONTAINS THE
*   STANDARD HEADER MAPPED BY DSNDQWHS
FLD: QWS00PSO LEN(4) TYPE(BIN) DISP(0)
                                  /*OFFSET TO THE PRODUCT SECTION*/
FLD: QWS00PSL LEN(2) TYPE(BIN) DISP(4)
                                  /*LENGTH OF THE PRODUCT SECTION*/
FLD: QWS00PSN LEN(2) TYPE(BIN) DISP(6)   /*NUMBER OF PRODUCT SECTIONS*/
* FOR RMID 026 MAPPED BY DSNDQWSA
FLD: QWS00R1O LEN(4) TYPE(BIN) DISP(8)   /*OFFSET TO THE DATA SECTION*/
FLD: QWS00R1L LEN(2) TYPE(BIN) DISP(12)  /*LENGTH OF THE DATA SECTION*/
FLD: QWS00R1N LEN(2) TYPE(BIN) DISP(14)     /*NUMBER OF DATA SECTIONS*/
* FOR RMID 026 MAPPED BY DSNDQWSB
FLD: QWS00R2O LEN(4) TYPE(BIN) DISP(16)  /*OFFSET TO THE DATA SECTION*/
FLD: QWS00R2L LEN(2) TYPE(BIN) DISP(20)  /*LENGTH OF THE DATA SECTION*/
FLD: QWS00R2N LEN(2) TYPE(BIN) DISP(22)     /*NUMBER OF DATA SECTIONS*/
* FOR RMID 026 MAPPED BY DSNDQWSC
FLD: QWS00R3O LEN(4) TYPE(BIN) DISP(24)  /*OFFSET TO THE DATA SECTION*/
FLD: QWS00R3L LEN(2) TYPE(BIN) DISP(28)  /*LENGTH OF THE DATA SECTION*/
FLD: QWS00R3N LEN(2) TYPE(BIN) DISP(30)     /*NUMBER OF DATA SECTIONS*/
* FOR RMID     MAPPED BY DSNDQ3ST   SSSC
FLD: QWS00R4O LEN(4) TYPE(BIN) DISP(32)  /*OFFSET TO THE DATA SECTION*/
FLD: QWS00R4L LEN(2) TYPE(BIN) DISP(36)  /*LENGTH OF THE DATA SECTION*/
FLD: QWS00R4N LEN(2) TYPE(BIN) DISP(38)     /*NUMBER OF DATA SECTIONS*/
* FOR RMID     MAPPED BY DSNDQ9ST    COMMAND PROCESSING
FLD: QWS00R5O LEN(4) TYPE(BIN) DISP(40)  /*OFFSET TO THE DATA SECTION*/
FLD: QWS00R5L LEN(2) TYPE(BIN) DISP(44)  /*LENGTH OF THE DATA SECTION*/
FLD: QWS00R5N LEN(2) TYPE(BIN) DISP(46)     /*NUMBER OF DATA SECTIONS*/
* FOR RMID 26  MAPPED BY DSNDQWSD - CHECKPOINT INFO - NEW RELEASE 2
FLD: QWS00R6O LEN(4) TYPE(BIN) DISP(48)  /*OFFSET TO THE DATA SECTION*/
FLD: QWS00R6L LEN(2) TYPE(BIN) DISP(52)  /*LENGTH OF THE DATA SECTION*/
FLD: QWS00R6N LEN(2) TYPE(BIN) DISP(54)     /*NUMBER OF DATA SECTIONS*/
* FOR RMID     MAPPED BY DSNDQVLS     LATCH MANAGER
FLD: QWS00R7O LEN(4) TYPE(BIN) DISP(56)  /*OFFSET TO THE DATA SECTION*/
FLD: QWS00R7L LEN(2) TYPE(BIN) DISP(60)  /*LENGTH OF THE DATA SECTION*/
FLD: QWS00R7N LEN(2) TYPE(BIN) DISP(62)     /*NUMBER OF DATA SECTIONS*/
* FOR RMID     MAPPED BY DSNDQVAS     ASMC
FLD: QWS00R8O LEN(4) TYPE(BIN) DISP(64)  /*OFFSET TO THE DATA SECTION*/
FLD: QWS00R8L LEN(2) TYPE(BIN) DISP(68)  /*LENGTH OF THE DATA SECTION*/
FLD: QWS00R8N LEN(2) TYPE(BIN) DISP(70)     /*NUMBER OF DATA SECTIONS*/
* FOR RMID     MAPPED BY DSNDQSST      STORAGE MANAGER
FLD: QWS00R9O LEN(4) TYPE(BIN) DISP(72)  /*OFFSET TO THE DATA SECTION*/
FLD: QWS00R9L LEN(2) TYPE(BIN) DISP(76)  /*LENGTH OF THE DATA SECTION*/
FLD: QWS00R9N LEN(2) TYPE(BIN) DISP(78)     /*NUMBER OF DATA SECTIONS*/
* FOR RMID 16  MAPPED BY DSNDQWTR   TRACE - DELETED IN RELEASE 2
* DDF - CHANGE
* FOR RMID     MAPPED BY DSNDQLST     DDF - V2R2
FLD: QWS00RAO LEN(4) TYPE(BIN) DISP(80)  /*OFFSET TO THE DATA SECTION*/
FLD: QWS00RAL LEN(2) TYPE(BIN) DISP(84)  /*LENGTH OF THE DATA SECTION*/
FLD: QWS00RAN LEN(2) TYPE(BIN) DISP(86)     /*NUMBER OF DATA SECTIONS*/
* FOR RMID 004 MAPPED BY  DSNDQJST      LOG MANAGER
FLD: QWS00RBO LEN(4) TYPE(BIN) DISP(88)  /*OFFSET TO THE DATA SECTION*/
FLD: QWS00RBL LEN(2) TYPE(BIN) DISP(92)  /*LENGTH OF THE DATA SECTION*/
FLD: QWS00RBN LEN(2) TYPE(BIN) DISP(94)     /*NUMBER OF DATA SECTIONS*/
* FOR RMID     MAPPED BY DSNDQDST     DDF SYSTEM STATISTICS
FLD: QWS00RCO LEN(4) TYPE(BIN) DISP(96)  /*OFFSET TO THE DATA SECTION*/
FLD: QWS00RCL LEN(2) TYPE(BIN) DISP(100) /*LENGTH OF THE DATA SECTION*/
FLD: QWS00RCN LEN(2) TYPE(BIN) DISP(102)    /*NUMBER OF DATA SECTIONS*/
* FOR RMID     MAPPED BY DSNDQWOS     ZOS SYSTEM STATISTICS
FLD: QWS00RDO LEN(4) TYPE(BIN) DISP(104) /*OFFSET TO THE DATA SECTION*/
FLD: QWS00RDL LEN(2) TYPE(BIN) DISP(108) /*LENGTH OF THE DATA SECTION*/
FLD: QWS00RDN LEN(2) TYPE(BIN) DISP(110)    /*NUMBER OF DATA SECTIONS*/
FLD: QWS00END LEN(1) DISP(112)    /*END OF THE SELF DEFINING SECTION*/
*


***********************************************************************
* DB2 DSNDQWST SUBTYPE=1 STATISTICS RECORD SECTION MAPPING FOR        *
* DATA BASE SERVICES STATISTICS.  THE RECORD IS WRITTEN TO SMF AS     *
* A TYPE 100 RECORD.                                                  *
*(SEE SYSTEM PLANNING AND ADMINISTRATION GUIDE FOR ADDITIONAL DETAIL) *
***********************************************************************
*   DSECT   MACRO      *  DESCRIPTION OF SECTIONS IN RECORD           *
*---------------------------------------------------------------------*
*   SM100   DSNDQWST   *  SMF HEADER SECTION                          *
*
*  NOTE: FIELDS DEFINED AS CHARACTER MAY CONTAIN HEX DATA
*---------------------------------------------------------------------*
*                      * IFCID 0002 FOLLOWS
*   QWS1    DSNDQWS1   *  SELF DEFINING SECTION - NOTE: USE OFFSETS
*                      *   IN QWS1 TO GET TO THE FOLLOWING SECTIONS
*----------------------*   BECAUSE THEIR EXACT POSITION VARIES
*                      *FOLLOWING SECTIONS BEGIN ON A WORD BOUNDARY
*                      *  PRODUCT SECTION. THE SECTION
*                      *  NORMALLY APPEARS AT THE END OF RECORD
*   QWHS    DSNDQWHS   *   STANDARD HEADER ALWAYS APPEARS
*    QWHC    DSNDQWHC  *    CORRELATION HEADER MAY APPEAR
*    QWHT    DSNDQWHT  *    TRACE HEADER MAY APPEAR
*    QWHU    DSNDQWHU  *    CPU   HEADER MAY APPEAR
*    QWHD    DSNDQWHD  *    DISTRIBUTED HEADER MAY APPEAR
*    QWHA    DSNDQWHA  *    DATA SHARING HEADER
*   QXST    DSNDQXST   *   SQL  STATISTICS
*   QTST    DSNDQTST   *   SERVICE CONTROLLER STATISTICS
*   QBST    DSNDQBST   *   BUFFER MANAGER STATISTICS
*   QIST    DSNDQIST   *   DATA MANAGER STATISTICS - V2R2
*   QTXA    DSNDQTXA   *   LOCKING STATISTICS
*   QISE    DSNDQISE   *   EDM POOL STATISTICS - RELEASE 2
*   QBGL    DSNDQBGL   *   Buffer Manager Data Sharing Stats - V4R1
*   QTGS    DSNDQTGS   *   Service Controller Data Sharing Stats - V4R1
*   QLES    DSNDQLES   *   LE STATISTICS
*   QISJ    DSNDQISJ   *   STARJOIN POOL STATISTICS (S)
************************
***********************************************************************
**** QWS1     DSECT                                                     
***********************************************************************

COMP: QWS1_OFFSET =
           WHEN(SM100RTY=100 AND QWHSIID = 2) ASSIGN(28)
           ELSE                               ASSIGN(99999)
FLD: QWS1     DISP(0) LEN(1) OFFSET(QWS1_OFFSET)
* DB2 SELF DEFINING SECTION MACRO FOR DATA BASE STATISTICS IFCID=0002
*
* PRODUCT SECTION FOR DATA BASE STATISTICS CONTAINS THE
* STANDARD HEADER MAPPED BY DSNDQWHS
FLD: QWS10PSO LEN(4) TYPE(BIN) DISP(0)
                                  /*OFFSET TO THE PRODUCT SECTION*/
FLD: QWS10PSL LEN(2) TYPE(BIN) DISP(4)
                                  /*LENGTH OF THE PRODUCT SECTION*/
FLD: QWS10PSN LEN(2) TYPE(BIN) DISP(6)   /*NUMBER OF PRODUCT SECTIONS*/
* FOR RMID 22    MAPPED BY DSNDQXST       SQL
FLD: QWS10R1O LEN(4) TYPE(BIN) DISP(8)   /*OFFSET TO THE DATA SECTION*/
FLD: QWS10R1L LEN(2) TYPE(BIN) DISP(12)  /*LENGTH OF THE DATA SECTION*/
FLD: QWS10R1N LEN(2) TYPE(BIN) DISP(14)     /*NUMBER OF DATA SECTIONS*/
* FOR RMID 20    MAPPED BY DSNDQTST  SERVICE CONTROLLER
FLD: QWS10R2O LEN(4) TYPE(BIN) DISP(16)  /*OFFSET TO THE DATA SECTION*/
FLD: QWS10R2L LEN(2) TYPE(BIN) DISP(20)  /*LENGTH OF THE DATA SECTION*/
FLD: QWS10R2N LEN(2) TYPE(BIN) DISP(22)     /*NUMBER OF DATA SECTIONS*/
* FOR RMID 10    MAPPED BY DSNDQBST     BUFFER MANAGER
FLD: QWS10R3O LEN(4) TYPE(BIN) DISP(24)  /*OFFSET TO THE DATA SECTION*/
FLD: QWS10R3L LEN(2) TYPE(BIN) DISP(28)  /*LENGTH OF THE DATA SECTION*/
FLD: QWS10R3N LEN(2) TYPE(BIN) DISP(30)     /*NUMBER OF DATA SECTIONS*/
* FOR RMID 14    MAPPED BY DSNDQIST    DATA MANAGER
FLD: QWS10R4O LEN(4) TYPE(BIN) DISP(32)  /*OFFSET TO THE DATA SECTION*/
FLD: QWS10R4L LEN(2) TYPE(BIN) DISP(36)  /*LENGTH OF THE DATA SECTION*/
FLD: QWS10R4N LEN(2) TYPE(BIN) DISP(38)     /*NUMBER OF DATA SECTIONS*/
* FOR RMID 20    MAPPED BY DSNDQTXA   **  LOCK MANAGER
FLD: QWS10R5O LEN(4) TYPE(BIN) DISP(40)  /*OFFSET TO THE DATA SECTION*/
FLD: QWS10R5L LEN(2) TYPE(BIN) DISP(44)  /*LENGTH OF THE DATA SECTION*/
FLD: QWS10R5N LEN(2) TYPE(BIN) DISP(46)     /*NUMBER OF DATA SECTIONS*/
* FOR RMID 14    MAPPED BY DSNDQISE   EDM POOL STATISTICS
FLD: QWS10R6O LEN(4) TYPE(BIN) DISP(48)  /*OFFSET TO THE DATA SECTION*/
FLD: QWS10R6L LEN(2) TYPE(BIN) DISP(52)  /*LENGTH OF THE DATA SECTION*/
FLD: QWS10R6N LEN(2) TYPE(BIN) DISP(54)     /*NUMBER OF DATA SECTIONS*/
* FOR RMID 10    MAPPED BY DSNDQBGL   GROUP BUFFER POOL STATISTICS
FLD: QWS10R7O LEN(4) TYPE(BIN) DISP(56)  /*OFFSET TO THE DATA SECTION*/
FLD: QWS10R7L LEN(2) TYPE(BIN) DISP(60)  /*LENGTH OF THE DATA SECTION*/
FLD: QWS10R7N LEN(2) TYPE(BIN) DISP(62)     /*NUMBER OF DATA SECTIONS*/
* FOR RMID 20    MAPPED BY DSNDQTGS   GLOBAL LOCKING STATISTICS
FLD: QWS10R8O LEN(4) TYPE(BIN) DISP(64)  /*OFFSET TO THE DATA SECTION*/
FLD: QWS10R8L LEN(2) TYPE(BIN) DISP(68)  /*LENGTH OF THE DATA SECTION*/
FLD: QWS10R8N LEN(2) TYPE(BIN) DISP(70)     /*NUMBER OF DATA SECTIONS*/
* FOR RMID 22    MAPPED BY DSNDQLES LE ACCESS FROM ADMF STATISTICS
FLD: QWS10R9O LEN(4) TYPE(BIN) DISP(72)  /*OFFSET TO THE DATA SECTION*/
FLD: QWS10R9L LEN(2) TYPE(BIN) DISP(76)  /*LENGTH OF THE DATA SECTION*/
FLD: QWS10R9N LEN(2) TYPE(BIN) DISP(78)     /*NUMBER OF DATA SECTIONS*/
* FOR RMID 22    MAPPED BY DSNDQISJ STARJOIN POOL STATISTICS
FLD: QWS10RAO LEN(4) TYPE(BIN) DISP(80)  /*OFFSET TO THE DATA SECTION*/
FLD: QWS10RAL LEN(2) TYPE(BIN) DISP(84)  /*LENGTH OF THE DATA SECTION*/
FLD: QWS10RAN LEN(2) TYPE(BIN) DISP(86)     /*NUMBER OF DATA SECTIONS*/
FLD: QWS10END LEN(1) DISP(88)     /*END OF THE SELF DEFINING SECTION*/
*


*******************************************************************
*   QWSA    DSNDQWSA   *   CONTROL ADDRESS SPACES STATISTICS
*******************************************************************
***********************************************************************
**** QWSA     DSECT                                                     
***********************************************************************

***********************************************************************
* TO REPORT ON ALL OCCURRENCES OF QWSA, USE:
*    INPUT: SMF100
*           NORMALIZE(QWSA, QWS00R1N)
***********************************************************************
COMP: QWSA_OFFSET =
           WHEN(SM100RTY=100 AND QWS00R1N > 0) ASSIGN(QWS00R1O)
           ELSE                                ASSIGN(99999)
FLD: QWSA     DISP(0) LEN(44) OFFSET(QWSA_OFFSET)
* INSTRUMENTATION STATISTICS DATA OF CPU TIMER VALUES FOR EACH
* RESOURCE MANAGER & CONTROL ADDRESS SPACE.
*
*  NOTE: FIELDS DEFINED AS CHARACTER MAY CONTAIN HEX DATA
*
FLD: QWSAPROC LEN(4) DISP(0)
                 /*LAST FOUR CHARACTERS OF THE PROCEDURE NAME USED TO*/
*                    START THE ADDRESS SPACE - OR A CONSTANT IDENTIFIER
FLD: QWSAEJST TYPE(STCKTIME) DISP(4)
                             /*JOB STEP TIMER VALUE FOR ADDRESS SPACE*/
FLD: QWSASRBT TYPE(STCKTIME) DISP(12)
                                  /*SRB TIMER VALUE FOR ADDRESS SPACE*/
*                    NOT INCLUDING CPU CONSUMED ON AN IBM ZIIP
FLD: QWSAASID TYPE(HALF) DISP(20) /*ASID OF THE ADDRESS SPACE*/
FLD: QWSAASCB LEN(4) TYPE(BIN) DISP(24)                  /*ASCB TOKEN*/
FLD: QWSAPSRB TYPE(STCKTIME) DISP(28)
                      /*PREEMPTABLE SRB TIMER VALUE FOR ADDRESS SPACE*/
*                    NOT INCLUDING CPU CONSUMED ON AN IBM ZIIP
FLD: QWSAPSRB_ZIIP TYPE(STCKTIME) DISP(36)
                         /*PREEMPTABLE SRB TIMER VALUE CONSUMED ON AN*/
*                    IBM zIIP FOR ADDRESS SPACE
FLD: QWSAEND  LEN(1) DISP(44)

*******************************************************************
*   QWSB    DSNDQWSB   *   IFC DESTINATION STATISTICS
*******************************************************************
***********************************************************************
**** QWSB     DSECT                                                     
***********************************************************************

***********************************************************************
* TO REPORT ON ALL OCCURRENCES OF QWSB, USE:
*    INPUT: SMF100
*           NORMALIZE(QWSB, QWS00R2N)
***********************************************************************
COMP: QWSB_OFFSET =
           WHEN(SM100RTY=100 AND QWS00R2N > 0) ASSIGN(QWS00R2O)
           ELSE                                ASSIGN(99999)
FLD: QWSB     DISP(0) LEN(28) OFFSET(QWSB_OFFSET)
*     /*INSTRUMENTATION STATISTICS DATA ON DESTINATION.
*                                              */
FLD: QWSBNM   LEN(4) DISP(0)
                       /*NAME OF THE EXTERNAL OR INTERNAL DESTINATION*/
*                     FOLLOWING ARE EXAMPLES OF DESTINATION VALUES:
*                     GTF, SMF
*                     RES = RESIDENT TRACE TABLE
*                     SRV = SERVICEABILITY
*                     SR1 = INTERNAL SPECIAL ACCOUNTING DESTINATION
*                            USED TO CALCULATE OPTIONAL DELTA TIMINGS*/
*                     SR2 = INTERNAL SPECIAL DESTINATION  FOR IFI READS
*                            USED TO RETURN DATA TO THE APPLICATION  */
***                     OPN = SPECIAL DESTINATION  FOR IFI READA BUFFERE
*                           RECORDS                                  */
* /* STATISTICS UPDATED WITH COMPARE & SWAP (+=YES,-=NO) */
FLD: QWSBSTAT LEN(4) TYPE(BIN) DISP(4)           /*STATISTIC COUNTERS*/
FLD: QWSBWSEQ LEN(4) TYPE(BIN) DISP(4)      /*+UNIQUE SEQUENCE NUMBER*/
FLD: QWSBSRSW LEN(4) TYPE(BIN) DISP(8)             /*+RECORDS WRITTEN*/
FLD: QWSBSRNW LEN(4) TYPE(BIN) DISP(12)        /*+RECORDS NOT WRITTEN*/
*
*                          THE FOLLOWING REASONS FOR FAILURE
*                         ARE GENERIC CATEGORIES. ERRORS CAN OCCUR
*                         BECAUSE THE EXTERNAL WRITER HAS A PROBLEM
*                         (SMF AND GTF).
*                         RECORDS CAN ALSO FAIL TO BE PROCESSED BY
*                         INTERNAL WRITERS (SR1, SR2, SRV, OPN, RES).
*
*                         ONLY EXTERNAL WRITER ERROR CATEGORIES
*                         ARE COMMENTED BELOW.
*
*                         INTERNAL WRITER ERRORS
*                         NORMALLY ARE CAUSED BECAUSE ASYNCHONOUS
*                         TRACE EVENTS OCCUR AND THE WRITER CANNOT
*                         PROCESS THE REQUEST. INTERNAL WRITER ERRORS
*                         ARE NOT A PROBLEM TO (SRV, SR1, RES,AND SR2)
*                         INTERNAL ERRORS TO OPN USUALLY INDICATE
*                         AN APPLICATION PROGRAM IS NOT PROCESSING
*                         RECORDS BEFORE THE BUFFER FILLS OR A OPX
*                         DESTINATION TRACE IS ACTIVE AND AN
*                         APPLICATION PROGRAM DOES NOT EXIST TO PROCES
*                         PROCESS THE RECORDS.
FLD: QWSBSBUF TYPE(HALF) DISP(16) /*BUFFER ERRORS*/
FLD: QWSBSACT TYPE(HALF) DISP(18) /*NOT ACTIVE ERRORS*/
FLD: QWSBSRNA TYPE(HALF) DISP(20) /*RECORD NOT ACCEPTED*/
FLD: QWSBSWF  TYPE(HALF) DISP(22) /*WRITER FAILURES*/
FLD: QWSBOTH  LEN(4) TYPE(BIN) DISP(24)                         /*(S)*/
FLD: QWSBOTH1 LEN(1) DISP(24)     /*(S)*/
FLD: QWSBOTH2 LEN(1) DISP(25)     /*(S)*/
FLD: QWSBOTH3 LEN(1) DISP(26)     /*(S)*/
FLD: QWSBOTH4 LEN(1) DISP(27)     /*(S)*/
FLD: QWSBEND  LEN(1) DISP(28)
*
*
*******************************************************************
*   QWSC    DSNDQWSC   *   IFCID STATISTICAL INFORMATION
*******************************************************************
***********************************************************************
**** QWSC     DSECT                                                     
***********************************************************************

***********************************************************************
* TO REPORT ON ALL OCCURRENCES OF QWSC, USE:
*    INPUT: SMF100
*           NORMALIZE(QWSC, QWS00R3N)
***********************************************************************
COMP: QWSC_OFFSET =
           WHEN(SM100RTY=100 AND QWS00R3N > 0) ASSIGN(QWS00R3O)
           ELSE                                ASSIGN(99999)
FLD: QWSC     DISP(0) LEN(24) OFFSET(QWSC_OFFSET)
*
*................................................................
*     IFCIDS RECORDED TO STATISTICS AS OF  08/31/91
*     IFCIDS EQU MAPPED BY DSNDQWHS
*
*        0001      SYSTEM RELATED STATISTICS
*        0002      DATA BASE RELATED STATISTICS
*        0003      ACCOUNTING
*        0004      START TRACE RECORDS
*        0005      STOP TRACE RECORDS
*        0106      DSNZPARM RECORDS
*        0140-0146 AUDIT RECORDS
*        0202      DYNAMIC DSNZPARM RECORDS
*................................................................
*          STATISTICS UPDATED USING COMPARE & SWAP (+=YES, -=NO)
FLD: QWSCIID  TYPE(HALF) DISP(0)  /*IFCID*/
FLD: QWSCSTAT LEN(4) TYPE(BIN) DISP(4)                   /*STATISTICS*/
FLD: QWSCISEQ LEN(4) TYPE(BIN) DISP(4)       /*+IFCID SEQUENCE NUMBER*/
*
*        THE FOLLWING COUNTS ARE UPDATED BY THE TRACE
*         WRITER. IF A IFCID IS ACTIVE TO MULTIPLE TRACES
*         DESTINATIONS, THEN THE RECORD COUNTS BELOW
*         MAY BE GREATER THAN THE IFCID SEQUENCE NUMBER (QWSCISEQ)
*
FLD: QWSCSRSW LEN(4) TYPE(BIN) DISP(8)             /*+RECORDS WRITTEN*/
FLD: QWSCSRNW LEN(4) TYPE(BIN) DISP(12)        /*+RECORDS NOT WRITTEN*/
FLD: QWSCSRND TYPE(HALF) DISP(16) /*RECORD NOT DESIRED*/
*          INSTALATION TURNED OFF, SEVERE ERROR
FLD: QWSCSBNA TYPE(HALF) DISP(18) /*BUFFER NOT AVAILABLE*/
FLD: QWSCSCF  TYPE(HALF) DISP(20) /*COLLECTION FAILURE*/
*          ABEND DURING COLLECTION, ERROR RETURN INFORMATION
FLD: QWSCOTH1 LEN(1) DISP(22)     /*(S)*/
FLD: QWSCOTH2 LEN(1) DISP(23)     /*(S)*/
FLD: QWSCEND  LEN(1) DISP(24)

*/********************************************************************/
*/*                                                                  */
*/*      SSSC (SSSS AND SSAM) STATISTICS BLOCK (Q3ST) - 13MAY81      */
*/*                                                                  */
*/********************************************************************/
*/*                                                                  */
*/*  - FUNCTION:                                                     */
*/*      THE Q3ST IS A BLOCK USED FOR ACCUMULATING STATISTICS FOR    */
*/*      SSSS AND SSAM RESOURCE MANAGERS                             */
*/*                                                                  */
*/*  - CREATED BY:         DSN3SSIN                                  */
*/*  - DELETED BY:         DSN3SSTM - WHEN THE POOL (SSGSCPHB) IS    */
*/*                            FREED AT SUBSYSTEM TERMINATION.       */
*/*  - STORAGE TYPE:       CLASS 2 (POOL WHOSE PHB IS POINTED        */
*/*                            TO BY SSGSCPHB).                      */
*/*  - POINTED TO BY:      SSGSQ3ST                                  */
*/*                        AMGSQ3ST                                  */
*/*  - NUMBER:             1                                         */
*/*  - DURATION:           UNTIL SSSS TERMINATION                    */
*/*  - METHOD OF ACCESS:   PL/S - %INCLUDE (COMPLETE BLOCK IS ALWAYS */
*/*                               GENERATED)                         */
*/*                        BAL - DSNDQ3ST MACRO ('HEADER' AREA NEVER */
*/*                              GENERATED - ONLY THE STATISTICS     */
*/*                              DATA PORTION IS GENERATED)          */
*/*                                                                  */
*/********************************************************************/
*/*

*******************************************************************
*   Q3ST    DSNDQ3ST   *   SUBSYSTEM SUPORT STATISTICS
*******************************************************************
***********************************************************************
**** Q3ST     DSECT                                                     
***********************************************************************

COMP: Q3ST_OFFSET =
           WHEN(SM100RTY=100 AND QWS00R4N > 0) ASSIGN(QWS00R4O)
           ELSE                                ASSIGN(99999)
FLD: Q3ST     DISP(0) LEN(1) OFFSET(Q3ST_OFFSET)
FLD: Q3STDATA LEN(4) TYPE(BIN) DISP(0)         /*DATA PORTION OF Q3ST*/
FLD: Q3STIDEN LEN(4) TYPE(BIN) DISP(0) /*SUCCESSFUL DSN3IDEN REQUESTS*/
FLD: Q3STSIGN LEN(4) TYPE(BIN) DISP(4) /*SUCCESSFUL DSN3SIGN REQUESTS*/
FLD: Q3STCTHD LEN(4) TYPE(BIN) DISP(8) /*SUCCESSFUL DSN3CTHD REQUESTS*/
FLD: Q3STTERM LEN(4) TYPE(BIN) DISP(12)
                                  /*SUCCESSFUL DSN3TERM REQUESTS*/
FLD: Q3STRIUR LEN(4) TYPE(BIN) DISP(16)
                                  /*SUCCESSFUL DSN3RIUR REQUESTS*/
FLD: Q3STPREP LEN(4) TYPE(BIN) DISP(20)
                                  /*SUCCESSFUL DSN3PREP REQUESTS*/
FLD: Q3STCOMM LEN(4) TYPE(BIN) DISP(24)
                                  /*SUCCESSFUL DSN3COMM REQUESTS*/
FLD: Q3STABRT LEN(4) TYPE(BIN) DISP(28)
                                  /*SUCCESSFUL DSN3ABRT REQUESTS*/
FLD: Q3STSYNC LEN(4) TYPE(BIN) DISP(32)
                                  /*SUCCESSFUL DSN3SYNC REQUESTS*/
FLD: Q3STEXIT LEN(4) TYPE(BIN) DISP(36)
                                  /*SUCCESSFUL DSN3EXIT REQUESTS*/
FLD: Q3STINDT LEN(4) TYPE(BIN) DISP(40)
                                  /*TOTAL NUMBER OF AGENTS HAVING*/
*                             GONE IN-DOUBT
FLD: Q3STMEOT LEN(4) TYPE(BIN) DISP(44)                  /*SSAM EOT'S*/
FLD: Q3STMEOM LEN(4) TYPE(BIN) DISP(48)                  /*SSAM EOM'S*/
FLD: Q3STSSSI LEN(4) TYPE(BIN) DISP(52)   /*TOTAL NUMBER OF SSI CALLS*/
*                             PROCESSED (SSSS)
FLD: Q3STCTHW LEN(4) TYPE(BIN) DISP(56)
                                  /*NUMBER OF DSN3CTHD WHICH WAITED*/
FLD: Q3STRDON LEN(4) TYPE(BIN) DISP(60) /*NUMBER OF READ ONLY COMMITS*/
FLD: Q3STHWIB LEN(4) TYPE(BIN) DISP(64)
                                 /*High water mark for IDBACK threads*/
FLD: Q3STHWIF LEN(4) TYPE(BIN) DISP(68)
                                 /*High water mark for IDFORE threads*/
FLD: Q3STHWCT LEN(4) TYPE(BIN) DISP(72)
                                /*High water mark for CTHREAD threads*/
FLD: Q3STDATL LEN(1)              /*Q3STDATA LENGTH OF DATA PORTION*/

*/* ---------------------------------------------------------------- */
*/*                                                                  */
*/*    Licensed Materials - Property of IBM                          */
*/*    5635-DB2                                                      */
*/*    (C) COPYRIGHT 1982, 2006 IBM Corp.  All Rights Reserved.      */
*/*                                                                  */
*/*    STATUS = Version 9                                            */
*/*                                                                  */
*/* DESCRIPTIVE NAME - GCPC SMF DATA MAPPING.                        */
*/*                                                                  */
*/* FUNCTION-                                                        */
*/*   THIS MACRO MAPS THE COMMAND STATISTICAL COUNTERS WHICH ARE     */
*/*   PASSED TO IFC FOR THE RMFTSTAT (STATISTICAL) BROADCAST.        */
*/*                                                                  */
*/*                                                                  */
*******************************************************************
*   Q9ST    DSNDQ9ST   *   COMMAND STATISTICS
*******************************************************************
***********************************************************************
**** DSNDQ9ST DSECT                                                     
***********************************************************************

COMP: Q9ST_OFFSET =
           WHEN(SM100RTY=100 AND QWS00R5N > 0) ASSIGN(QWS00R5O)
           ELSE                                ASSIGN(99999)
FLD: DSNDQ9ST DISP(0) LEN(1) OFFSET(Q9ST_OFFSET)
FLD: Q9ST     LEN(256) DISP(0)    /*GCPC STATISTICAL COUNTER BLOCK*/
FLD: Q9STCTR0 LEN(4) TYPE(BIN) DISP(0)
                                  /*COUNTER, CMD DISPLAY DATABASE*/
FLD: Q9STCTR1 LEN(4) TYPE(BIN) DISP(4)  /*COUNTER, CMD DISPLAY THREAD*/
FLD: Q9STCTR2 LEN(4) TYPE(BIN) DISP(8) /*COUNTER, CMD DISPLAY UTILITY*/
FLD: Q9STCTR3 LEN(4) TYPE(BIN) DISP(12)   /*COUNTER, CMD RECOVER BSDS*/
FLD: Q9STCTR4 LEN(4) TYPE(BIN) DISP(16)
                                  /*COUNTER, CMD RECOVER INDOUBT*/
FLD: Q9STCTR5 LEN(4) TYPE(BIN) DISP(20) /*COUNTER, CMD START DATABASE*/
FLD: Q9STCTR6 LEN(4) TYPE(BIN) DISP(24)    /*COUNTER, CMD START TRACE*/
FLD: Q9STCTR7 LEN(4) TYPE(BIN) DISP(28)
                                  /*COUNTER, CMD START SUBSYSTEM*/
FLD: Q9STCTR8 LEN(4) TYPE(BIN) DISP(32)  /*COUNTER, CMD STOP DATABASE*/
FLD: Q9STCTR9 LEN(4) TYPE(BIN) DISP(36)     /*COUNTER, CMD STOP TRACE*/
FLD: Q9STCTRA LEN(4) TYPE(BIN) DISP(40) /*COUNTER, CMD STOP SUBSYSTEM*/
FLD: Q9STCTRB LEN(4) TYPE(BIN) DISP(44)   /*COUNTER, CMD TERM UTILITY*/
FLD: Q9STCTRC LEN(4) TYPE(BIN) DISP(48)      /*COUNTER, CMD DIS TRACE*/
FLD: Q9STCTRD LEN(4) TYPE(BIN) DISP(52)
                                  /*COUNTER, CMD RESET GENERICLU*/
FLD: Q9STEROR LEN(4) TYPE(BIN) DISP(56)
                                  /*COUNTER, UNRECOGNIZED COMMAND*/
FLD: Q9STCTRE LEN(4) TYPE(BIN) DISP(60)   /*COUNTER, CMD START RLIMIT*/
FLD: Q9STCTRF LEN(4) TYPE(BIN) DISP(64)    /*COUNTER, CMD STOP RLIMIT*/
FLD: Q9STCTRG LEN(4) TYPE(BIN) DISP(68) /*COUNTER, CMD DISPLAY RLIMIT*/
FLD: Q9STCTRH LEN(4) TYPE(BIN) DISP(72)   /*COUNTER, CMD MODIFY TRACE*/
FLD: Q9STCTRI LEN(4) TYPE(BIN) DISP(76)      /*COUNTER, CMD START DDF*/
FLD: Q9STCTRJ LEN(4) TYPE(BIN) DISP(80)       /*COUNTER, CMD STOP DDF*/
FLD: Q9STCTRK LEN(4) TYPE(BIN) DISP(84)
                                  /*COUNTER, CMD CANCEL(DDF)THREAD*/
FLD: Q9STCTRL LEN(4) TYPE(BIN) DISP(88)
                                  /*COUNTER, CMD DISPLAY LOCATION*/
FLD: Q9STCTRM LEN(4) TYPE(BIN) DISP(92)    /*COUNTER, CMD ARCHIVE LOG*/
FLD: Q9STCTRN LEN(4) TYPE(BIN) DISP(96)
                                  /*COUNTER, CMD ALTER BUFFERPOOL*/
FLD: Q9STCTRO LEN(4) TYPE(BIN) DISP(100)
                                  /*COUNTER, CMD DISPLAY BUFFERPOOL*/
FLD: Q9STCTRP LEN(4) TYPE(BIN) DISP(104)   /*COUNTER, CMD SET ARCHIVE*/
FLD: Q9STCTRQ LEN(4) TYPE(BIN) DISP(108)
                                  /*COUNTER, CMD DISPLAY ARCHIVE*/
FLD: Q9STCTRR LEN(4) TYPE(BIN) DISP(112) /*COUNTER, CMD RESET INDOUBT*/
FLD: Q9STCTRS LEN(4) TYPE(BIN) DISP(116)  /*COUNTER, CMD ALTER GBPOOL*/
FLD: Q9STCTRT LEN(4) TYPE(BIN) DISP(120)
                                  /*COUNTER, CMD DISPLAY GBPOOL*/
FLD: Q9STCTRU LEN(4) TYPE(BIN) DISP(124)
                                  /*COUNTER, CMD DISPLAY PROCEDURE*/
FLD: Q9STCTRV LEN(4) TYPE(BIN) DISP(128)
                                  /*COUNTER, CMD START PROCEDURE*/
FLD: Q9STCTRW LEN(4) TYPE(BIN) DISP(132)
                                  /*COUNTER, CMD STOP PROCEDURE*/
FLD: Q9STCTRX LEN(4) TYPE(BIN) DISP(136)     /*COUNTER, CMD DIS GROUP*/
FLD: Q9STCTRY LEN(4) TYPE(BIN) DISP(140) /*COUNTER, CMD ALTER UTILITY*/
FLD: Q9STCTRZ LEN(4) TYPE(BIN) DISP(144)
                                  /*COUNTER, CMD DISPLAY FUNCTION*/
FLD: Q9STCTX0 LEN(4) TYPE(BIN) DISP(148)
                                  /*COUNTER, CMD START FUNCTION*/
FLD: Q9STCTX1 LEN(4) TYPE(BIN) DISP(152) /*COUNTER, CMD STOP FUNCTION*/
FLD: Q9STCTX2 LEN(4) TYPE(BIN) DISP(156)       /*COUNTER, CMD SET LOG*/
FLD: Q9STCTX3 LEN(4) TYPE(BIN) DISP(160)   /*COUNTER, CMD DISPLAY LOG*/
FLD: Q9STCTX4 LEN(4) TYPE(BIN) DISP(164)   /*COUNTER, CMD SET SYSPARM*/
FLD: Q9STCTX5 LEN(4) TYPE(BIN) DISP(168)   /*COUNTER, CMD DISPLAY DDF*/
FLD: Q9STCTAD LEN(4) TYPE(BIN) DISP(172)
                                  /*COUNTER, CMD ACCESS DATABASE*/
FLD: Q9STCTSS LEN(4) TYPE(BIN) DISP(176) /*COUNTER, CMD START PROFILE*/
FLD: Q9STCTST LEN(4) TYPE(BIN) DISP(180)  /*COUNTER, CMD STOP PROFILE*/
FLD: Q9STCTSD LEN(4) TYPE(BIN) DISP(184)
                                  /*COUNTER, CMD DISPLAY PROFILE*/

*******************************************************************
*   QWSD    DSNDQWSD   *   IFC CHECKPOINT INFORMATION - RELEASE 2
*******************************************************************
***********************************************************************
**** QWSD     DSECT                                                     
***********************************************************************

COMP: QWSD_OFFSET =
           WHEN(SM100RTY=100 AND QWS00R6N > 0) ASSIGN(QWS00R6O)
           ELSE                                ASSIGN(99999)
FLD: QWSD     DISP(0) LEN(1) OFFSET(QWSD_OFFSET)
*       MISCELLANEOUS IFC PROVIDED STATISTICS
*
FLD: QWSDCKPT LEN(4) TYPE(BIN) DISP(0)         /*DB2 CHECKPOINT COUNT*/
*
FLD: QWSDRINV LEN(4) TYPE(BIN) DISP(4)
                                  /*REASON WHY STATISTICS WAS INVOKED*/
*                                   04 = DB2 START UP
*                                   08 = DB2 SHUT DOWN
*                                   0C = BY COMMAND
*                                   10 = ACTIVATED BY TIMER
*                                   14 = ACTIVATED AT CHECKPOINT
*                                   18 = ACTIVATED DURING ACCOUNTING
*                                   1C = READS REQUEST
*                                   20 = RESERVED                   */
*
FLD: QWSDLR   LEN(8) DISP(8)      /*HIGH USED RBA ADDRESS OF LOG*/
*
*   THE IFI COUNTERS ARE NOT UPDATED USING COMPARE AND SWAP
*
FLD: QWSDSCA  LEN(4) TYPE(BIN) DISP(16)         /*COUNT OF IFI ABENDS*/
FLD: QWSDSCU  LEN(4) TYPE(BIN) DISP(20)
                                /*COUNT OF IFI UNRECOGNIZED FUNCTIONS*/
FLD: QWSDSCCO LEN(4) TYPE(BIN) DISP(24)
                                  /*COUNT OF IFI COMMAND REQUESTS*/
FLD: QWSDSCRA LEN(4) TYPE(BIN) DISP(28) /*COUNT OF IFI READA REQUESTS*/
FLD: QWSDSCRS LEN(4) TYPE(BIN) DISP(32) /*COUNT OF IFI READS REQUESTS*/
FLD: QWSDSCWR LEN(4) TYPE(BIN) DISP(36) /*COUNT OF IFI WRITE REQUESTS*/
FLD: QWSDCDCS LEN(4) TYPE(BIN) DISP(40) /*IFI DATA CAPTURE STATISTICS*/
FLD: QWSDCDLC LEN(4) TYPE(BIN) DISP(40)
                                 /*NUMBER OF LOG RECORDS CAPTURED FOR*/
*                           /* WHICH DATA CAPTURE PROCESSING WAS     */
*                           /* INVOKED.                              */
FLD: QWSDCDLR LEN(4) TYPE(BIN) DISP(44)
                                  /*NUMBER OF DATA CAPTURE LOG READS*/
*                           /* PERFORMED.                            */
FLD: QWSDCDRR LEN(4) TYPE(BIN) DISP(48)
                                 /*NUMBER OF DATA CAPTURE LOG RECORDS*/
*                           /* RETURNED.                             */
FLD: QWSDCDDR LEN(4) TYPE(BIN) DISP(52)
                                  /*NUMBER OF DATA CAPTURE DATA ROWS*/
*                           /* RETURNED.                             */
*                           /* DATA CAPTURE DATA ROWS ARE RETURNED   */
*                           /* IN IFCID 185 AND MAPPED BY QW0185DR.  */
FLD: QWSDCDDD LEN(4) TYPE(BIN) DISP(56) /*NUMBER OF DATA CAPTURE DATA*/
*                           /* DESCRIPTIONS RETURNED. DATA CAPTURE   */
*                           /* DATA DESCRIPTIONS ARE MAPPED IN IFCID */
*                           /* 185 BEGINNING WITH FIELD QW0185DD.    */
FLD: QWSDCDMB LEN(4) TYPE(BIN) DISP(60)
                                  /*NUMBER OF DATA CAPTURE DESCRIBES*/
*                           /* PERFORMED.                            */
FLD: QWSDCDTB LEN(4) TYPE(BIN) DISP(64)
                                  /*NUMBER OF DATA CAPTURE TABLES FOR*/
*                           /* WHICH DATA CAPTURE DATA DESCRIPTIONS  */
*                           /* WERE RETURNED.                        */
FLD: QWSDARTH LEN(4) TYPE(BIN) DISP(68)
                                /*Number of rollup accounting records*/
*                           /* written due to rollup threshold       */
*                           /* exceeded                              */
FLD: QWSDARSG LEN(4) TYPE(BIN) DISP(72)
                                /*Number of rollup accounting records*/
*                           /* written due to rollup accounting      */
*                           /* storage threshold exceeded            */
FLD: QWSDARST LEN(4) TYPE(BIN) DISP(76)
                                /*Number of rollup accounting records*/
*                           /* written due to staleness threshold    */
*                           /* exceeded                              */
FLD: QWSDARIR LEN(4) TYPE(BIN) DISP(80)
                               /*Number of records failing to qualify*/
*                           /* for accounting rollup due to all      */
*                           /* rollup key fields = NULL or NULL      */
*                           /* values not being permitted            */
FLD: QWSDEND  LEN(1) DISP(84)


*******************************************************************
*   QVLS    DSNDQVLS   *   LATCH   STATISTICS
*******************************************************************
***********************************************************************
**** QVLS     DSECT                                                     
***********************************************************************

COMP: QVLS_OFFSET =
           WHEN(SM100RTY=100 AND QWS00R7N > 0) ASSIGN(QWS00R7O)
           ELSE                                ASSIGN(99999)
FLD: QVLS     DISP(0) LEN(1) OFFSET(QVLS_OFFSET)
*! The QVLS counts represent the number of suspends performed
*! by agents attempting to obtain a latch.  There is NOT a
*! 1 to 1 relationship between the QVLS counters and
*! IFCID56/57 since an agent may suspend multiple times or
*! not at all while trying to obtain a latch.  Thus, the
*! QVLS counters are not directly related to accounting
*! class 3.
*!
*! IMPORTANT NOTE: All field descriptions denote the
*! predominate latch usage. The description does NOT
*! cover all usage of a given latch class.
FLD: QVLSLC01 LEN(4) TYPE(BIN) DISP(0)            /*Infrequently used*/
FLD: QVLSLC02 LEN(4) TYPE(BIN) DISP(4)   /*Global authorization cache*/
FLD: QVLSLC03 LEN(4) TYPE(BIN) DISP(8)               /*DDF disconnect*/
FLD: QVLSLC04 LEN(4) TYPE(BIN) DISP(12)             /*SYSSTRING cache*/
FLD: QVLSLC05 LEN(4) TYPE(BIN) DISP(16)     /*IRLM data sharing exits*/
*                           /* or RLF                      */
FLD: QVLSLC06 LEN(4) TYPE(BIN) DISP(20)    /*Data sharing index split*/
FLD: QVLSLC07 LEN(4) TYPE(BIN) DISP(24)         /*Index lotch and OBD*/
*                           /* allocation                  */
FLD: QVLSLC08 LEN(4) TYPE(BIN) DISP(28)           /*Query parallelism*/
FLD: QVLSLC09 LEN(4) TYPE(BIN) DISP(32)         /*Utilities or stored*/
*                           /* procedure URIDs             */
FLD: QVLSLC10 LEN(4) TYPE(BIN) DISP(36)       /*Allied agent chain or*/
*                           /* sequence descriptors        */
FLD: QVLSLC11 LEN(4) TYPE(BIN) DISP(40)             /*DGTT allocation*/
FLD: QVLSLC12 LEN(4) TYPE(BIN) DISP(44) /*Global transaction ID table*/
FLD: QVLSLC13 LEN(4) TYPE(BIN) DISP(48)          /*Pageset operations*/
FLD: QVLSLC14 LEN(4) TYPE(BIN) DISP(52)              /*Bufferpool LRU*/
FLD: QVLSLC15 LEN(4) TYPE(BIN) DISP(56)   /*ARCHIVE LOG MODE(QUIESCE)*/
FLD: QVLSLC16 LEN(4) TYPE(BIN) DISP(60)                    /*UR chain*/
FLD: QVLSLC17 LEN(4) TYPE(BIN) DISP(64)                  /*RURE chain*/
FLD: QVLSLC18 LEN(4) TYPE(BIN) DISP(68)            /*DDF resynch list*/
FLD: QVLSLC19 LEN(4) TYPE(BIN) DISP(72)                   /*Log write*/
FLD: QVLSLC20 LEN(4) TYPE(BIN) DISP(76)           /*System checkpoint*/
FLD: QVLSLC21 LEN(4) TYPE(BIN) DISP(80)           /*Accounting rollup*/
FLD: QVLSLC22 LEN(4) TYPE(BIN) DISP(84)         /*Internal checkpoint*/
FLD: QVLSLC23 LEN(4) TYPE(BIN) DISP(88)              /*Buffer manager*/
FLD: QVLSLC24 LEN(4) TYPE(BIN) DISP(92)        /*EDM pool or prefetch*/
FLD: QVLSLC25 LEN(4) TYPE(BIN) DISP(96)         /*Workfile allocation*/
FLD: QVLSLC26 LEN(4) TYPE(BIN) DISP(100)    /*Dynamic statement cache*/
FLD: QVLSLC27 LEN(4) TYPE(BIN) DISP(104)       /*Stored procedures or*/
*                           /* authorization cache         */
FLD: QVLSLC28 LEN(4) TYPE(BIN) DISP(108)       /*Stored procedures or*/
*                           /* authorization cache         */
FLD: QVLSLC29 LEN(4) TYPE(BIN) DISP(112)        /*Field procs and DDF*/
*                           /* transaction manager         */
FLD: QVLSLC30 LEN(4) TYPE(BIN) DISP(116)             /*Agent services*/
FLD: QVLSLC31 LEN(4) TYPE(BIN) DISP(120)            /*Storage manager*/
FLD: QVLSLC32 LEN(4) TYPE(BIN) DISP(124)            /*Storage manager*/
FLD: QVLSLC254 LEN(4) TYPE(BIN) DISP(128)               /*Index lotch*/
FLD: QVLSEND  LEN(1) DISP(132)


*******************************************************************
*   QVAS    DSNDQVAS   *   AGENT SERVICES STATISTICS
*******************************************************************
***********************************************************************
**** QVAS     DSECT                                                     
***********************************************************************

COMP: QVAS_OFFSET =
           WHEN(SM100RTY=100 AND QWS00R8N > 0) ASSIGN(QWS00R8O)
           ELSE                                ASSIGN(99999)
FLD: QVAS     DISP(0) LEN(1) OFFSET(QVAS_OFFSET)
*        /* ASMC STATISTICS COUNTER DCL  */
FLD: QVASSUSP LEN(4) TYPE(BIN) DISP(0)                          /*(S)*/
FLD: QVASXSUS LEN(4) TYPE(BIN) DISP(4)                          /*(S)*/
FLD: QVASXSUT LEN(4) TYPE(BIN) DISP(8)                          /*(S)*/
FLD: QVASXAUS LEN(4) TYPE(BIN) DISP(12)                         /*(S)*/
FLD: QVASXAUT LEN(4) TYPE(BIN) DISP(16)                         /*(S)*/
FLD: QVASXSRS LEN(4) TYPE(BIN) DISP(20)                         /*(S)*/
FLD: QVASXSRT LEN(4) TYPE(BIN) DISP(24)                         /*(S)*/
FLD: QVASADUR LEN(4) TYPE(BIN) DISP(28)                         /*(S)*/
FLD: QVASADDL LEN(4) TYPE(BIN) DISP(32)                         /*(S)*/
FLD: QVASADIR LEN(4) TYPE(BIN) DISP(36)                         /*(S)*/
FLD: QVASCBOS LEN(4) TYPE(BIN) DISP(40)                         /*(S)*/
FLD: QVASCBOF LEN(4) TYPE(BIN) DISP(44)                         /*(S)*/
FLD: QVASMBOS LEN(4) TYPE(BIN) DISP(48)                         /*(S)*/
FLD: QVASMBOF LEN(4) TYPE(BIN) DISP(52)                         /*(S)*/
FLD: QVASEND  LEN(1) DISP(56)     /*END*/


*******************************************************************
*   QSST    DSNDQSST   *   STORAGE MANAGER STATISTICS
*******************************************************************
***********************************************************************
****          DSECT ,                                                        
***********************************************************************

COMP: QSST_OFFSET =
           WHEN(SM100RTY=100 AND QWS00R9N > 0) ASSIGN(QWS00R9O)
           ELSE                                ASSIGN(99999)
FLD: QSST_DSECT DISP(0) LEN(1) OFFSET(QSST_OFFSET)
FLD: QSST     LEN(8) DISP(0)      /*CONTROL BLOCK NAME*/
FLD: QSSTHEAD LEN(4) TYPE(BIN) DISP(0)         /*CONTROL BLOCK HEADER*/
FLD: QSSTID   LEN(2) DISP(0)      /*CONTROL BLOCK ID*/
FLD: QSSTLEN  TYPE(HALF) DISP(2)  /*LENGTH OF CONTROL BLOCK*/
FLD: QSSTDESC LEN(4) DISP(4)      /*EBCDIC EYE CATCHER*/
FLD: QSSTDATA LEN(4) TYPE(BIN) DISP(8)         /*STATISTICAL COUNTERS*/
FLD: QSSTGPLF LEN(4) TYPE(BIN) DISP(8)                          /*(S)*/
FLD: QSSTFPLF LEN(4) TYPE(BIN) DISP(12)                         /*(S)*/
FLD: QSSTFREF LEN(4) TYPE(BIN) DISP(16)                         /*(S)*/
FLD: QSSTEXPF LEN(4) TYPE(BIN) DISP(20)                         /*(S)*/
FLD: QSSTCONF LEN(4) TYPE(BIN) DISP(24)                         /*(S)*/
FLD: QSSTGPLV LEN(4) TYPE(BIN) DISP(28)                         /*(S)*/
FLD: QSSTFPLV LEN(4) TYPE(BIN) DISP(32)                         /*(S)*/
FLD: QSSTFREV LEN(4) TYPE(BIN) DISP(36)                         /*(S)*/
FLD: QSSTEXPV LEN(4) TYPE(BIN) DISP(40)                         /*(S)*/
FLD: QSSTCONV LEN(4) TYPE(BIN) DISP(44)                         /*(S)*/
FLD: QSSTGETM LEN(4) TYPE(BIN) DISP(48)                         /*(S)*/
FLD: QSSTFREM LEN(4) TYPE(BIN) DISP(52)                         /*(S)*/
FLD: QSSTRCNZ LEN(4) TYPE(BIN) DISP(56)                         /*(S)*/
FLD: QSSTCONT LEN(4) TYPE(BIN) DISP(60)                         /*(S)*/
FLD: QSSTCRIT LEN(4) TYPE(BIN) DISP(64)                         /*(S)*/
FLD: QSSTABND LEN(4) TYPE(BIN) DISP(68)                         /*(S)*/
FLD: QSST_SGETM LEN(4) TYPE(BIN) DISP(72)                       /*(S)*/
FLD: QSST_SGETR LEN(4) TYPE(BIN) DISP(76)                       /*(S)*/
FLD: QSST_SGETEXT LEN(4) TYPE(BIN) DISP(80)                     /*(S)*/
FLD: QSST_SFREEM LEN(4) TYPE(BIN) DISP(84)                      /*(S)*/
FLD: QSST_SFREER LEN(4) TYPE(BIN) DISP(88)                      /*(S)*/
FLD: QSSTEND  LEN(1) DISP(92)     /*END OF CONTROL BLOCK*/
COMP: QSSTIDEN = X'003C'          /*HEADER CONSTANT*/
COMP: QSSTEYEC = 'QSST'           /*EYE CATCHER CONSTANT*/


*******************************************************************
*   QLST    DSNDQLST   *   DDF STATISTICS - V2R2
*******************************************************************
***********************************************************************
**** QLST     DSECT                                                     
***********************************************************************

COMP: QLST_OFFSET =
           WHEN(SM100RTY=100 AND QWS00RAN > 0) ASSIGN(QWS00RAO)
           ELSE                                ASSIGN(99999)
FLD: QLST     DISP(0) LEN(1) OFFSET(QLST_OFFSET)
FLD: QLSTLOCN LEN(16) DISP(0)     /*%U LOCATION NAME OF THE 'REMOTE'*/
*                              SITE WITH WHICH THE
*                              INFORMATION IS ASSOCIATED.
*                              Truncated if QLSTLOCN_Off¬=0
FLD: QLSTSQLS LEN(4) TYPE(BIN) DISP(16)
                                  /*NUMBER OF SQL STATEMENTS SENT*/
*                              TO THE REMOTE SITE.
FLD: QLSTSQLR LEN(4) TYPE(BIN) DISP(20)    /*NUMBER OF SQL STATEMENTS*/
*                              RECEIVED FROM THE REMOTE SITE.
FLD: QLSTROWS LEN(4) TYPE(BIN) DISP(24)
                                 /*NUMBER OF ROWS OF DATA SENT TO THE*/
*                              REMOTE SITE (INCLUDES THE SQLDA)
FLD: QLSTROWR LEN(4) TYPE(BIN) DISP(28)      /*NUMBER OF ROWS OF DATA*/
*                              RETRIEVED FROM THE REMOTE SITE (THIS
*                              COUNT DOES NOT INCLUDE
*                              EITHER THE SQLDA OR SQLCA
*                              IF THEY ARE TRANSMITTED).
FLD: QLSTBYTS LEN(4) TYPE(BIN) DISP(32)
                                  /*NUMBER OF BYTES OF DATA SENT*/
*                              TO THE REMOTE SITE.
FLD: QLSTBYTR LEN(4) TYPE(BIN) DISP(36)     /*NUMBER OF BYTES OF DATA*/
*                              RECEIVED FROM THE REMOTE SITE.
FLD: QLSTCNVS LEN(4) TYPE(BIN) DISP(40)
                                  /*NUMBER OF CONVERSATIONS THAT*/
*                              WERE INITIATED FROM THIS
*                              SITE TO THE REMOTE SITE.
FLD: QLSTCNVR LEN(4) TYPE(BIN) DISP(44)
                                  /*NUMBER OF CONVERSATIONS THAT*/
*                              WERE INITIATED FROM THE
*                              REMOTE SITE TO THIS SITE.
FLD: QLSTMSGS LEN(4) TYPE(BIN) DISP(48)  /*NUMBER OF MESSAGES SENT TO*/
*                              THE REMOTE SITE.
FLD: QLSTMSGR LEN(4) TYPE(BIN) DISP(52) /*NUMBER OF MESSAGES RECEIVED*/
*                              FROM THE REMOTE SITE.
FLD: QLSTTRNS LEN(4) TYPE(BIN) DISP(56)
                        /*NUMBER OF DATABASE ACCESS THREAD ALLOCATION*/
*                              REQUESTS SENT TO THE REMOTE SITE
*                              (MEANINGFUL AT AR ONLY).
FLD: QLSTTRNR LEN(4) TYPE(BIN) DISP(60)
                        /*NUMBER OF DATABASE ACCESS THREAD ALLOCATION*/
*                              REQUESTS RECEIVED FROM THE REMOTE SITE
*                              (MEANINGFUL AT AS ONLY).
FLD: QLSTCOMS LEN(4) TYPE(BIN) DISP(64)
                              /*NUMBER OF COMMIT REQUESTS SENT TO THE*/
*                              SERVER (SINGLE-PHASE COMMIT
*                              PROTOCOL ONLY).
FLD: QLSTCOMR LEN(4) TYPE(BIN) DISP(68)
                        /*NUMBER OF COMMIT REQUESTS RECEIVED FROM THE*/
*                              REQUESTER (SINGLE-PHASE COMMIT
*                              PROTOCOL ONLY).
FLD: QLSTABRS LEN(4) TYPE(BIN) DISP(72)
                        /*NUMBER OF ABORT REQUESTS SENT TO THE SERVER*/
*                              (SINGLE-PHASE COMMIT PROTOCOL ONLY).
FLD: QLSTABRR LEN(4) TYPE(BIN) DISP(76)
                         /*NUMBER OF ABORT REQUESTS RECEIVED FROM THE*/
*                              REQUESTER (SINGLE-PHASE COMMIT
*                              PROTOCOL ONLY).
FLD: QLSTCNVQ LEN(4) TYPE(BIN) DISP(80)
                                  /*NUMBER OF CONVERSATION REQUESTS*/
*                              QUEUED BY DDF WAITING FOR
*                              ALLOCATION.
FLD: QLSTCBLB LEN(4) TYPE(BIN) DISP(84)
                             /*NUMBER OF TIMES A SWITCH WAS MADE FROM*/
*                              CONTINUOUS BLOCK MODE TO LIMITED
*                              BLOCK MODE (SYSTEM DIRECTED ACCESS
*                              ONLY).
FLD: QLSTRBND LEN(4) TYPE(BIN) DISP(88)
                           /*NUMBER OF SQL STATEMENTS THAT WERE BOUND*/
*                              FOR REMOTE ACCESS (SYSTEM DIRECTED
*                              ACCESS    ONLY).
FLD: QLSTBROW LEN(4) TYPE(BIN) DISP(92)
                            /*NUMBER OF ROWS IN THE MESSAGE BUFFER IF*/
*                              BLOCK FETCH IS BEING USED.
FLD: QLSTBTBF LEN(4) TYPE(BIN) DISP(96)
                           /*NUMBER OF BLOCKS TRANSMITTED USING BLOCK*/
*                              FETCH (SERVER SITE ONLY).
FLD: QLSTBRBF LEN(4) TYPE(BIN) DISP(100)
                              /*NUMBER OF BLOCKS RECEIVED USING BLOCK*/
*                              FETCH (REQUESTER SITE ONLY).
FLD: QLSTPRSE LEN(4) TYPE(BIN) DISP(104)
                             /*NUMBER OF PREPARE REQUESTS SENT TO THE*/
*                              PARTICIPANT
*                              (TWO-PHASE COMMIT PROTOCOL ONLY).
FLD: QLSTPRRC LEN(4) TYPE(BIN) DISP(108)
                       /*NUMBER OF PREPARE REQUESTS RECEIVED FROM THE*/
*                              COORDINATOR
*                              (TWO-PHASE COMMIT PROTOCOL ONLY).
FLD: QLSTLASE LEN(4) TYPE(BIN) DISP(112)
                          /*NUMBER OF LAST AGENT REQUESTS SENT TO THE*/
*                              COORDINATOR
*                              (TWO-PHASE COMMIT PROTOCOL ONLY).
FLD: QLSTLARC LEN(4) TYPE(BIN) DISP(116)
                    /*NUMBER OF LAST AGENT REQUESTS RECEIVED FROM THE*/
*                              INITIATOR
*                              (TWO-PHASE COMMIT PROTOCOL ONLY).
FLD: QLSTCRSE LEN(4) TYPE(BIN) DISP(120)
                            /*NUMBER OF COMMITED REQUESTS SENT TO THE*/
*                              PARTICIPANT
*                              (TWO-PHASE COMMIT PROTOCOL ONLY).
FLD: QLSTCRRC LEN(4) TYPE(BIN) DISP(124)
                     /*NUMBER OF COMMITED REQUESTS RECEIVED FROM THEE*/
*                              COORDINATOR
*                              (TWO-PHASE COMMIT PROTOCOL ONLY).
FLD: QLSTBKSE LEN(4) TYPE(BIN) DISP(128)
                             /*NUMBER OF BACKOUT REQUESTS SENT TO THE*/
*                              PARTICIPANT
*                              (TWO-PHASE COMMIT PROTOCOL ONLY).
FLD: QLSTBKRC LEN(4) TYPE(BIN) DISP(132)
                       /*NUMBER OF BACKOUT REQUESTS RECEIVED FROM THE*/
*                              COORDINATOR
*                              (TWO-PHASE COMMIT PROTOCOL ONLY).
FLD: QLSTRRSE LEN(4) TYPE(BIN) DISP(136)
                             /*NUMBER OF FORGET RESPONSES SENT TO THE*/
*                              COORDINATOR
*                              (TWO-PHASE COMMIT PROTOCOL ONLY).
FLD: QLSTRRRC LEN(4) TYPE(BIN) DISP(140)
                       /*NUMBER OF FORGET RESPONSES RECEIVED FROM THE*/
*                              PARTICIPANT
*                              (TWO-PHASE COMMIT PROTOCOL ONLY).
FLD: QLSTVYSE LEN(4) TYPE(BIN) DISP(144)
                     /*NUMBER OF REQUEST COMMIT RESPONSES SENT TO THE*/
*                              COORDINATOR
*                              (TWO-PHASE COMMIT PROTOCOL ONLY).
FLD: QLSTVYRC LEN(4) TYPE(BIN) DISP(148)
                        /*NUMBER OF REQUEST COMMIT RESPONSES RECEIVED*/
*                              FROM THE PARTICIPANT
*                              (TWO-PHASE COMMIT PROTOCOL ONLY).
FLD: QLSTVNSE LEN(4) TYPE(BIN) DISP(152)
                            /*NUMBER OF BACKOUT RESPONSES SENT TO THE*/
*                              COORDINATOR
*                              (TWO-PHASE COMMIT PROTOCOL ONLY).
FLD: QLSTVNRC LEN(4) TYPE(BIN) DISP(156)
                      /*NUMBER OF BACKOUT RESPONSES RECEIVED FROM THE*/
*                              PARTICIPANT
*                              (TWO-PHASE COMMIT PROTOCOL ONLY).
FLD: QLSTINDT LEN(4) TYPE(BIN) DISP(160)
                     /*NUMBER OF THREADS THAT BECAME INDOUBT WITH THE*/
*                              REMOTE LOCATION AS THE COORDINATOR.
FLD: QLSTCPTR LEN(4) TYPE(BIN) DISP(164)
                     /*NUMBER OF COMMIT OPERATIONS PERFORMED WITH THE*/
*                              REMOTE LOCATION AS COORDINATOR.
FLD: QLSTRBTR LEN(4) TYPE(BIN) DISP(168)
                       /*NUMBER OF ROLLBACK OPERATIONS PERFORMED WITH*/
*                              THE REMOTE LOCATION AS COORDINATOR.
FLD: QLSTLOCN_OFF TYPE(HALF) DISP(172)          /*Offset from QLST to*/
*                              LOCATION NAME OF THE 'REMOTE'
*                              SITE WITH WHICH THE
*                              INFORMATION IS ASSOCIATED.
*                              If QLSTLOCN truncated
FLD: QLSTEND  LEN(4) TYPE(BIN) DISP(176)
*
*
***********************************************************************
**** QLSTLOCN_D DSECT       Use if QLSTLOCN_Off¬=0                      
***********************************************************************

COMP: QLSTLOCN_D_OFFSET =
           WHEN(SM100RTY=100 AND QWS00RAN > 0 AND QLSTLOCN_Off <> 0)
                                  ASSIGN(QWS00RAO + QLSTLOCN_Off)
           ELSE                   ASSIGN(99999)
FLD: QLSTLOCN_D DISP(0) LEN(1) OFFSET(QLSTLOCN_D_OFFSET)
                                  /*Use if QLSTLOCN_Off¬ 0*/
FLD: QLSTLOCN_LEN TYPE(HALF) DISP(0)  /*Length of the following field*/
FLD: QLSTLOCN_VAR LEN(128) DISP(2)/*%U LOCATION NAME OF THE 'REMOTE'*/
*                              SITE WITH WHICH THE
*                              INFORMATION IS ASSOCIATED.
*                              Truncated if QLSTLOCN_Off¬=0


*******************************************************************
*   QJST    DSNDQJST   *   LOG MANAGER STATISTICS
*******************************************************************
***********************************************************************
**** DSNDQJST DSECT                                                     
***********************************************************************

COMP: QJST_OFFSET =
           WHEN(SM100RTY=100 AND QWS00RBN > 0) ASSIGN(QWS00RBO)
           ELSE                                ASSIGN(99999)
FLD: DSNDQJST DISP(0) LEN(1) OFFSET(QJST_OFFSET)
FLD: QJST     LEN(8) DISP(0)
FLD: QJSTID   LEN(2) DISP(0)      /*(S) CONTROL BLOCK ID X'0093'*/
FLD: QJSTLL   TYPE(HALF) DISP(2)  /*LENGTH OF BLOCK*/
FLD: QJSTEID  LEN(4) DISP(4)      /*EBCDIC EYECATCHER*/
FLD: QJSTWRW  LEN(4) TYPE(BIN) DISP(8)    /*WRITE REQUEST COUNT, WAIT*/
FLD: QJSTWRNW LEN(4) TYPE(BIN) DISP(12) /*WRITE REQUEST COUNT, NOWAIT*/
FLD: QJSTWRF  LEN(4) TYPE(BIN) DISP(16)  /*WRITE REQUEST COUNT, FORCE*/
FLD: QJSTWTB  LEN(4) TYPE(BIN) DISP(20)
                        /*WAIT COUNT DUE TO UNAVAILABLE ACTIVE BUFFER*/
FLD: QJSTRBUF LEN(4) TYPE(BIN) DISP(24)
                            /*LOG READS SATISFIED FROM OUTPUT BUFFERS*/
FLD: QJSTRACT LEN(4) TYPE(BIN) DISP(28)
                           /*READS SATISFIED FROM ACTIVE LOG DATA SET*/
FLD: QJSTRARH LEN(4) TYPE(BIN) DISP(32)
                          /*READS SATISFIED FROM ARCHIVE LOG DATA SET*/
FLD: QJSTTVC  LEN(4) TYPE(BIN) DISP(36)
                             /*NUMBER OF READ ACCESSES DELAYED DUE TO*/
*                           TAPE VOLUME CONTENTION
FLD: QJSTBSDS LEN(4) TYPE(BIN) DISP(40)  /*TOTAL BSDS ACCESS REQUESTS*/
FLD: QJSTBFFL LEN(4) TYPE(BIN) DISP(44)
                        /*ACTIVE LOG OUTPUT CONTROL INTERVALS CREATED*/
FLD: QJSTBFWR LEN(4) TYPE(BIN) DISP(48)
                         /*COUNT OF CALLS TO WRITE ACTIVE LOG BUFFERS*/
FLD: QJSTALR  LEN(4) TYPE(BIN) DISP(52)
                                  /*ARCHIVE LOG READ ALLOCATIONS*/
FLD: QJSTALW  LEN(4) TYPE(BIN) DISP(56)
                                  /*ARCHIVE LOG WRITE ALLOCATIONS*/
FLD: QJSTCIOF LEN(4) TYPE(BIN) DISP(60)
                               /*COUNT OF CONTROL INTERVALS OFFLOADED*/
FLD: QJSTWUR  LEN(4) TYPE(BIN) DISP(64)
                             /*NUMBER OF READ ACCESSES DELAYED DUE TO*/
*                           UNAVAILABLE RESOURCE
FLD: QJSTLAMA LEN(4) TYPE(BIN) DISP(68)
                            /*NUMBER OF LOOK AHEAD TAPE VOLUME MOUNTS*/
*                           ATTEMPTED.  THIS FIELD ALONG WITH FIELD
*                           QJSTLAMS, WILL SHOW HOW MANY TIMES LOOK-
*                           AHEAD MOUNTING FAILED, THUS NEGATING
*                           POTENTIAL SIGNIFICANT PERFORMANCE GAINS.
FLD: QJSTLAMS LEN(4) TYPE(BIN) DISP(72)
                            /*NUMBER OF LOOK AHEAD TAPE VOLUME MOUNTS*/
*                           PERFORMED.
FLD: QJSTLSUS LEN(4) TYPE(BIN) DISP(76)                         /*(S)*/
FLD: QJSTLOGW LEN(4) TYPE(BIN) DISP(80)
                            /*TOTAL NUMBER OF LOG WRITE I/O REQUESTS.*/
FLD: QJSTCIWR LEN(4) TYPE(BIN) DISP(84)
                                  /*TOTAL NUMBER OF LOG CI S WRITTEN.*/
FLD: QJSTSERW LEN(4) TYPE(BIN) DISP(88)
                            /*NUMBER OF SERIAL LOG WRITE REQUESTS FOR*/
*                           CI RE-WRITES WHEN DUAL LOGGING.
FLD: QJSTTHRW LEN(4) TYPE(BIN) DISP(92)
                            /*NUMBER OF TIMES A LOG WRITE REQUEST WAS*/
*                           SCHEDULED BECAUSE THE LOG WRITE THRESHOLD
*                           WAS REACHED.
FLD: QJSTBPAG LEN(4) TYPE(BIN) DISP(96)
                          /*NUMBER OF TIMES A LOG WRITE BUFFER HAD TO*/
*                           BE PAGED-IN BEFORE IT COULD BE USED.
FLD: QJSTEND  LEN(4) TYPE(BIN) DISP(112)


*******************************************************************
*   QDST    DSNDQDST   *   DDF SYSTEM STATISTICS
*******************************************************************
***********************************************************************
**** QDST     DSECT                                                     
***********************************************************************

COMP: QDST_OFFSET =
           WHEN(SM100RTY=100 AND QWS00RCN > 0) ASSIGN(QWS00RCO)
           ELSE                                ASSIGN(99999)
FLD: QDST     DISP(0) LEN(1) OFFSET(QDST_OFFSET)
*       DDF SYSTEM STATISTICS
*
FLD: QDSTQDBT LEN(4) TYPE(BIN) DISP(0)  /*NUMBER OF TIMES THAT A DBAT*/
*                                /* WAS QUEUED DUE TO HAVING   */
*                                /* REACHED THE ZPARM MAX FOR  */
*                                /* ACTIVE REMOTE THREADS      */
FLD: QDSTCSTR LEN(4) TYPE(BIN) DISP(4)         /*NUMBER OF COLD START*/
*                                /* CONNECTIONS WITH ALL REMOTE*/
*                                /* LOCATIONS (TWO-PHASE       */
*                                /* COMMIT PROTOCOL ONLY).     */
FLD: QDSTWSTR LEN(4) TYPE(BIN) DISP(8)         /*NUMBER OF WARM START*/
*                                /* CONNECTIONS WITH ALL REMOTE*/
*                                /* LOCATIONS (TWO-PHASE       */
*                                /* COMMIT PROTOCOL ONLY).     */
FLD: QDSTRSAT LEN(4) TYPE(BIN) DISP(12) /*NUMBER OF RESYNCHRONIZATION*/
*                                /* CONNECTIONS ATTEMPTED WITH */
*                                /* ALL REMOTE LOCATIONS (TWO- */
*                                /* PHASE COMMIT PROTOCOL ONLY)*/
FLD: QDSTRSSU LEN(4) TYPE(BIN) DISP(16) /*NUMBER OF RESYNCHRONIZATION*/
*                                /* CONNECTIONS THAT SUCCEEDED */
*                                /* WITH ALL REMOTE LOCATIONS  */
*                                /* (TWO-PHASE COMMIT PROTOCOL */
*                                /* ONLY).                     */
FLD: QDSTQCRT LEN(4) TYPE(BIN) DISP(20) /*THE NUMBER OF CONVERSATIONS*/
*                                /* DEALLOCATED BECAUSE THE    */
*                                /* ZPARM LIMIT FOR MAXIMUM    */
*                                /* CONNECTED REMOTE THREADS   */
*                                /* REACHED.                   */
FLD: QDSTQCIT LEN(4) TYPE(BIN) DISP(24)       /*THE CURRENT NUMBER OF*/
*                                /* TYPE 1 INACTIVE DBATs      */
FLD: QDSTQMIT LEN(4) TYPE(BIN) DISP(28)       /*THE MAXIMUM NUMBER OF*/
*                                /* TYPE 1 INACTIVE DBATs THAT */
*                                /* EXISTED (HIGH WATER MARK)  */
FLD: QDSTCNAT LEN(4) TYPE(BIN) DISP(32)       /*THE CURRENT NUMBER OF*/
*                                /* ACTIVE DBATs               */
FLD: QDSTHWAT LEN(4) TYPE(BIN) DISP(36)       /*THE MAXIMUM NUMBER OF*/
*                                /* ACTIVE DBATs THAT          */
*                                /* EXISTED (HIGH WATER MARK)  */
FLD: QDSTHWDT LEN(4) TYPE(BIN) DISP(40)       /*THE MAXIMUM NUMBER OF*/
*                                /* REMOTE CONNECTIONS THAT    */
*                                /* EXISTED (HIGH WATER MARK). */
FLD: QDSTNITC LEN(4) TYPE(BIN) DISP(44)  /*NUMBER OF CONNECTIONS THAT*/
*                                /* WERE TERMINATED RATHER THAN*/
*                                /* MADE TYPE 1 INACTIVE       */
*                                /* BECAUSE MAX TYPE 1 INACTIVE*/
*                                /* WAS REACHED.               */
FLD: QDSTCIN2 LEN(4) TYPE(BIN) DISP(48)    /*CURRENT NUMBER OF TYPE 2*/
*                                /* INACTIVE THREADS           */
FLD: QDSTMIN2 LEN(4) TYPE(BIN) DISP(52)    /*MAXIMUM NUMBER OF TYPE 2*/
*                                /* INACTIVE THREADS (HIGH     */
*                                /* WATER MARK).               */
FLD: QDSTQIN2 LEN(4) TYPE(BIN) DISP(56)    /*NUMBER OF QUEUED RECEIVE*/
*                                /* REQUESTS FOR A TYPE 2      */
*                                /* INACTIVE THREAD AND NUMBER */
*                                /* OF REQUESTS FOR NEW        */
*                                /* CONNECTIONS THAT WERE      */
*                                /* RECEIVED AFTER MAX REMOTE  */
*                                /* ACTIVE WAS REACHED.        */
FLD: QDSTNQR2 LEN(4) TYPE(BIN) DISP(60)    /*CURRENT NUMBER OF TYPE 2*/
*                                /* INACTIVE THREADS THAT ARE  */
*                                /* QUEUED WAITING TO PROCESS. */
*                                /* THIS INCLUDES BOTH RECEIVE */
*                                /* REQUESTS THAT COMPLETED    */
*                                /* FOR A TYPE 2 INACTIVE      */
*                                /* THREAD AS WELL AS REQUESTS */
*                                /* FOR NEW CONNECTIONS THAT   */
*                                /* WERE RECEIVED AFTER MAX    */
*                                /* REMOTE ACTIVE WAS REACHED. */
FLD: QDSTMQR2 LEN(4) TYPE(BIN) DISP(64)    /*MAXIMUM NUMBER OF TYPE 2*/
*                                /* INACTIVE THREADS THAT WERE */
*                                /* QUEUED WAITING FOR A DATA  */
*                                /* BASE ACCESS THREAD. THIS   */
*                                /* INCLUDES BOTH RECEIVE      */
*                                /* REQUESTS THAT COMPLETED FOR*/
*                                /* A TYPE 2 INACTIVE THREAD AS*/
*                                /* WELL AS REQUESTS FOR NEW   */
*                                /* CONNECTIONS THAT WERE      */
*                                /* RECEIVED AFTER MAX REMOTE  */
*                                /* ACTIVE WAS REACHED. (HIGH  */
*                                /* WATER MARK)                */
FLD: QDSTNADS LEN(4) TYPE(BIN) DISP(68)    /*CURRENT NUMBER OF ACTIVE*/
*                                /* DATABASE ACCESS THREAD     */
*                                /* SLOTS THAT ARE NOT IN USE. */
*                                /* THE SLOT WILL BE ASSIGNED  */
*                                /* WHEN EITHER A QUEUED       */
*                                /* RECEIVE REQUEST COMPLETES  */
*                                /* OR A REQUEST FOR A NEW     */
*                                /* CONNECTION IS RECEIVED.    */
FLD: QDSTMADS LEN(4) TYPE(BIN) DISP(72)  /*MAXIMUM NUMBER OF DATABASE*/
*                                /* ACCESS THREAD SLOTS THAT   */
*                                /* WERE NOT IN USE BECAUSE NO */
*                                /* PROCESSING WAS REQUIRED    */
*                                /* EITHER TO COMPLETE A QUEUED*/
*                                /* RECEIVE REQUEST OR TO      */
*                                /* ESTABLISH A NEW CONNECTION.*/
*                                /* (HIGH WATER MARK).         */
FLD: QDSTNDBA LEN(4) TYPE(BIN) DISP(76) /*THE NUMBER OF REQUESTS THAT*/
*                                /* REQUIRED A DATA BASE ACCESS*/
*                                /* THREAD TO PROCESS THE      */
*                                /* REQUEST. NOTE THAT THIS    */
*                                /* DOES NOT INCLUDE DATA BASE */
*                                /* ACCESS THREADS CREATED TO  */
*                                /* REPLACE POOL THREADS THAT  */
*                                /* TERMINATED BECAUSE THEY    */
*                                /* REACHED THEIR REUSE LIMIT. */
FLD: QDSTPOOL LEN(4) TYPE(BIN) DISP(80)      /*THE NUMBER OF REQUESTS*/
*                                /* THAT WERE SATISFIED BY     */
*                                /* ASSIGNING A POOL THREAD TO */
*                                /* PROCESS THE REQUEST.       */
FLD: QDSTEND  LEN(1) DISP(84)


*******************************************************************
*   QWOS    DSNDQWOS   *   ZOS SYSTEM STATISTICS
*******************************************************************
***********************************************************************
**** QWOS     DSECT                                                     
***********************************************************************

COMP: QWOS_OFFSET =
           WHEN(SM100RTY=100 AND QWS00RDN > 0) ASSIGN(QWS00RDO)
           ELSE                                ASSIGN(99999)
FLD: QWOS     DISP(0) LEN(1) OFFSET(QWOS_OFFSET)
***********************************************************************
*   IFCID 0001 - DATA SECTION QWS00RDO(Z/OS METRICS)
***********************************************************************
*
FLD: QWOSLNCP LEN(4) TYPE(BIN) DISP(0)            /*NO OF CPS ON LPAR*/
FLD: QWOSLPRU LEN(4) TYPE(BIN) DISP(4)         /*CPU UTILIZATION LPAR*/
FLD: QWOSDB2U LEN(4) TYPE(BIN) DISP(8)   /*CPU UTILIZATION DB2 SUBSYS*/
FLD: QWOSMSTU LEN(4) TYPE(BIN) DISP(12)    /*CPU UTILIZATION DB2 MSTR*/
FLD: QWOSDBMU LEN(4) TYPE(BIN) DISP(16)    /*CPU UTILIZATION DB2 DBM1*/
FLD: QWOSLPIR LEN(4) TYPE(BIN) DISP(20)           /*PAGE IN RATE LPAR*/
FLD: QWOSDPIR LEN(4) TYPE(BIN) DISP(24)     /*PAGE IN RATE DB2 SUBSYS*/
FLD: QWOSLRST LEN(4) TYPE(BIN) DISP(28)  /*REAL STORAGE ON LPAR IN MB*/
FLD: QWOSLRSF LEN(4) TYPE(BIN) DISP(32)
                                  /*FREE REAL STORAGE LPAR IN MB*/
FLD: QWOSDRSU LEN(4) TYPE(BIN) DISP(36)
                                 /*USED REAL STORAGE DB2 SUBSYS IN MB*/
FLD: QWOSLVST LEN(4) TYPE(BIN) DISP(40)  /*VIRTUAL STORAGE LPAR IN MB*/
FLD: QWOSLVSF LEN(4) TYPE(BIN) DISP(44)
                                  /*FREE VIRTUAL STORAGE LPAR IN MB*/
FLD: QWOSDVSU LEN(4) TYPE(BIN) DISP(48)
                              /*USED VIRTUAL STORAGE DB2 SUBSYS IN MB*/
FLD: QWOSLUIC LEN(4) TYPE(BIN) DISP(52)
                                  /*UNREFERENCED INTERVAL COUNT @116*/
FLD: QWOSFLG  LEN(1) DISP(56)     /*(S) STATUS FLAG FOR RMF API @116*/
FLD: QWOSRCDE LEN(4) TYPE(BIN) DISP(60)
                                  /*(S) RETURN CODE FROM RMF API @116*/
FLD: QWOSRSNC LEN(4) TYPE(BIN) DISP(64)
                                  /*(S) REASON CODE from RMF API @116*/
FLD: QWOSEND  LEN(1) DISP(68)
*


*******************************************************************
*   QXST    DSNDQXST   *   SQL  STATISTICS
*******************************************************************
***********************************************************************
**** DSNDQXST DSECT         TABLE OF SQL STMT COUNTERS                  
***********************************************************************

COMP: QXST_OFFSET =
           WHEN(SM100RTY=100 AND QWS10R1N > 0) ASSIGN(QWS10R1O)
           ELSE                                ASSIGN(99999)
FLD: DSNDQXST DISP(0) LEN(1) OFFSET(QXST_OFFSET)
                                  /*TABLE OF SQL STMT COUNTERS*/
FLD: QXST     LEN(8) DISP(0)      /*RDS ACCOUNTING AREA*/
FLD: QXHEAD   LEN(4) TYPE(BIN) DISP(0)         /*CONTROL BLOCK HEADER*/
FLD: QXID     TYPE(HALF) DISP(0)  /*CONTROL BLOCK ID*/
FLD: QXLEN    TYPE(HALF) DISP(2)  /*CONTROL BLOCK LENGTH*/
FLD: QXEYE    LEN(4) DISP(4)      /*CONTROL BLOCK EYE CATCHER*/
FLD: STMT     LEN(4) TYPE(BIN) DISP(8)           /*OVERLAY ON QXSTATS*/
FLD: QXSTATS  LEN(4) TYPE(BIN) DISP(8)        /*ACCOUNTING STATISTICS*/
FLD: QXSELECT LEN(4) TYPE(BIN) DISP(8)                 /*# OF SELECTS*/
FLD: QXINSRT  LEN(4) TYPE(BIN) DISP(12)                /*# OF INSERTS*/
FLD: QXUPDTE  LEN(4) TYPE(BIN) DISP(16)                /*# OF UPDATES*/
FLD: QXDELET  LEN(4) TYPE(BIN) DISP(20)                /*# OF DELETES*/
FLD: QXDESC   LEN(4) TYPE(BIN) DISP(24)              /*# OF DESCRIBES*/
FLD: QXPREP   LEN(4) TYPE(BIN) DISP(28)               /*# OF PREPARES*/
FLD: QXOPEN   LEN(4) TYPE(BIN) DISP(32)                  /*# OF OPENS*/
FLD: QXCLOSE  LEN(4) TYPE(BIN) DISP(36)                 /*# OF CLOSES*/
FLD: QXCRTAB  LEN(4) TYPE(BIN) DISP(40)           /*# OF CREATE TABLE*/
FLD: QXCRINX  LEN(4) TYPE(BIN) DISP(44)           /*# OF CREATE INDEX*/
FLD: QXCTABS  LEN(4) TYPE(BIN) DISP(48)      /*# OF CREATE TABLESPACE*/
FLD: QXCRSYN  LEN(4) TYPE(BIN) DISP(52)         /*# OF CREATE SYNONYM*/
FLD: QXCRDAB  LEN(4) TYPE(BIN) DISP(56)        /*# OF CREATE DATABASE*/
FLD: QXCRSTG  LEN(4) TYPE(BIN) DISP(60)   /*# OF CREATE STORAGE GROUP*/
FLD: QXDEFVU  LEN(4) TYPE(BIN) DISP(64)            /*# OF CREATE VIEW*/
FLD: QXDRPIX  LEN(4) TYPE(BIN) DISP(68)             /*# OF DROP INDEX*/
FLD: QXDRPTA  LEN(4) TYPE(BIN) DISP(72)             /*# OF DROP TABLE*/
FLD: QXDRPTS  LEN(4) TYPE(BIN) DISP(76)        /*# OF DROP TABLESPACE*/
FLD: QXDRPDB  LEN(4) TYPE(BIN) DISP(80)          /*# OF DROP DATABASE*/
FLD: QXDRPSY  LEN(4) TYPE(BIN) DISP(84)           /*# OF DROP SYNONYM*/
FLD: QXDRPST  LEN(4) TYPE(BIN) DISP(88)     /*# OF DROP STORAGE GROUP*/
FLD: QXDRPVU  LEN(4) TYPE(BIN) DISP(92)              /*# OF DROP VIEW*/
FLD: QXALTST  LEN(4) TYPE(BIN) DISP(96)    /*# OF ALTER STORAGE GROUP*/
FLD: QXFETCH  LEN(4) TYPE(BIN) DISP(100)                /*# OF FETCHS*/
FLD: QXALTTS  LEN(4) TYPE(BIN) DISP(104)      /*# OF ALTER TABLESPACE*/
FLD: QXALTTA  LEN(4) TYPE(BIN) DISP(108)           /*# OF ALTER TABLE*/
FLD: QXALTIX  LEN(4) TYPE(BIN) DISP(112)           /*# OF ALTER INDEX*/
FLD: QXCMTON  LEN(4) TYPE(BIN) DISP(116)            /*# OF COMMENT ON*/
FLD: QXLOCK   LEN(4) TYPE(BIN) DISP(120)            /*# OF LOCK TABLE*/
FLD: QXGRANT  LEN(4) TYPE(BIN) DISP(124)                 /*# OF GRANT*/
FLD: QXREVOK  LEN(4) TYPE(BIN) DISP(128)                /*# OF REVOKE*/
FLD: QXINCRB  LEN(4) TYPE(BIN) DISP(132)
                          /*# OF INCREMENTAL BINDS EXCLUDING PREPARES*/
FLD: QXLABON  LEN(4) TYPE(BIN) DISP(136)              /*# OF LABEL ON*/
FLD: QXSETSQL LEN(4) TYPE(BIN) DISP(140)   /*# OF Set Current SQLID 1*/
FLD: QXCRALS  LEN(4) TYPE(BIN) DISP(144)        /*# OF CREATE ALIAS 2*/
FLD: QXDRPAL  LEN(4) TYPE(BIN) DISP(148)          /*# OF DROP ALIAS 2*/
FLD: QXMIAP   LEN(4) TYPE(BIN) DISP(152)
                        /*# of times RID list processing used. This 9*/
*                           field is incremented once for a given     9
*                           table access for Index Access with list   9
*                           prefetch and for Multiple Index Access.   9
FLD: QXNSMIAP LEN(4) TYPE(BIN) DISP(156)
                           /*# of times a RID list was not used for 9*/
*                           a given RID list process involving one    9
*                           index (Index Access with list prefetch)   9
*                           or involving multiple indexes (Multiple   9
*                           Index Access) because no storage was      9
*                           available to hold the list of RIDs.       9
FLD: QXMRMIAP LEN(4) TYPE(BIN) DISP(160)
                        /*# of times one or more RID lists were not 9*/
*                           used for a given RID list process involving
*                           one indx (Index Access with list prefetch)9
*                           or involving multiple indexes (Multiple   9
*                           Index Access) because the number of RIDs  9
*                           exceeded one or more internal limits.     9
FLD: QXSETHV  LEN(4) TYPE(BIN) DISP(164)
                            /*# OF Set Host Variable statements, we 6*/
*                           don't trace the contents of the special   6
*                           register.                                 6
FLD: QXALDAB  LEN(4) TYPE(BIN) DISP(168)      /*# OF ALTER DATABASE 7*/
FLD: QXDRPPKG LEN(4) TYPE(BIN) DISP(172)
                                  /*# OF DROP PACKAGE STATEMENTS 8*/
FLD: QXDSCRTB LEN(4) TYPE(BIN) DISP(176)
                                  /*# OF DESCRIBE TABLE STATEMENTS 8*/
FLD: QXMAXDEG LEN(4) TYPE(BIN) DISP(180)
                          /*Maximum degree of parallelism among the A*/
*                           parallel groups to indicate the extent to A
*                           which query parallelism applies.          A
FLD: QXTOTGRP LEN(4) TYPE(BIN) DISP(184)
                         /*Total number of parallel groups executed A*/
FLD: QXDEGCUR LEN(4) TYPE(BIN) DISP(188)
                            /*Total number pf parallel groups which A*/
*                           fell back to sequential mode because the  A
*                           cursor may be used in UPDATE/DELETE.      A
FLD: QXDEGESA LEN(4) TYPE(BIN) DISP(192)
                        /*Total number of parallel groups which fellA*/
*                           back to sequential mode due to lack of    A
*                           ESA sort support.                         A
FLD: QXDEGBUF LEN(4) TYPE(BIN) DISP(196)
                        /*Total number of parallel groups that have C*/
*                           a planned degree greater than one at run  C
*                           time, but fell back to sequential mode    C
*                           because of storage shortage or contention C
*                           on the buffer pool.                       C
FLD: QXREDGRP LEN(4) TYPE(BIN) DISP(200)
                        /*Total number of parallel groups that have C*/
*                           a planned degree greater than one at run  C
*                           time, but were processed to a parallel    C
*                           degree less than planned because of a     C
*                           storage shortage or contention on the     C
*                           buffer pool.                              C
FLD: QXNORGRP LEN(4) TYPE(BIN) DISP(204)
                        /*Total number of parallel groups that have C*/
*                           a planned degree greater than one at run  C
*                           time, and were executed to the same degreeC
*                           because of sufficient storage on the      C
*                           buffer pool.                              C
FLD: QXCON1   LEN(4) TYPE(BIN) DISP(208)
                          /*# of CONNECT type 1 statements executed B*/
FLD: QXCON2   LEN(4) TYPE(BIN) DISP(212)
                          /*# of CONNECT type 2 statements executed B*/
FLD: QXREL    LEN(4) TYPE(BIN) DISP(216)
                                 /*# of RELEASE statements executed B*/
FLD: QXSETCON LEN(4) TYPE(BIN) DISP(220)
                          /*# of SET CONNECTION statements executed B*/
FLD: QXSETCDG LEN(4) TYPE(BIN) DISP(224)
                               /*# of SET CURRENT DEGREE statements A*/
*                           executed
FLD: QXSETCRL LEN(4) TYPE(BIN) DISP(228)
                                /*# of SET CURRENT RULES statements D*/
FLD: QXCALL   LEN(4) TYPE(BIN) DISP(232)
                                /*# of SQL CALL statements executed F*/
FLD: QXCALLAB LEN(4) TYPE(BIN) DISP(236)
                            /*# of times a stored procedure ABENDed F*/
FLD: QXCALLTO LEN(4) TYPE(BIN) DISP(240)
                           /*# of times an SQL CALL statement timed F*/
*                             out waiting to be scheduled             F
FLD: QXCALLRJ LEN(4) TYPE(BIN) DISP(244)
                             /*# of times an SQL CALL statement was F*/
*                             rejected                                F
FLD: QXDEGENC LEN(4) TYPE(BIN) DISP(248)
                         /*Total number of parallel groups executed G*/
*                           in sequential mode due to the unavailable G
*                           enclave                                   G
FLD: QXRLFDPA LEN(1) DISP(252)
                              /*If non zero, then Query Parallelism J*/
*                           is disabled by the RLF for at least one   I
*                           dynamic SELECT statement in this thread.  I
*                           See IFCID 0022 from a PREPARE statement   I
*                           for detailed information at the statement I
*                           level.  This field is for accounting      I
*                           IFCID 0003 and does not apply to IFCID    I
*                           0002.                                     I
FLD: QXCOORNO LEN(4) TYPE(BIN) DISP(256)
                         /*Total number of parallel groups executed K*/
*                           on a single DB2 due to the COORDINATOR    K
*                           subsystem parameter being set to NO.      K
*                           When the statement was bound, the         K
*                           COORDINATOR subsystem parameter was       K
*                           set to YES.  This situation can also      K
*                           occur when a plan or package is bound on  K
*                           one DB2 where COORDINATOR=YES but is run  K
*                           on a DB2 where COORDINATOR=NO.            K
FLD: QXISORR  LEN(4) TYPE(BIN) DISP(260)
                         /*Total number of parallel groups executed K*/
*                           on a single DB2 due to repeatable-read    K
*                           or read-stability isolation.              K
FLD: QXCRGTT  LEN(4) TYPE(BIN) DISP(264)
                               /*# OF CREATE GLOBAL TEMPORARY TABLE M*/
FLD: QXSTREOP LEN(4) TYPE(BIN) DISP(268)
                             /*Total number of times reoptimization N*/
*                           occurs.  This field does not apply to     N
*                           IFCID 0002.                               N
FLD: QXXCBPNX LEN(4) TYPE(BIN) DISP(272)
                        /*Total number of parallel groups that were O*/
*                           intended to run across the data sharing   O
*                           group.  This count is only incremented on O
*                           the parallelism coordinator at run time.  O
FLD: QXXCSKIP LEN(4) TYPE(BIN) DISP(276)
                         /*The number of times that the parallelism O*/
*                           coordinator had to bypass a DB2 when      O
*                           distributing tasks because there was not  O
*                           enough buffer pool storage on one or more O
*                           DB2 members.  This field is incremented   O
*                           only on the parallelism coordinator, and  O
*                           it is only incremented once per parallel  O
*                           group, even though it is possible that    O
*                           more than one DB2 had a buffer pool       O
*                           shortage for that parallel group.         O
*                           The purpose of this count is to indicate  O
*                           when there are not enough buffers on a    O
*                           member.  Therefore, this count is         O
*                           incremented only when the buffer pool is  O
*                           defined to allow parallelism.  For        O
*                           example, if VPXPSEQT = 0 on an assistant, O
*                           DB2 does not send parallel work there, butO
*                           this count is not incremented.            O
FLD: QXALOCL  LEN(4) TYPE(BIN) DISP(280)
                           /*Number of ASSOCIATE LOCATOR statements P*/
*                           executed                                  P
FLD: QXALOCC  LEN(4) TYPE(BIN) DISP(284)
                             /*Number of ALLOCATE CURSOR statements P*/
*                           statements executed                       P
FLD: QXSTFND  LEN(4) TYPE(BIN) DISP(288)
                            /*The number of times a PREPARE request P*/
*                           was satisfied by making a copy from the   P
*                           prepared statement cache                  P
FLD: QXSTNFND LEN(4) TYPE(BIN) DISP(292)
                            /*The number of times a PREPARE request P*/
*                           was received but a matching statement was P
*                           not found in the prepared statement       P
*                           cache.  Cache search is only done for     P
*                           DML SQL and only if cache option is activeP
FLD: QXSTIPRP LEN(4) TYPE(BIN) DISP(296)
                             /*The number of times that an implicit P*/
*                           prepare was performed because the         P
*                           KEEPDYNAMIC(YES) option was used and an   P
*                           OPEN, EXECUTE or DESCRIBE of a dynamic    P
*                           statement occurred after a COMMIT but     P
*                           DB2 no longer had a valid copy of the     P
*                           executable version of the prepared        P
*                           statement                                 P
FLD: QXSTNPRP LEN(4) TYPE(BIN) DISP(300)
                           /*The number of times that a prepare was P*/
*                           avoided because KEEPDYNAMIC(YES) was      P
*                           used along with prepared statement        P
*                           caching and DB2 still had the application P
*                           process' copy of the executable version   P
*                           of the prepared statement                 P
FLD: QXSTDEXP LEN(4) TYPE(BIN) DISP(304)
                          /*The number of times that an application P*/
*                           process' executable copy of a prepared    P
*                           statement was discarded due to the        P
*                           MAXKEEPD system limit being exceeded      P
FLD: QXSTDINV LEN(4) TYPE(BIN) DISP(308)
                              /*The number of times that a prepared P*/
*                           statement was purged from the cache       P
*                           because a DROP, ALTER, or REVOKE          P
*                           statement was issued on a dependent       P
*                           object.                                   P
FLD: QXRNTAB  LEN(4) TYPE(BIN) DISP(312)        /*# OF RENAME TABLE Q*/
FLD: QXCTRIG  LEN(4) TYPE(BIN) DISP(316)      /*# OF CREATE TRIGGER R*/
FLD: QXDRPTR  LEN(4) TYPE(BIN) DISP(320)        /*# OF DROP TRIGGER R*/
FLD: QXSETPTH LEN(4) TYPE(BIN) DISP(324)
                                 /*# OF SET CURRENT PATH statements S*/
FLD: QXDRPFN  LEN(4) TYPE(BIN) DISP(328)
                                  /*# OF DROP USER DEFINED FUNCTION T*/
FLD: QXDRPPR  LEN(4) TYPE(BIN) DISP(332)      /*# OF DROP PROCEDURE T*/
FLD: QXCDIST  LEN(4) TYPE(BIN) DISP(336)
                             /*# OF CREATE DISTINCT TYPE statements U*/
FLD: QXDDIST  LEN(4) TYPE(BIN) DISP(340)
                               /*# OF DROP DISTINCT TYPE statements U*/
FLD: QXCRUDF  LEN(4) TYPE(BIN) DISP(344)
                                  /*# OF CREATE FUNCTION statements V*/
FLD: QXCRPRO  LEN(4) TYPE(BIN) DISP(348)
                                 /*# OF CREATE PROCEDURE statements c*/
FLD: QXHOLDL  LEN(4) TYPE(BIN) DISP(352)
                                  /*# OF HOLD LOCATOR statements W*/
FLD: QXFREEL  LEN(4) TYPE(BIN) DISP(356)
                                  /*# OF FREE LOCATOR statements W*/
FLD: QXREPOP1 LEN(4) TYPE(BIN) DISP(360)
                        /*Total number of parallel groups for which X*/
*                           DB2 reformulated the parallel portion of  X
*                           the access path because the sysplex       X
*                           configuration was different from the      X
*                           sysplex configuration at bind time.       X
*                           This counter is only incremented by the   X
*                           parallelism coordinator at run time.      X
FLD: QXREPOP2 LEN(4) TYPE(BIN) DISP(364)
                        /*Total number of parallel groups for which X*/
*                           DB2 reformulated the paralllel portion of X
*                           the access path because there was not     X
*                           enough buffer pool resource.              X
*                           This counter is only incremented by the   X
*                           parallelism coordinator at run time.      X
FLD: QXCRATB  LEN(4) TYPE(BIN) DISP(368)
                                 /*# OF CREATE AUX TABLE statements c*/
FLD: QXSTLOBV LEN(4) TYPE(BIN) DISP(372)
                                  /*Max storage used for LOB values Y*/
*                           In KB for accounting, in MB for statisticsY
FLD: QXALUDF  LEN(4) TYPE(BIN) DISP(376)
                                  /*# OF ALTER FUNCTION statements Z*/
FLD: QXALPRO  LEN(4) TYPE(BIN) DISP(380)
                                  /*# OF ALTER PROCEDURE statements Z*/
FLD: QXROIMAT LEN(4) TYPE(BIN) DISP(384)
                            /*# of times that direct row access was a*/
*                           successful
FLD: QXROIIDX LEN(4) TYPE(BIN) DISP(388)
                          /*# of times an attempt to use direct row a*/
*                           access reverted to using an index to      a
*                           locate a record
FLD: QXROITS  LEN(4) TYPE(BIN) DISP(392)
                          /*# of times an attempt to use direct row a*/
*                           access reverted to using a table space    a
*                           scan to locate a record
FLD: QXSTTRG  LEN(4) TYPE(BIN) DISP(396)
                               /*# of times a statement trigger was b*/
*                           activated                                 b
FLD: QXROWTRG LEN(4) TYPE(BIN) DISP(400)
                           /*# of times a row trigger was activated b*/
FLD: QXTRGERR LEN(4) TYPE(BIN) DISP(404)
                          /*# of times an SQL error occurred during b*/
*                           execution of a triggered action           b
FLD: QXCASCDP LEN(4) TYPE(BIN) DISP(408)
                                  /*The maximum level of nested SQL b*/
*                           cascading.  This includes cascading       b
*                           due to triggers, UDFs and stored          b
*                           procedures.                               b
FLD: QXCAUD   LEN(4) TYPE(BIN) DISP(412)
                             /*# of user defined functions executed d*/
FLD: QXCAUDAB LEN(4) TYPE(BIN) DISP(416) /*# of times a UDF ABENDed d*/
FLD: QXCAUDTO LEN(4) TYPE(BIN) DISP(420)
                            /*# of times a UDF timed out waiting to d*/
*                             be scheduled                            d
FLD: QXCAUDRJ LEN(4) TYPE(BIN) DISP(424)
                                  /*# of times a UDF was rejected d*/
FLD: QXSETCPR LEN(4) TYPE(BIN) DISP(428)
                               /*# SET CURRENT PRECISION statements e*/
*                             executed                                e
FLD: QXDCLGTT LEN(4) TYPE(BIN) DISP(432)
                        /*# of DECLARE GLOBAL TEMPORARY TABLE stmts f*/
FLD: QXDEGDTT LEN(4) TYPE(BIN) DISP(436)
                         /*Total number of parallel groups that are f*/
*                           part of a query block using a UDF and     f
*                           executed on a single DB2 due to           f
*                           the existence of a Declared Temporary     f
*                           Table in the application process. Neither f
*                           the query block nor the parallel group    f
*                           references a Declared Temporary Table, andf
*                           a parallel group may or may not use a UDF.f
FLD: QXCRESEQ LEN(4) TYPE(BIN) DISP(440)      /*# OF CREATE SEQUENCES*/
FLD: QXALTSEQ LEN(4) TYPE(BIN) DISP(444)       /*# OF ALTER SEQUENCES*/
FLD: QXDROSEQ LEN(4) TYPE(BIN) DISP(448)        /*# OF DROP SEQUENCES*/
FLD: QXPRRESI LEN(4) TYPE(BIN) DISP(452)
                                /*# of PREPAREs for which use of an i*/
*                           index/indexes were restricted because the i
*                           index was in a pending state.             i
FLD: QXALTVW  LEN(4) TYPE(BIN) DISP(456)          /*# of ALTER VIEW j*/
FLD: QXALTJR  LEN(4) TYPE(BIN) DISP(460)           /*# OF ALTER JAR k*/
FLD: QXMERGE  LEN(4) TYPE(BIN) DISP(464)
                          /*# OF times MERGE statement was executed m*/
FLD: QXTRTBL  LEN(4) TYPE(BIN) DISP(468)
                           /*# of times TRUNCATE TABLE was executed n*/
FLD: QXCRROL  LEN(4) TYPE(BIN) DISP(472)         /*# OF CREATE ROLE o*/
FLD: QXDRPROL LEN(4) TYPE(BIN) DISP(476)           /*# OF DROP ROLE o*/
FLD: QXCRCTX  LEN(4) TYPE(BIN) DISP(480)
                                  /*# OF CREATE TRUSTED CONTEXT o*/
FLD: QXALTCTX LEN(4) TYPE(BIN) DISP(484)
                                  /*# OF ALTER TRUSTED CONTEXT o*/
FLD: QXDRPCTX LEN(4) TYPE(BIN) DISP(488)
                                  /*# OF DROP TRUSTED CONTEXT o*/
FLD: QXRNIX   LEN(4) TYPE(BIN) DISP(492)        /*# OF RENAME INDEX u*/
FLD: QXSTXMLV LEN(4) TYPE(BIN) DISP(496)
                                /*# Max storage used for XML values q*/
FLD: QXRWSFETCHD LEN(8) TYPE(BIN) DISP(504)
                                  /*# Number of Rows Fetched @161*/
FLD: QXRWSINSRTD LEN(8) TYPE(BIN) DISP(512)
                                  /*# Number of Rows Inserted @161*/
FLD: QXRWSUPDTD LEN(8) TYPE(BIN) DISP(520)
                                  /*# Number of Rows Updated @161*/
FLD: QXRWSDELETD LEN(8) TYPE(BIN) DISP(528)
                                  /*# Number of Rows Deleted @161*/
FLD: QXSTEND  LEN(4) TYPE(BIN) DISP(536) /*END OF RDS ACCOUNTING AREA*/


*******************************************************************
*   QTST    DSNDQTST   *   SERVICE CONTROLLER STATISTICS
*******************************************************************
***********************************************************************
**** DSNDQTST DSECT                TABLE OF SCC COUNTERS                
***********************************************************************

COMP: QTST_OFFSET =
           WHEN(SM100RTY=100 AND QWS10R2N > 0) ASSIGN(QWS10R2O)
           ELSE                                ASSIGN(99999)
FLD: DSNDQTST DISP(0) LEN(1) OFFSET(QTST_OFFSET)
                                  /*TABLE OF SCC COUNTERS*/
FLD: QTST     LEN(8) DISP(0)
FLD: QTHEAD   LEN(4) TYPE(BIN) DISP(0)         /*CONTROL BLOCK HEADER*/
FLD: QTID     TYPE(HALF) DISP(0)  /*CONTROL BLOCK ID*/
FLD: QTLEN    TYPE(HALF) DISP(2)  /*CONTROL BLOCK LENGTH*/
FLD: QTEYE    LEN(4) DISP(4)      /*CONTROL BLOCK EYE CATCHER*/
FLD: QTSTATS  LEN(4) TYPE(BIN) DISP(8)                   /*STATISTICS*/
FLD: QTALLOCA LEN(4) TYPE(BIN) DISP(8)          /*ALLOCATION ATTEMPTS*/
FLD: QTALLOC  LEN(4) TYPE(BIN) DISP(12)      /*SUCCESSFUL ALLOCATIONS*/
FLD: QTABINDA LEN(4) TYPE(BIN) DISP(16)     /*AUTOMATIC BIND ATTEMPTS*/
FLD: QTABIND  LEN(4) TYPE(BIN) DISP(20)  /*SUCCESSFUL AUTOMATIC BINDS*/
FLD: QTINVRID LEN(4) TYPE(BIN) DISP(24)        /*INVALID RESOURCE IDS*/
FLD: QTBINDA  LEN(4) TYPE(BIN) DISP(28)     /*BIND (ADD) SUB COMMANDS*/
FLD: QTBINDR  LEN(4) TYPE(BIN) DISP(32) /*BIND (REPLACE) SUB COMMANDS*/
FLD: QTTESTB  LEN(4) TYPE(BIN) DISP(36)     /*TEST BINDS (NO PLAN ID)*/
FLD: QTPLNBD  LEN(4) TYPE(BIN) DISP(40)                 /*PLANS BOUND*/
FLD: QTREBIND LEN(4) TYPE(BIN) DISP(44)         /*REBIND SUB COMMANDS*/
FLD: QTRBINDA LEN(4) TYPE(BIN) DISP(48)   /*ATTEMPTS TO REBIND A PLAN*/
FLD: QTPLNRBD LEN(4) TYPE(BIN) DISP(52)               /*PLANS REBOUND*/
FLD: QTFREE   LEN(4) TYPE(BIN) DISP(56)           /*FREE SUB COMMANDS*/
FLD: QTFREEA  LEN(4) TYPE(BIN) DISP(60)     /*ATTEMPTS TO FREE A PLAN*/
FLD: QTPLNFRD LEN(4) TYPE(BIN) DISP(64)                 /*PLANS FREED*/
FLD: QTAUCHK  LEN(4) TYPE(BIN) DISP(68)
                               /*TOTAL NUMBER OF AUTHORIZATION CHECKS*/
FLD: QTAUSUC  LEN(4) TYPE(BIN) DISP(72)
                                  /*TOTAL NUMBER OF SUCCESSFUL AUTH*/
*                                   CHECKS
FLD: QTDSOPN  LEN(4) TYPE(BIN) DISP(76)
                                  /*NUMBER OF DATASETS CURRENTLY OPEN*/
FLD: QTMAXDS  LEN(4) TYPE(BIN) DISP(80)
                                 /*MAXIMUM NUMBER OF DS OPENED CONCUR*/
FLD: QTAUCCH  LEN(4) TYPE(BIN) DISP(84)
                                  /*#SUCCESSFUL AUTH CHECKS FOR PLANS*/
*                                   USING A PLAN CACHE OR PUBLIC AUTH
*                                   CHECK (QTAUPUB)
FLD: QTAUPUB  LEN(4) TYPE(BIN) DISP(88)
                                  /*#SUCCESSFUL AUTH CHECKS FOR PLAN*/
*                                   EXECUTE AUTHORITY HELD BY PUBLIC
FLD: QTMAXPB  LEN(4) TYPE(BIN) DISP(92)
                                  /*MAXIMUM NOT IN USE DATA SETS*/
FLD: QTPACAUT LEN(4) TYPE(BIN) DISP(96)
                               /*#SUCCESSFUL AUTH CHECKS FOR PACKAGES*/
*                                   USING THE PACKAGE AUTH CACHE--
*                                   INCLUDES PUBLIC AUTH CHECKS
*                                   (QTPACPUB)
FLD: QTPACPUB LEN(4) TYPE(BIN) DISP(100)
                                /*#SUCCESSFUL AUTH CHECKS FOR PACKAGE*/
*                                   EXECUTE AUTHORITY HELD BY PUBLIC
FLD: QTPACNOT LEN(4) TYPE(BIN) DISP(104)
                                /*#PACKAGE AUTH CHECKS THAT COULD NOT*/
*                                   MAKE USE OF THE PACKAGE AUTH CACHE
FLD: QTREOPN  LEN(4) TYPE(BIN) DISP(108)
                                  /*# OF TIMES THAT NOT IN USE OPEN*/
*                                  DATA SETS BECAME IN-USE
FLD: QTPACOW1 LEN(4) TYPE(BIN) DISP(112)
                                 /*# OF TIMES DB2 OVERWROTE AN AUTHID*/
*                                  IN THE PACKAGE AUTH CACHE
FLD: QTPACOW2 LEN(4) TYPE(BIN) DISP(116)
                                 /*# OF TIMES DB2 OVERWROTE A PACKAGE*/
*                                  ENTRY IN THE PACKAGE AUTH CACHE
FLD: QTDSDRN  LEN(4) TYPE(BIN) DISP(124)
                                  /*# OF NOT IN USE DATA SETS CLOSED*/
*                                  DUE TO DSMAX/DD LIMIT
FLD: QTPCCT   LEN(4) TYPE(BIN) DISP(128)
                                  /*# OF INFREQUENTLY UPDATED DATA*/
*                                  SETS THAT ARE CONVERTED FROM
*                                  R/W TO R/O STATE
FLD: QTSLWDD  LEN(4) TYPE(BIN) DISP(132)
                                  /*# OF DATA SETS THAT ARE NOT*/
*                                  IN-USE, BUT ARE NOT CLOSED
FLD: QTBINDPA LEN(4) TYPE(BIN) DISP(136)
                                  /*BIND (ADD) PACKAGE SUB COMMANDS*/
FLD: QTBINDPR LEN(4) TYPE(BIN) DISP(140)
                                  /*BIND (REP) PACKAGE SUB COMMANDS*/
FLD: QTPKGBD  LEN(4) TYPE(BIN) DISP(144)           /*# PACKAGES BOUND*/
FLD: QTRBINDP LEN(4) TYPE(BIN) DISP(148)
                                  /*REBIND PACKAGE SUB COMMANDS*/
FLD: QTRBNDPA LEN(4) TYPE(BIN) DISP(152)
                                  /*ATTEMPTS TO REBIND A PACKAGE*/
FLD: QTPKGRBD LEN(4) TYPE(BIN) DISP(156)         /*# PACKAGES REBOUND*/
FLD: QTFREEP  LEN(4) TYPE(BIN) DISP(160)  /*FREE PACKAGE SUB COMMANDS*/
FLD: QTFREEAP LEN(4) TYPE(BIN) DISP(164) /*ATTEMPTS TO FREE A PACKAGE*/
FLD: QTPKGFRD LEN(4) TYPE(BIN) DISP(168)           /*# PACKAGES FREED*/
FLD: QTAUTOBA LEN(4) TYPE(BIN) DISP(172)
                                  /*ATTEMPTS TO AUTOBIND A PACKAGE*/
FLD: QTPKABND LEN(4) TYPE(BIN) DISP(176)       /*# PACKAGES AUTOBOUND*/
FLD: QTPKALLA LEN(4) TYPE(BIN) DISP(180)
                                  /*ATTEMPTS TO ALLOCATE A PACKAGE*/
FLD: QTPKALL  LEN(4) TYPE(BIN) DISP(184)       /*# PACKAGES ALLOCATED*/
FLD: QTRACAUT LEN(4) TYPE(BIN) DISP(200)
                               /*#SUCCESSFUL AUTH CHECKS FOR ROUTINES*/
*                                   USING THE ROUTINE AUTH CACHE--
*                                   INCLUDES PUBLIC AUTH CHECKS
*                                   (QTRACPUB)
FLD: QTRACPUB LEN(4) TYPE(BIN) DISP(204)
                                /*#SUCCESSFUL AUTH CHECKS FOR ROUTINE*/
*                                   EXECUTE AUTHORITY HELD BY PUBLIC
FLD: QTRACNOT LEN(4) TYPE(BIN) DISP(208)
                                /*#ROUTINE AUTH CHECKS THAT COULD NOT*/
*                                   MAKE USE OF THE ROUTINE AUTH CACHE
FLD: QTRACOW1 LEN(4) TYPE(BIN) DISP(212)
                                 /*# OF TIMES DB2 OVERWROTE AN AUTHID*/
*                                  IN THE ROUTINE AUTH CACHE
FLD: QTRACOW2 LEN(4) TYPE(BIN) DISP(216)
                                 /*# OF TIMES DB2 OVERWROTE A ROUTINE*/
*                                  ENTRY IN THE ROUTINE AUTH CACHE
FLD: QTRACNAC LEN(4) TYPE(BIN) DISP(220)
                                 /*# OF TIMES DB2 WAS NOT ABLE TO ADD*/
*                                  AN ENTRY TO THE ROUTINE AUTH CACHE
FLD: QTSTEND  LEN(4) TYPE(BIN) DISP(256)


*******************************************************************
*   QBST    DSNDQBST   *   BUFFER MANAGER STATISTICS
*******************************************************************
***********************************************************************
**** DSNDQBST DSECT                                                     
***********************************************************************

COMP: QBST_OFFSET =
           WHEN(SM100RTY=100 AND QWS10R3N > 0) ASSIGN(QWS10R3O)
           ELSE                                ASSIGN(99999)
FLD: DSNDQBST DISP(0) LEN(1) OFFSET(QBST_OFFSET)
FLD: QBST     LEN(8) DISP(0)
FLD: QBSTPID  LEN(4) TYPE(BIN) DISP(0)               /*BUFFER POOL ID*/
FLD: QBSTGET  LEN(4) TYPE(BIN) DISP(4)
                              /*# OF GET PAGE REQUESTS. INCLUDES BOTH*/
*                             CONDITIONAL AND NON-CONDITIONAL,
*                             SUCCESSFUL AND UNSUCCESSFUL REQUESTS
FLD: QBSTRIO  LEN(4) TYPE(BIN) DISP(8)
                           /*# OF SYNC. READ I/O OPERATIONS PERFORMED*/
FLD: QBSTDWV  LEN(4) TYPE(BIN) DISP(12)
                                 /*# OF TIMES VERTICAL DEFERRED WRITE*/
*                             THRESHOLD REACHED
FLD: QBSTXFL  LEN(4) TYPE(BIN) DISP(16)
                            /*# OF GETPAGE FAILURES DUE TO VPOOL FULL*/
FLD: QBSTXFV  LEN(4) TYPE(BIN) DISP(20)
                          /*# OF EXPANSION FAILURE DUE TO SHORTAGE OF*/
*                             VIRTUAL STORAGE
FLD: QBSTSWS  LEN(4) TYPE(BIN) DISP(24)
                                  /*# OF SETW ISSUED FOR SYSTEM PAGES*/
FLD: QBSTPWS  LEN(4) TYPE(BIN) DISP(32)
                                  /*# OF PAGE WRITES FOR SYSTEM PAGES*/
FLD: QBSTWIO  LEN(4) TYPE(BIN) DISP(40)
                         /*# OF ASYNC. WRITE I/O OPERATIONS PERFORMED*/
FLD: QBSTCBA  LEN(4) TYPE(BIN) DISP(44) /*# OF CURRENT ACTIVE BUFFERS*/
FLD: QBSTRPI  LEN(4) TYPE(BIN) DISP(48)
                                 /*# OF PAGE IN REQUIRED FOR READ I/O*/
FLD: QBSTWPI  LEN(4) TYPE(BIN) DISP(52)
                                /*# OF PAGE IN REQUIRED FOR WRITE I/O*/
FLD: QBSTDSO  LEN(4) TYPE(BIN) DISP(56)
                                 /*# OF DATA SETS OPENED SUCCESSFULLY*/
FLD: QBSTIMW  LEN(4) TYPE(BIN) DISP(60)
                                /*# OF IMMED (SYNCHRONOUS) WRITE I/OS*/
FLD: QBSTSEQ  LEN(4) TYPE(BIN) DISP(64) /*# OF SEQ PREFETCH REQUESTED*/
FLD: QBSTSPP  LEN(4) TYPE(BIN) DISP(68)
                                 /*# OF PAGE READ DUE TO SEQ PREFETCH*/
FLD: QBSTSPD  LEN(4) TYPE(BIN) DISP(72)
                                  /*# OF SEQ PREFETCH DISABLED DUE TO*/
*                             UNAVAILABLE BUFFER RESOURCES
FLD: QBSTREE  LEN(4) TYPE(BIN) DISP(76)
                                  /*# OF SEQ PREFETCH DISABLED DUE TO*/
*                             UNAVAILABLE READ ENGINE
FLD: QBSTDWT  LEN(4) TYPE(BIN) DISP(84)
                           /*# OF TIMES THAT DEFERRED WRITE THRESHOLD*/
*                             IS REACHED
FLD: QBSTDMC  LEN(4) TYPE(BIN) DISP(88)
                            /*# OF TIMES THAT THE DATA MANAGER BUFFER*/
*                             CRITICAL THRESHOLD HAS BEEN REACHED
FLD: QBSTMIG  LEN(4) TYPE(BIN) DISP(92)
                                 /*# OF TIMES THAT MIGRATED DATA SETS*/
*                             ENCOUNTERED
FLD: QBSTRTO  LEN(4) TYPE(BIN) DISP(96)        /*# OF RECALL TIMEOUTS*/
FLD: QBSTPIO  LEN(4) TYPE(BIN) DISP(100)
                         /*# OF SEQ PREFETCH (ASYNCHRONOUS) READ I/OS*/
FLD: QBSTWKPD LEN(4) TYPE(BIN) DISP(104)
                             /*# OF WK PREFETCH ABORTED DUE TO A ZERO*/
*                             PREFETCH QUANTITY
FLD: QBSTMAX  LEN(4) TYPE(BIN) DISP(108)
                              /*# OF WK FILE CANNOT BE CREATED DUE TO*/
*                             INSUFFICIENT BUFFER RESOURCES
FLD: QBSTWFM  LEN(4) TYPE(BIN) DISP(112)
                              /*MAXIMUM WORKFILES EVER BEEN ALLOCATED*/
*                             DURING THE SORT/MERGE PROCESSING
FLD: QBSTWDRP LEN(4) TYPE(BIN) DISP(116)
                          /*# OF PAGES FOR WHICH DESTRUCTIVE READ WAS*/
*                             REQUESTED
FLD: QBSTWBVQ LEN(4) TYPE(BIN) DISP(120)
                         /*# OF PAGES DEQUEUED FROM DATA SET DEFERRED*/
*                             WRITE QUEUE FOR DESTRUCTIVE READ REQUEST
FLD: QBSTWFR  LEN(4) TYPE(BIN) DISP(124)
                            /*COUNT OF REQUESTS TO QUERY FOR WORFILES*/
*                             IN THE PROCESS OF SORT/MERGE
FLD: QBSTWFT  LEN(4) TYPE(BIN) DISP(128)
                          /*SUM OF WORKFILES THAT HAVE BEEN REQUESTED*/
*                             DURING THE SORT/MERGE PROCESSING
FLD: QBSTWFD  LEN(4) TYPE(BIN) DISP(132)
                             /*SUM OF WORKFILES THAT HAVE BEEN DENIED*/
*                             DURING THE SORT/MERGE PROCESSING
FLD: QBSTWFF  LEN(4) TYPE(BIN) DISP(136)
                                 /*# OF TIMES SORT/MERGE COULD NOT BE*/
*                             EFFICIENTLY PERFORMED DUE TO THE BUFFER
*                             SHORTAGE
FLD: QBSTLPF  LEN(4) TYPE(BIN) DISP(140)
                                  /*# OF LIST PREFETCH REQUESTED*/
*                             CONCURRENT PREFETCH AGAINST SAME PAGESET
FLD: QBSTDPF  LEN(4) TYPE(BIN) DISP(144)
                                  /*# OF DYNAMIC PREFETCH REQUESTED*/
FLD: QBSTVPA  LEN(4) TYPE(BIN) DISP(148)
                               /*# OF SUCCESSFUL VPOOL EXP/CONTRATION*/
FLD: QBSTPCO  LEN(4) TYPE(BIN) DISP(152)
                                  /*# OF PG on 'unlock castout'*/
FLD: QBSTCIO  LEN(4) TYPE(BIN) DISP(156)        /*# OF I/O on castout*/
FLD: QBSTVPL  LEN(4) TYPE(BIN) DISP(180)
                            /*# OF BUFFERS ALLOCATED FOR VIRTUAL POOL*/
FLD: QBSTDPP  LEN(4) TYPE(BIN) DISP(188)
                             /*# OF PAGE READ DUE TO DYNAMIC PREFETCH*/
FLD: QBSTLPP  LEN(4) TYPE(BIN) DISP(192)
                                /*# OF PAGE READ DUE TO LIST PREFETCH*/
FLD: QBSTDIO  LEN(4) TYPE(BIN) DISP(196)
                               /*# OF DYNAMIC PREFETCH (ASYNCHRONOUS)*/
*                             READ I/OS
FLD: QBSTLIO  LEN(4) TYPE(BIN) DISP(200)
                         /*# OF LIST PREFETCH (ASYNCHRONOUS) READ I/O*/
FLD: QBSTSGT  LEN(4) TYPE(BIN) DISP(204)
                         /*# OF GET PAGE ISSUED BY SEQUENTIAL REQUEST*/
FLD: QBSTSIO  LEN(4) TYPE(BIN) DISP(208)
                           /*# OF SYNC. READ I/O OPERATIONS PERFORMED*/
*                             BY SEQUENTIAL REQUESTS
FLD: QBSTDWC  LEN(4) TYPE(BIN) DISP(212)           /*RESERVED KEF0230*/
FLD: QBSTDWX  LEN(4) TYPE(BIN) DISP(216)           /*RESERVED KEF0230*/
FLD: QBSTALX  LEN(4) TYPE(BIN) DISP(220)           /*RESERVED KEF0230*/
FLD: QBSTNGT  LEN(4) TYPE(BIN) DISP(224)
                             /*# OF UNSUCCESSFUL GETPAGE DUE TO CONDI*/
*                             TIONAL GETPAGE REQUEST
FLD: QBSTXIS  LEN(4) TYPE(BIN) DISP(228)
                        /*HIGHEST PREFETCH I/O STREAMS HAVE EVER BEEN*/
*                             ALLOCATED
FLD: QBSTJIS  LEN(4) TYPE(BIN) DISP(232)
                         /*# OF PREFETCH I/O STREAMS HAVE BEEN DENIED*/
*                             DUE TO THE SHORTAGE OF BUFFERPOOL
*                             FOR EXAMPLE, IF 100 PREFETCH I/O STREAMS
*                             ARE REQUESTED AND ONLY 80 ARE GRANTED,
*                             THEN 20 WILL BE ADDED TO THIS COUNTER.
FLD: QBSTPQO  LEN(4) TYPE(BIN) DISP(236)
                         /*TOTAL # OF NEGOTIATIONS BETWEEN BM AND RDS*/
*                             RUNTIME TO SUPPORT PARALLELISM
FLD: QBSTPQF  LEN(4) TYPE(BIN) DISP(240)
                               /*# OF TIMES PARALLELISM HAS BEEN DOWN*/
*                             GRADED DUE TO THE SHORTAGE OF BUFFERPOOL
FLD: QBSTPL1  LEN(4) TYPE(BIN) DISP(244)
                           /*TOTAL # OF OCCURRENCES WHEN PREFETCH QTY*/
*                             DECREASED FROM NORMAL TO HALF OF NORMAL.
*                             NORMAL IS BASED ON THE BUFFER POOL SIZE
FLD: QBSTPL2  LEN(4) TYPE(BIN) DISP(248)
                           /*TOTAL # OF OCCURRENCES WHEN PREFETCH QTY*/
*                             DECREASED FROM HALF OF NORMAL TO
*                             ONE QUARTER OF NORMAL.  NORMAL IS
*                             BASED ON THE BUFFER POOL SIZE.
FLD: QBSTLPL  LEN(4) TYPE(BIN) DISP(272)
                                  /*# of times one or more pages were*/
*                             added to LPL
FLD: QBSTEND  LEN(4) TYPE(BIN) DISP(276)


*******************************************************************
*   QIST    DSNDQIST   *   DATA MANAGER STATISTICS - V2R2
*******************************************************************
***********************************************************************
**** DSNDQIST DSECT                TABLE OF SCC COUNTERS                
***********************************************************************

COMP: QIST_OFFSET =
           WHEN(SM100RTY=100 AND QWS10R4N > 0) ASSIGN(QWS10R4O)
           ELSE                                ASSIGN(99999)
FLD: DSNDQIST DISP(0) LEN(1) OFFSET(QIST_OFFSET)
                                  /*TABLE OF SCC COUNTERS*/
FLD: QIST     LEN(8) DISP(0)
FLD: QIHEAD   LEN(4) TYPE(BIN) DISP(0)         /*CONTROL BLOCK HEADER*/
FLD: QIID     LEN(2) DISP(0)      /*CONTROL BLOCK ID*/
FLD: QILEN    TYPE(HALF) DISP(2)  /*CONTROL BLOCK LENGTH*/
FLD: QIEYE    LEN(4) DISP(4)      /*CONTROL BLOCK EYE CATCHER*/
FLD: QISTATS  LEN(4) TYPE(BIN) DISP(8)                   /*STATISTICS*/
FLD: QISTRLLM LEN(4) TYPE(BIN) DISP(8)      /*THE NUMBER OF TIMES RID*/
*                                  /* LIST PROCESSING TERMINATED */
*                                  /* BECAUSE THE NUMBER OF RID  */
*                                  /* ENTRIES WAS GREATER THAN   */
*                                  /* THE RDS LIMIT.  THE RDS    */
*                                  /* LIMIT IS THE MAX(25% OF    */
*                                  /* TABLE SIZE, NUMBER OF RIDS */
*                                  /* THAT CAN FIT INTO THE      */
*                                  /* GUARANTEED NUMBER OF RID   */
*                                  /* BLOCKS.                    */
FLD: QISTRPLM LEN(4) TYPE(BIN) DISP(12)     /*THE NUMBER OF TIMES RID*/
*                                  /* LIST PROCESSING TERMINATED */
*                                  /* BECAUSE THE NUMBER OF RID  */
*                                  /* ENTRIES WAS GREATER THAN   */
*                                  /* THE DM LIMIT.  THE DM      */
*                                  /* LIMIT IS APPROXIMATELY     */
*                                  /* 26 MILLION RIDS.           */
FLD: QISTRHAC LEN(8) DISP(16)     /*DOUBLE WORD CONTAINING*/
*                                  /* BOTH QISTRHIG AND QISTRCUR */
*                                  /* NOTE:QISTRHIG AND QISTRCUR */
*                                  /* MUST REMAIN IN CONTIGUOUS  */
*                                  /* MEMORY AND ON A DOUBLE     */
*                                  /* WORD BOUNDARY              */
FLD: QISTRHIG LEN(4) TYPE(BIN) DISP(16)       /*HIGHEST NUMBER OF RID*/
*                                  /* BLOCKS IN USE AT ANY ONE   */
*                                  /* TIME SINCE DB2 STARTUP TIME*/
FLD: QISTRCUR LEN(4) TYPE(BIN) DISP(20)        /*NUMBER OF RID BLOCKS*/
*                                  /* CURRENTLY IN USE.          */
FLD: QISTRSTG LEN(4) TYPE(BIN) DISP(24)    /*NUMBER OF TIMES RID LIST*/
*                                  /* PROCESSING EXHAUSTED       */
*                                  /* VIRTUAL STORAGE            */
FLD: QISTRMAX LEN(4) TYPE(BIN) DISP(28) /*NUMBER OF TIMES THE MAXIMUM*/
*                                  /* RID POOL STORAGE WAS       */
*                                  /* EXCEEDED.  THE DEFAULT     */
*                                  /* MAXIMUM RID POOL SIZE IS   */
*                                  /* THE MIN(install value,     */
*                                  /* 10GB).                     */
*/*--------------------------------------------------------------*/
*/*  Total number of columns (rows x columns)                    */
*/*   for which a Select Procedure was bypassed                  */
*/*   because the Select Procedure was invalidated               */
*/*   by applying service to DB2.                                */
*/*   Everything will continue to function                       */
*/*   correctly, but with some degradation in                    */
*/*   performance.                                               */
*/*   To obtain optimum performance, whenever this               */
*/*   counter is not zero, rebind any affected                   */
*/*   plans or packages.                                         */
*/*--------------------------------------------------------------*/
FLD: QISTCOLS LEN(4) TYPE(BIN) DISP(32)     /*Total number of columns*/
FLD: QISTWFMU LEN(4) TYPE(BIN) DISP(36)  /*Maximum total storage used*/
*                                  /* in workfile db (MB)        */
FLD: QISTWFCU LEN(4) TYPE(BIN) DISP(40)  /*Current total whole MBs of*/
*                                  /* storage used in WF db.     */
FLD: QISTWFCK LEN(4) TYPE(BIN) DISP(44)    /*Current total fractional*/
*                                  /* MBs of storage used, in KB.*/
FLD: QISTWFMX LEN(4) TYPE(BIN) DISP(48)   /*Maximum allowable storage*/
*                                  /* usage limit per agent (MB) */
FLD: QISTWFNE LEN(4) TYPE(BIN) DISP(52) /*Number of times the maximum*/
*                                  /* allowable storage usage    */
*                                  /* limit was exceeded         */
FLD: QISTWF04 LEN(4) TYPE(BIN) DISP(56)        /*Total 4KB tablespace*/
*                                  /* storage used - whole MBs   */
FLD: QISTW04K LEN(4) TYPE(BIN) DISP(60)        /*Total 4KB tablespace*/
*                                  /* storage used - fractional  */
*                                  /* MBs expressed in KBs.      */
FLD: QISTWF32 LEN(4) TYPE(BIN) DISP(64)       /*Total 32KB tablespace*/
*                                  /* storage used - whole MBs   */
FLD: QISTW32K LEN(4) TYPE(BIN) DISP(68)       /*Total 32KB tablespace*/
*                                  /* storage used - fractional  */
*                                  /* MBs expressed in KBs.      */
FLD: QISTWFP1 LEN(4) TYPE(BIN) DISP(72)  /*How many times a 32KB page*/
*                                  /* TS was used when a 4KB     */
*                                  /* page TS was preferable     */
*                                  /* (but was not available)    */
FLD: QISTWFP2 LEN(4) TYPE(BIN) DISP(76)   /*How many times a 4KB page*/
*                                  /* TS was used when a 32KB    */
*                                  /* page TS was preferable     */
*                                  /* (but was not available)    */
FLD: QISTEND  LEN(4) TYPE(BIN) DISP(80)
*                    SCC STATISTICS DATA FOR TYPE 100 SUBTYPE 1 RECORD
*                    SCC ACCOUNTING DATA FOR TYPE 101 SUBTYPE 0 RECORD


*******************************************************************
*   QTXA    DSNDQTXA   *   LOCKING STATISTICS
*******************************************************************
***********************************************************************
**** DSNDQTXA DSECT                                                     
***********************************************************************

COMP: QTXA_OFFSET =
           WHEN(SM100RTY=100 AND QWS10R5N > 0) ASSIGN(QWS10R5O)
           ELSE                                ASSIGN(99999)
FLD: DSNDQTXA DISP(0) LEN(1) OFFSET(QTXA_OFFSET)
FLD: QTXA     LEN(8) DISP(0)
FLD: QTXADEA  LEN(4) TYPE(BIN) DISP(0)               /*Deadlock count*/
FLD: QTXASLOC LEN(4) TYPE(BIN) DISP(4)
                                  /*Number of suspends because of*/
*                                        lock conflicts
FLD: QTXATIM  LEN(4) TYPE(BIN) DISP(8)               /*Timeout counts*/
FLD: QTXALES  LEN(4) TYPE(BIN) DISP(12)  /*Count of lock escal shared*/
FLD: QTXALEX  LEN(4) TYPE(BIN) DISP(16)
                                  /*Count of lock escal exclusive*/
FLD: QTXANPL  LEN(4) TYPE(BIN) DISP(20)   /*Max number of page or row*/
*                                        locks held.
*                                        Not applicable for Statistics
*                                        IFCID 2.
FLD: QTXAFLG1 LEN(1) DISP(24)     /*First Flag Byte*/
COMP: QTXAILMT = X'80'            /*Infinite Limit*/
COMP: QTXANRUN = X'40'            /*No Run or Zero Limit*/
FLD: QTXARLID LEN(2) DISP(26)     /*Resource Limit Table ID*/
FLD: QTXAPREC LEN(4) TYPE(BIN) DISP(28)    /*How Limit was determined*/
COMP: QTXAPRC1 = 1                /*Limit from specific Authid*/
COMP: QTXAPRC2 = 2                /*Limit from specific Authid*/
COMP: QTXAPRC3 = 3                /*Limit from specific Planname*/
COMP: QTXAPRC4 = 4                /*Limit from blank Authid & Plan*/
COMP: QTXAPRC5 = 5                /*Limit from Install no entry*/
COMP: QTXAPRC6 = 6                /*Limit from Install I/O error*/
COMP: QTXAPRC7 = 7                /*Infinite limit user has*/
COMP: QTXAPRC8 = 8                /*Limit from specific Authid,*/
COMP: QTXAPRC9 = 9                /*Limit from specific Authid*/
COMP: QTXAPR10 = 10               /*Limit from specific Authid*/
COMP: QTXAPR11 = 11               /*Limit from Authid running*/
COMP: QTXAPR12 = 12               /*Limit from specific package*/
COMP: QTXAPR13 = 13               /*Limit from any Authid and*/
COMP: QTXAPR14 = 14               /*Limit from any Authid and*/
COMP: QTXAPR15 = 15               /*Limit from any Authid, pkg,*/
FLD: QTXASLMT LEN(4) TYPE(BIN) DISP(32)       /*Limit in SU's ASUTIME*/
FLD: QTXACLMT LEN(4) TYPE(BIN) DISP(36)
                                  /*Limit in CPU 16 microseconds*/
FLD: QTXACHUS LEN(4) TYPE(BIN) DISP(40)
                                  /*Highest CPU 16 microsecs used*/
FLD: QTXASLAT LEN(4) TYPE(BIN) DISP(44)
                                  /*Suspend count latch conflict*/
FLD: QTXASOTH LEN(4) TYPE(BIN) DISP(48)
                                  /*Suspend count other conflict*/
FLD: QTXALOCK LEN(4) TYPE(BIN) DISP(52)          /*Lock request count*/
FLD: QTXAUNLK LEN(4) TYPE(BIN) DISP(56)        /*Unlock request count*/
FLD: QTXAQRY  LEN(4) TYPE(BIN) DISP(60)         /*Query request count*/
FLD: QTXACHG  LEN(4) TYPE(BIN) DISP(64)        /*Change request count*/
FLD: QTXAIRLM LEN(4) TYPE(BIN) DISP(68)    /*Other IRLM request count*/
FLD: QTXACLNO LEN(4) TYPE(BIN) DISP(72)    /*Number of claim requests*/
FLD: QTXACLUN LEN(4) TYPE(BIN) DISP(76)
                                  /*Number of claim requests that*/
*                                          were unsuccessful
FLD: QTXADRNO LEN(4) TYPE(BIN) DISP(80)    /*Number of drain requests*/
FLD: QTXADRUN LEN(4) TYPE(BIN) DISP(84)
                                  /*Number of drain requests that*/
*                                          were unsuccessful
FLD: QTXAEND  LEN(1) DISP(88)


*******************************************************************
*   QISE    DSNDQISE   *   EDM POOL STATISTICS - RELEASE 2
*******************************************************************
***********************************************************************
**** QISE     DSECT      /*EDM POOL STATISTICS         */               
***********************************************************************

COMP: QISE_OFFSET =
           WHEN(SM100RTY=100 AND QWS10R6N > 0) ASSIGN(QWS10R6O)
           ELSE                                ASSIGN(99999)
FLD: QISE     DISP(0) LEN(1) OFFSET(QISE_OFFSET)
                                  /*EDM POOL STATISTICS*/
FLD: QISEFAIL LEN(4) TYPE(BIN) DISP(0)   /*# OF FAIL DUE TO POOL FULL*/
FLD: QISEPAGE LEN(4) TYPE(BIN) DISP(4)  /*NUMBER OF PAGES IN EDM POOL*/
*                           /*PAGE IS 1K 370 AND 4K ON XA */
FLD: QISECTG  LEN(4) TYPE(BIN) DISP(8)     /*# OF REQ FOR CT SECTIONS*/
FLD: QISECTL  LEN(4) TYPE(BIN) DISP(12) /*# OF LOAD CT SECT FROM DASD*/
FLD: QISECT   LEN(4) TYPE(BIN) DISP(16)
                                  /*# OF PAGES USED FOR CT BELOW BAR*/
FLD: QISEFREE LEN(4) TYPE(BIN) DISP(20)  /*# OF FREE PG IN FREE CHAIN*/
FLD: QISESTMT LEN(4) TYPE(BIN) DISP(24)      /*# OF STMTS IN EDM POOL*/
FLD: QISEDBDG LEN(4) TYPE(BIN) DISP(32)       /*# OF REQUESTS FOR DBD*/
FLD: QISEDBDL LEN(4) TYPE(BIN) DISP(36)  /*# OF LOADING DBD FROM DASD*/
FLD: QISEKTG  LEN(4) TYPE(BIN) DISP(40)    /*# OF REQ FOR PT SECTIONS*/
FLD: QISEKTL  LEN(4) TYPE(BIN) DISP(44) /*# OF LOAD PT SECT FROM DASD*/
FLD: QISEKT   LEN(4) TYPE(BIN) DISP(48)      /*# OF PAGES USED FOR PT*/
FLD: QISEDSI  LEN(4) TYPE(BIN) DISP(56)  /*# OF INSERTS FOR DYN CACHE*/
FLD: QISEDSG  LEN(4) TYPE(BIN) DISP(60) /*# OF REQUESTS FOR DYN CACHE*/
FLD: QISEDBD  LEN(4) TYPE(BIN) DISP(64)     /*# OF PAGES USED FOR DBD*/
FLD: QISEDFAL LEN(4) TYPE(BIN) DISP(68)
                                  /*# OF FAIL DUE TO DBD POOL FULL*/
FLD: QISEDPGE LEN(4) TYPE(BIN) DISP(72) /*NUMBER OF PAGES IN DBD POOL*/
FLD: QISEDFRE LEN(4) TYPE(BIN) DISP(76)
                                  /*# OF FREE PG IN DBD FREE CHAIN*/
FLD: QISEDYNP LEN(4) TYPE(BIN) DISP(80)  /*# OF PGS USED IN STMT POOL*/
FLD: QISECFAL LEN(4) TYPE(BIN) DISP(84)
                                  /*# OF FAIL DUE TO STMT POOL FULL*/
FLD: QISECPGE LEN(4) TYPE(BIN) DISP(88)       /*# OF PGS IN STMT POOL*/
FLD: QISECFRE LEN(4) TYPE(BIN) DISP(92)
                                  /*# OF FREE PG IN STMT FREE CHAIN*/
FLD: QISESKCT LEN(4) TYPE(BIN) DISP(96)    /*# OF PAGES USED FOR SKCT*/
FLD: QISESKPT LEN(4) TYPE(BIN) DISP(100)   /*# OF PAGES USED FOR SKPT*/
FLD: QISEKFAL LEN(4) TYPE(BIN) DISP(104)
                               /*# OF FAIL DUE TO STMT SKEL POOL FULL*/
FLD: QISEKPGE LEN(4) TYPE(BIN) DISP(108)
                                  /*# OF PAGES IN SKEL EDM POOL*/
FLD: QISEKFRE LEN(4) TYPE(BIN) DISP(112)
                               /*# OF FREE PG IN SKEL EDM POOL FRE CH*/
FLD: QISECTA  LEN(4) TYPE(BIN) DISP(116)
                                  /*# OF PAGES USED IN CT ABOVE BAR*/
FLD: QISEKTA  LEN(4) TYPE(BIN) DISP(120)
                                  /*# OF PAGES USED IN PT ABOVE BAR*/
FLD: QISESFAL LEN(4) TYPE(BIN) DISP(124)
                                /*# OF FAIL DUE TO STMT ABV POOL FULL*/
FLD: QISESPGE LEN(4) TYPE(BIN) DISP(128)
                                  /*# OF PAGES IN STMT ABV EDM POOL*/
FLD: QISESFRE LEN(4) TYPE(BIN) DISP(132)
                               /*# OF FREE PG IN STMT ABV EDM POL FRE*/
FLD: QISEKNFM LEN(4) TYPE(BIN) DISP(136)
                               /*# OF CACHED NOT FOUND RECORD LOCATED*/
FLD: QISEKNFA LEN(4) TYPE(BIN) DISP(140)
                               /*# OF NOT FOUND RECORD ADDED TO CACHE*/
FLD: QISEKNFR LEN(4) TYPE(BIN) DISP(144)
                               /*# OF NT FOUND RCRD REMOVED FRM CACHE*/
FLD: QISEEND  LEN(4) TYPE(BIN) DISP(148)                /*END OF LIST*/


*******************************************************************
*   QBGL    DSNDQBGL   *   Buffer Manager Data Sharing Stats - V4R1
*******************************************************************
***********************************************************************
**** QBGL     DSECT                                                     
***********************************************************************

COMP: QBGL_OFFSET =
           WHEN(SM100RTY=100 AND QWS10R7N > 0) ASSIGN(QWS10R7O)
           ELSE                                ASSIGN(99999)
FLD: QBGL     DISP(0) LEN(1) OFFSET(QBGL_OFFSET)
FLD: QBGLGN   LEN(4) TYPE(BIN) DISP(0)         /*Group Buffer Pool id*/
FLD: QBGLGG   LEN(4) TYPE(BIN) DISP(4)   /*GetPages for GBP Dep pages*/
FLD: QBGLXD   LEN(4) TYPE(BIN) DISP(8)
                                  /*# of GBP reads under the user*/
*                                        task that were
*                                        necessary due to buffer cross
*                                        invalidation (XI) in which
*                                        data was returned           */
FLD: QBGLXR   LEN(4) TYPE(BIN) DISP(12)
                                  /*# of GBP reads under the user*/
*                                        task that were
*                                        necessary due to buffer XI
*                                        in which data was not
*                                        returned from GBP.          */
FLD: QBGLMD   LEN(4) TYPE(BIN) DISP(20)
                                  /*# of GBP reads under the user*/
*                                        task that were
*                                        necessary due to the reques-
*                                        ted page not being found in
*                                        the buffer pool in which
*                                        data was returned from GBP. */
FLD: QBGLMR   LEN(4) TYPE(BIN) DISP(24)
                                  /*# of GBP reads under the user*/
*                                        task that were
*                                        necessary due to the reques-
*                                        ted page not being found in
*                                        the buffer pool in which
*                                        data was not returned.      */
FLD: QBGLSW   LEN(4) TYPE(BIN) DISP(32)  /*# of changed pages written*/
*                                        under a user's execution    */
*                                        unit (via WAR or WARM)      */
FLD: QBGLWC   LEN(4) TYPE(BIN) DISP(36)    /*# of clean pages written*/
*                                        under a user's execution
*                                        unit (via WAR or WARM)      */
FLD: QBGLCT   LEN(4) TYPE(BIN) DISP(40)
                                  /*# of times castout was initiated*/
*                                        due to the castout class
*                                        threshold being detected.   */
FLD: QBGLGT   LEN(4) TYPE(BIN) DISP(44)
                                  /*# of times castout was initiated*/
*                                        due to the group buffer pool
*                                        castout threshold being
*                                        detected.                   */
FLD: QBGLWM   LEN(4) TYPE(BIN) DISP(48)     /*# of Write and Register*/
*                                        Multiple (WARM) requests.
*                                        Multiple pages written per
*                                        request.                    */
FLD: QBGLWS   LEN(4) TYPE(BIN) DISP(52)     /*# of Write and Register*/
*                                        (WAR) requests.  One page
*                                        written per request.        */
FLD: QBGLEX   LEN(4) TYPE(BIN) DISP(56)
                                  /*# of explicit cross invalidate*/
FLD: QBGLAW   LEN(4) TYPE(BIN) DISP(60)  /*# of changed pages written*/
*                                        under a system execution
*                                        unit (via WAR or WARM).     */
FLD: QBGLRC   LEN(4) TYPE(BIN) DISP(64) /*# of pages castout from the*/
*                                        Group Buffer Pool to DASD.
*                                        For each page that is castout,
*                                        QBSTPWS is also incremented.
*                                        For each disk I/O that is
*                                        initiated for castout,
*                                        QBSTWIO is incremented.     */
FLD: QBGLCM   LEN(4) TYPE(BIN) DISP(68) /*# Read For Castout Multiple*/
*                                        RFCOM) requests.  Multiple
*                                        pages read per request.     */
FLD: QBGLCR   LEN(4) TYPE(BIN) DISP(72)
                                  /*# of Read For Castout (RFCO)*/
*                                        requests.  One page read
*                                        per request.                */
FLD: QBGLWP   LEN(4) TYPE(BIN) DISP(76) /*# of pages written via WARM*/
FLD: QBGLWF   LEN(4) TYPE(BIN) DISP(80)
                                  /*# of GBP write requests that*/
*                                        could not complete due to a
*                                        lack of GBP storage resour-
*                                        ces.                        */
FLD: QBGLOS   LEN(4) TYPE(BIN) DISP(84)
                                  /*# of IXLCACHE 'read stgstats'*/
*                                        requests.                   */
FLD: QBGLAC   LEN(4) TYPE(BIN) DISP(88)  /*# of changed pages written*/
*                                        under a system execution
*                                        unit (via WAR or WARM).     */
FLD: QBGLAX   LEN(4) TYPE(BIN) DISP(92)
                                  /*# of 'register page list' (RPL)*/
*                                        requests done by Prefetch.
*                                        Prefetch will use this option
*                                        if running on MVS 5.2 or
*                                        above, and the GBP is
*                                        allocated in a coupling
*                                        facility of CFLEVEL=2 or
*                                        above.                      */
FLD: QBGLAY   LEN(4) TYPE(BIN) DISP(96)
                                  /*# of pages retrieved from the*/
*                                        group buffer pool
*                                        as a result of feedback from
*                                        RPL.                        */
FLD: QBGLCK   LEN(4) TYPE(BIN) DISP(104)
                                  /*# of GBP checkpoints triggered*/
*                                        by this member.             */
FLD: QBGLUN   LEN(4) TYPE(BIN) DISP(112)
                                  /*# IXLCACHE 'unlock castout'*/
*                                        requests.                   */
FLD: QBGLCC   LEN(4) TYPE(BIN) DISP(116)
                                  /*# IXLCACHE 'read castout class'*/
*                                        requests                    */
FLD: QBGLCS   LEN(4) TYPE(BIN) DISP(120)
                                  /*# IXLCACHE 'read castout stats'*/
*                                        requests                    */
FLD: QBGLDN   LEN(4) TYPE(BIN) DISP(124)   /*# IXLCACHE 'delete name'*/
*                                        requests                    */
FLD: QBGLRD   LEN(4) TYPE(BIN) DISP(128)  /*# IXLCACHE 'read dirinfo'*/
*                                        requests                    */
FLD: QBGLRG   LEN(4) TYPE(BIN) DISP(132)
                                  /*# of 'register page' requests*/
FLD: QBGLDG   LEN(4) TYPE(BIN) DISP(136)     /*# of 'unregister page'*/
*                                        requests                    */
FLD: QBGL2F   LEN(4) TYPE(BIN) DISP(144)
                                  /*# writes of changed pages to*/
*                                        the secondary GBP that
*                                        failed due to a lack of
*                                        storage.                    */
FLD: QBGL2S   LEN(4) TYPE(BIN) DISP(148)
                                  /*# completion checks for writes*/
*                                        to the secondary GBP that
*                                        were suspended because the
*                                        write had not yet completed.*/
FLD: QBGL2D   LEN(4) TYPE(BIN) DISP(152)
                                  /*# IXLCACHE 'delete name list'*/
*                                        requests to the secondary
*                                        GBP.                        */
FLD: QBGL2R   LEN(4) TYPE(BIN) DISP(156)
                                  /*# IXLCACHE 'read castout stats'*/
*                                        requests to the secondary
*                                        GBP.                        */
FLD: QBGL2N   LEN(4) TYPE(BIN) DISP(160)   /*# IXLCACHE 'delete name'*/
*                                        requests to the secondary
*                                        GBP.                        */
FLD: QBGLHS   LEN(4) TYPE(BIN) DISP(164)
                                  /*# Asynch IXLCACHE invocations*/
*                                        for primary GBP.            */
FLD: QBGL2H   LEN(4) TYPE(BIN) DISP(168)
                                  /*# Asynch IXLCACHE invocations*/
*                                        for secondary GBP.          */
FLD: QBGLP1   LEN(4) TYPE(BIN) DISP(172)
                                  /*# page P lock lock requests for*/
*                                        space map pages             */
FLD: QBGLP2   LEN(4) TYPE(BIN) DISP(176)
                                  /*# page P lock lock requests for*/
*                                        data pages                  */
FLD: QBGLP3   LEN(4) TYPE(BIN) DISP(180)
                                  /*# page P lock lock requests for*/
*                                        index leaf pages            */
FLD: QBGLU1   LEN(4) TYPE(BIN) DISP(184)
                                  /*# page P lock unlock requests*/
FLD: QBGLS1   LEN(4) TYPE(BIN) DISP(188)
                                  /*# page P lock lock suspensions*/
*                                        for space map pages         */
FLD: QBGLS2   LEN(4) TYPE(BIN) DISP(192)
                                  /*# page P lock lock suspensions*/
*                                        for data pages              */
FLD: QBGLS3   LEN(4) TYPE(BIN) DISP(196)
                                  /*# page P lock lock suspensions*/
*                                        for index leaf pages        */
FLD: QBGLN1   LEN(4) TYPE(BIN) DISP(200)
                                  /*# page P lock lock negotiations*/
*                                        for space map pages         */
FLD: QBGLN2   LEN(4) TYPE(BIN) DISP(204)
                                  /*# page P lock lock negotiations*/
*                                        for data pages              */
FLD: QBGLN3   LEN(4) TYPE(BIN) DISP(208)
                                  /*# page P lock lock negotiations*/
*                                        for index leaf pages        */
FLD: QBGLEND  LEN(1) DISP(212)


*******************************************************************
*   QTGS    DSNDQTGS   *   Service Controller Data Sharing Stats - V4R1
*******************************************************************
***********************************************************************
**** QTGS     DSECT                                                     
***********************************************************************

COMP: QTGS_OFFSET =
           WHEN(SM100RTY=100 AND QWS10R8N > 0) ASSIGN(QWS10R8O)
           ELSE                                ASSIGN(99999)
FLD: QTGS     DISP(0) LEN(1) OFFSET(QTGS_OFFSET)
*/********************************************************************/
*/* In the descriptions below, the term 'L-lock' refers to a         */
*/* 'logical lock', or a lock that is acquired and owned by a        */
*/* DB2 thread.  The term 'P-lock' refers to a                       */
*/* 'physical lock', or a lock that is acquired and owned the        */
*/* DB2 subsystem (i.e. P-locks are not owned by threads).           */
*/********************************************************************/
FLD: QTGSLPLK LEN(4) TYPE(BIN) DISP(0) /*# Lock requests for P locks.*/
*                                         This is a subset of QTXALOCK
*                                         which contains the total #
*                                         of Lock requests (L-locks
*                                         and P-locks).              */
FLD: QTGSCPLK LEN(4) TYPE(BIN) DISP(4)
                                  /*# Change requests for P locks.*/
*                                         This is a subset of QTXACHG
*                                         which contains the total #
*                                         of Change requests (L-locks
*                                         and P-locks).              */
FLD: QTGSUPLK LEN(4) TYPE(BIN) DISP(8)
                                  /*# Unlock requests for P locks.*/
*                                         This is a subset of QTXAUNLK
*                                         which contains the total #
*                                         of Unlock requests (L-locks
*                                         and P-locks).              */
FLD: QTGSLSLM LEN(4) TYPE(BIN) DISP(12)  /*# lock requests propagated*/
*                                         to XES (L-lock or P-lock)
*                                         synchronously, i.e. under
*                                         caller's execution unit. If
*                                         the request suspends due to
*                                         IRLM latch before going to
*                                         XES, this counter will not
*                                         be incremented             */
FLD: QTGSCSLM LEN(4) TYPE(BIN) DISP(16)
                                  /*# change requests propagated*/
*                                         to XES (L-lock or P-lock)
*                                         synchroneously, i.e. under
*                                         caller's execution unit. If
*                                         the request suspends due to
*                                         IRLM latch before going to
*                                         XES, this counter will not
*                                         be incremented             */
FLD: QTGSUSLM LEN(4) TYPE(BIN) DISP(20)
                                  /*# unlock requests propagated*/
*                                         to XES (L-lock or P-lock)
*                                         synchroneously, i.e. under
*                                         caller's execution unit. If
*                                         the request suspends due to
*                                         IRLM latch before going to
*                                         XES, this counter will not
*                                         be incremented.
*                                         This counter may actually
*                                         be larger than QTXAUNLK
*                                         (# unlocks) due to 'generic'
*                                         unlocks.  On a 'generic'
*                                         unlock, QTXAUNLK is incre-
*                                         mented only once, while
*                                         QTGSUSLM may be incremented
*                                         multiple times - once for
*                                         each global lock that is
*                                         released by the 'generic'
*                                         unlock.
*
*    /****************************************************************/
*    /* The following 3 fields give the counts for the number of     */
*    /* suspends due to global contention for lock requests.  A      */
*    /* 'global contention' occurs when inter-system communication   */
*    /* is required to resolve the lock conflict.  This is in        */
*    /* contrast to a 'local contention' in which no inter-system    */
*    /* communication is required to resolve the lock conflict - the */
*    /* conflict can be resolved entirely within the local IRLM for  */
*    /* local contention.                                            */
*    /*                                                              */
*    /* The sum of QTGSIGLO, QTGSSGLO and QTGSFLSE gives the total   */
*    /* number of suspends due to global contention.                 */
*    /*                                                              */
*    /* QTXASLOC gives the number of suspends due to local resource  */
*    /* contention.                                                  */
*    /****************************************************************/
FLD: QTGSIGLO LEN(4) TYPE(BIN) DISP(24)
                                  /*# suspends due to IRLM global*/
*                                         resource contention. IRLM
*                                         lock states were in
*                                         conflict                   */
FLD: QTGSSGLO LEN(4) TYPE(BIN) DISP(28)
                                  /*# suspends due to XES global*/
*                                         resource contention but no
*                                         IRLM global resource con-
*                                         tention. XES lock states were
*                                         in conflict but the IRLM lock
*                                         states were not.           */
FLD: QTGSFLSE LEN(4) TYPE(BIN) DISP(32)
                                  /*# Summation of sync to async*/
*                                        heuristic conversions for LOCK
*                                        requests.  This conversion is
*                                        done when XES determines that
*                                        it is more efficient to drive
*                                        the request asynchronously to
*                                        the CF.                     */
FLD: QTGSDRTA LEN(4) TYPE(BIN) DISP(36)     /*# global lock or change*/
*                                         requests denied or suspended
*                                         because of an incompatible
*                                         retained lock              */
FLD: QTGSNTFY LEN(4) TYPE(BIN) DISP(40)      /*# notify messages sent*/
FLD: QTGSNTFR LEN(4) TYPE(BIN) DISP(44)  /*# notify messages received*/
*
FLD: QTGSKIDS LEN(4) TYPE(BIN) DISP(48)     /*# resources (L locks or*/
*                                         P-locks) propagated by IRLM
*                                         to XES asynchroneously to the
*                                         original request.  This
*                                         occurs when new inter-DB2
*                                         interest occurs on a parent
*                                         resource or when a request
*                                         completes after the request-
*                                         or's execution unit has been
*                                         suspended.                 */
FLD: QTGSPPPE LEN(4) TYPE(BIN) DISP(52) /*# times this DB2 was driven*/
*                                         to negotiate a pageset/
*                                         partition P-lock due to
*                                         changing inter-DB2 interest
*                                         levels on the pageset/part */
FLD: QTGSPGPE LEN(4) TYPE(BIN) DISP(56) /*# times this DB2 was driven*/
*                                         to negotiate a page P-lock
*                                         due to inter-DB2 P-lock
*                                         contention                 */
FLD: QTGSOTPE LEN(4) TYPE(BIN) DISP(60) /*# times this DB2 was driven*/
*                                         to negotiate another P-lock
*                                         type (other than pageset/
*                                         partition or page          */
FLD: QTGSCHNP LEN(4) TYPE(BIN) DISP(64)       /*# of CHANGEP requests*/
FLD: QTGSPEMX LEN(4) TYPE(BIN) DISP(68)
                                  /*Max # of engines available for*/
*                                         P-lock exit or Notify exit
*                                         requests                   */
FLD: QTGSPEQW LEN(4) TYPE(BIN) DISP(72)    /*# times an engine is not*/
*                                         available for a P-lock exit
*                                         or a Notify exit request   */
*
FLD: QTGSFLMG LEN(4) TYPE(BIN) DISP(76)
                                  /*# false contentions for LOCK*/
*                                         and UNLOCK requests
*                                         encountered on this z/OS
*                                         image. A false contention
*                                         occurs when different
*                                         resource names hash to the
*                                         same entry in the CF lock
*                                         table.  The CF detects
*                                         contention within the hash
*                                         entry, and XES uses inter-
*                                         system messaging to determine
*                                         that no actual resource
*                                         contention exists.  Note that
*                                         this counter is maintained on
*                                         a per-LPAR basis.  Therefore
*                                         this counter will over-report
*                                         false contentions in cases
*                                         where multiple members from
*                                         the same data sharing group
*                                         run on the same z/OS image.
*                                         'FF'x is returned if data is
*                                         unavailable due to error from
*                                         the ?IXLMG service.        */
FLD: QTGSEND  LEN(1) DISP(80)


*******************************************************************
*   QLES    DSNDQLES   *   LE STATISTICS
*******************************************************************
***********************************************************************
**** DSNDQLES DSECT                TABLE OF LE in ADMF COUNTERS         
***********************************************************************

COMP: QLES_OFFSET =
           WHEN(SM100RTY=100 AND QWS10R9N > 0) ASSIGN(QWS10R9O)
           ELSE                                ASSIGN(99999)
FLD: DSNDQLES DISP(0) LEN(1) OFFSET(QLES_OFFSET)
                                  /*TABLE OF LE in ADMF COUNTERS*/
FLD: QLES     LEN(8) DISP(0)
FLD: QLHEAD   LEN(4) TYPE(BIN) DISP(0)         /*CONTROL BLOCK HEADER*/
FLD: QLID     TYPE(HALF) DISP(0)  /*CONTROL BLOCK ID*/
FLD: QLLEN    TYPE(HALF) DISP(2)  /*CONTROL BLOCK LENGTH*/
FLD: QLEYE    LEN(4) DISP(4)      /*CONTROL BLOCK EYE CATCHER*/
FLD: QLESTATS LEN(4) TYPE(BIN) DISP(8)                   /*STATISTICS*/
FLD: QLECREAT LEN(4) TYPE(BIN) DISP(8)                          /*(S)*/
FLD: QLETRMST LEN(4) TYPE(BIN) DISP(12)                         /*(S)*/
FLD: QLETRMER LEN(4) TYPE(BIN) DISP(16)                         /*(S)*/
FLD: QLETRMDL LEN(4) TYPE(BIN) DISP(20)                         /*(S)*/
FLD: QLENUMEC LEN(4) TYPE(BIN) DISP(24)                         /*(S)*/
FLD: QLENUMEM LEN(4) TYPE(BIN) DISP(28)                         /*(S)*/
FLD: QLENUMIC LEN(4) TYPE(BIN) DISP(32)                         /*(S)*/
FLD: QLENUMIM LEN(4) TYPE(BIN) DISP(36)                         /*(S)*/
FLD: QLESTGEC LEN(4) TYPE(BIN) DISP(40)                         /*(S)*/
FLD: QLESTGEM LEN(4) TYPE(BIN) DISP(44)                         /*(S)*/
FLD: QLESTGIC LEN(4) TYPE(BIN) DISP(48)                         /*(S)*/
FLD: QLESTGIM LEN(4) TYPE(BIN) DISP(52)                         /*(S)*/
FLD: QLELOWEC LEN(4) TYPE(BIN) DISP(56)                         /*(S)*/
FLD: QLELOWEM LEN(4) TYPE(BIN) DISP(60)                         /*(S)*/
FLD: QLELOWIC LEN(4) TYPE(BIN) DISP(64)                         /*(S)*/
FLD: QLELOWIM LEN(4) TYPE(BIN) DISP(68)                         /*(S)*/
FLD: QLESTG1M LEN(4) TYPE(BIN) DISP(72)                         /*(S)*/
FLD: QLELOW1M LEN(4) TYPE(BIN) DISP(76)                         /*(S)*/
FLD: QLEUSED  LEN(8) DISP(80)     /*(S)*/
FLD: QLETIME  LEN(8) DISP(88)     /*(S)*/
FLD: QLENTRDY LEN(8) DISP(96)     /*(S)*/
FLD: QLETIMEW LEN(8) DISP(104)    /*(S)*/
FLD: QLETIMEI LEN(8) DISP(112)    /*(S)*/
FLD: QLETIMET LEN(8) DISP(120)    /*(S)*/
FLD: QLETIMEM LEN(8) DISP(128)    /*(S)*/
FLD: QLESEND  LEN(4) TYPE(BIN) DISP(168)


*******************************************************************
*   QISJ    DSNDQISJ   *   STARJOIN POOL STATISTICS (S)
*******************************************************************
***********************************************************************
**** QISJ     DSECT                                                     
***********************************************************************

COMP: QISJ_OFFSET =
           WHEN(SM100RTY=100 AND QWS10RAN > 0) ASSIGN(QWS10RAO)
           ELSE                                ASSIGN(99999)
FLD: QISJ     DISP(0) LEN(1) OFFSET(QISJ_OFFSET)
FLD: QISJTRY  LEN(4) TYPE(BIN) DISP(0)                          /*(S)*/
FLD: QISJFAIL LEN(4) TYPE(BIN) DISP(4)                          /*(S)*/
FLD: QISJSIZE LEN(4) TYPE(BIN) DISP(8)                          /*(S)*/
FLD: QISJMAX  LEN(4) TYPE(BIN) DISP(12)                         /*(S)*/
FLD: QISJEND  LEN(4) TYPE(BIN) DISP(16)

FLD: SMF100_END LEN(1) OFFSET(0)

 


 

Sample Report from SMF 100 Records (IFCID=1)
Showing Control Address Space Statistics


The sample SMF report below was created with
Spectrum SMF Writer, the low-cost 4GL SMF report writer. It reads as input the SMF file and selects just the type 100 DB2 accounting records with IFCID = 1. (See SMF 100 record layout.) It then prints a report line for each address space found in these DB2 statistics records. (Note that each SMF record has a variable number of the QWSA statistical sections containing the address space information.) The report shows timing information about those DB2 address spaces.

All of this with just a couple of dozen lines of code!
Why not install a Spectrum SMF Writer trial right now and start making your own SMF reports!

These Spectrum SMF Writer Statements:


OPTION: STCKADJ(0)  /* DON'T CONVERT STCK TIMES TO GMT */
INPUT: SMF100  NORMWHEN(SM100RTY = 100 AND QWHSIID =1)
               NORMALIZE(QWSA_SECTION, QWS00R1N)
TITLE: 'CONTROL ADDRESS SPACES STATISTICS'
TITLE: 'FROM SMF100 IFCID=1 RECORDS: QWSA SEGMENTS'
INC: SM100RTY = 100    AND QWHSIID =1
COL: SM100DTE('SMF DATE')  SM100TME('SMF TIME')
     SM100RTY(3 'REC')
     QWHSIID(5 'IFCID')
     QWSAPROC('PROC|NAME')
     QWSAEJST('JOB STEP|TIMER')
     QWSASRBT('SRB TIMER')
     QWSAASID('ASID')
     QWSAASCB('ASCB|TOKEN')
     QWSAPSRB('PREEMTABLE|SRB TIMER' BIZ)
     QWSAPSRB_ZIIP('PREEMTABLE/|SRB TIMER|ON ZIIP' BIZ)

 

Produce This SMF Report:


                                         CONTROL ADDRESS SPACES STATISTICS
                                    FROM SMF100 IFCID=1 RECORDS: QWSA SEGMENTS
                                                                                                    PREEMTABLE
                                PROC    JOB STEP                                    PREEMTABLE       SRB TIMER
 SMF DATE  SMF TIME   REC IFCID NAME      TIMER         SRB TIMER        ASID        SRB TIMER        ON ZIIP
 ________ ___________ ___ _____ ____ _______________ _______________ ____________ _______________ _______________

 06/12/09 12:03:46.55 100     1 PROD 00:00:26.353201 00:00:06.418556          268
 06/12/09 12:03:46.55 100     1 DB29 00:00:00.984284 00:00:02.309871          289
 06/12/09 12:03:46.55 100     1 SLLP 00:00:00.190581 00:00:00.388122          292
 06/12/09 12:03:46.55 100     1 TA21 00:00:00.062769 00:00:14.998279          276
 06/12/09 12:03:51.48 100     1 PROD 00:00:26.192744 00:00:06.612312          269
 06/12/09 12:03:51.48 100     1 DB29 00:00:01.014337 00:00:01.863685          291
 06/12/09 12:03:51.48 100     1 SLLP 00:00:00.206780 00:00:00.382417          297
 06/12/09 12:03:51.48 100     1 TA21 00:00:00.058647 00:00:14.996602          275
 06/12/09 12:03:52.19 100     1 PROD 00:00:28.926771 00:01:12.779766          271
 06/12/09 12:03:52.19 100     1 DB29 00:00:02.513809 00:00:56.396282          294 00:00:01.273490
 06/12/09 12:03:52.19 100     1 SLLP 00:00:01.288933 00:06:03.825810          298 00:05:58.706745 00:00:00.002479
 06/12/09 12:03:52.19 100     1 TA21 00:00:00.057327 00:02:23.828467          277
 06/12/09 12:03:52.83 100     1 PROD 00:00:25.490909 00:00:05.883280          267
 06/12/09 12:03:52.83 100     1 DB29 00:00:00.911352 00:00:00.790773          288
 06/12/09 12:03:52.83 100     1 SLLP 00:00:00.178934 00:00:00.381876          279
 06/12/09 12:03:52.83 100     1 TA21 00:00:00.058005 00:00:14.318580          270
 06/12/09 12:03:54.35 100     1 PROD 00:00:25.520822 00:00:10.007706          272
 06/12/09 12:03:54.35 100     1 DB29 00:00:01.856049 00:00:02.723942          280
 06/12/09 12:03:54.35 100     1 SLLP 00:00:00.215897 00:00:03.138022          290 00:00:02.454649
 06/12/09 12:03:54.35 100     1 TA21 00:00:00.058069 00:00:15.399257          274
 06/12/09 12:03:56.47 100     1 PROD 00:00:42.251758 00:04:54.637468          273 00:00:00.000029
 06/12/09 12:03:56.47 100     1 DB29 00:00:29.802770 02:37:51.911378          299 00:00:02.440131
 06/12/09 12:03:56.47 100     1 SLLP 00:00:10.836484 00:28:12.029379          304 00:27:33.412688 00:00:08.853904
 06/12/09 12:03:56.47 100     1 TA21 00:00:00.059007 00:02:20.790957          278
 06/12/09 12:28:21.16 100     1 PROD 00:00:26.368131 00:00:51.423475          289
 06/12/09 12:28:21.16 100     1 DB29 00:00:02.755845 00:01:23.944388          291 00:00:01.123953
 06/12/09 12:28:21.16 100     1 SLLP 00:00:02.027863 00:02:09.235654          292 00:02:05.506409 00:00:00.344498
 06/12/09 12:28:21.16 100     1 TA21 00:00:00.058659 00:02:08.357462          290
 06/12/09 12:29:07.57 100     1 PROD 00:01:16.265914 00:11:35.909179          298
 06/12/09 12:29:07.57 100     1 DB29 00:00:30.650497 08:19:41.220897          300 00:00:08.804316 00:00:00.000060
 06/12/09 12:29:07.57 100     1 SLLP 00:00:00.493098 00:01:21.454082          301 00:01:06.880166 00:00:00.168639
 06/12/09 12:29:07.57 100     1 TA21 00:00:00.062084 00:04:18.456757          299

 *** GRAND TOTAL (    32 ITEMS)

See other sample SMF reports.

Copyright 2024.
Pacific Systems Group.
All rights reserved.
Home | Products | Prices | Documentation | 30-Day Trials | Customer Reviews | Company | FAQ | Sample Reports | SMF Records
Send Your Comments or Questions