SMF 87 Record - GRS Monitoring - z/OS 1.13
This table shows the record layout for type 87 SMF records
(GRS Monitoring - z/OS 1.13).
List of other SMF record layouts available.
List of sample SMF reports.
Purpose: GRS Monitoring writes record type 87 to monitor functions.
It's easy to report on SMF 87 data! | |
|
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.
|
The Spectrum Writer definitions for the SMF type 87 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.
|
File Definition for Type 87 SMF Records GRS Monitoring - z/OS 1.13
***********************************************************************
* SPECTRUM SMF WRITER -- FILE DEFINITION STATEMENTS *
* SMF TYPE 87 RECORD - "GRS MONITORING - Z/OS 1.13" *
***********************************************************************
OPTION: MISSOFFSET /* TREAT OFFSET ERRORS (99999) LIKE MISSING DATA */
********************************************************************
* SMF Record Type 87 -- GRS Mapping *
********************************************************************
*
********************************************************************
* HEADER SECTION *
********************************************************************
*
FLD: SMF87RHS LEN(24) DISP(0) /*Record Header Section*/
FLD: SMF87LEN TYPE(HALF) DISP(0) /*Record Length*/
FLD: SMF87SEG TYPE(HALF) DISP(2) /*Segment Descriptor*/
FLD: SMF87FLG LEN(1) DISP(4) /*Header Flag Byte*/
* X'40' bit 1 - SUBTYPES utilized
FLD: SMF87RTY LEN(1) TYPE(BIN) ACC(NO) DISP(5) /*Record Type 87*/
FLD: SMF87TME LEN(4) TYPE(B-SECS) DISP(6) DEC(2)
/*Record Written Time*/
FLD: SMF87DTE TYPE(P-CYYDDD) DISP(10) /*Record Written Date*/
FLD: SMF87SID LEN(4) DISP(14) /*System Identification*/
FLD: SMF87SSI LEN(4) DISP(18) /*Subsystem ID*/
FLD: SMF87STP TYPE(HALF) ACC(NO) DISP(22) /*Record Subtype*/
* 1 - QSCAN subtype
*
*
********************************************************************
* SELF DEFINING SECTION *
********************************************************************
FLD: SMF87DEF LEN(20) DISP(24) /*Self Defining section*/
FLD: SMF87DEF_LEN LEN(4) TYPE(BIN) DISP(24) /*Length of this section*/
FLD: SMF87DEF_REQ_OFF LEN(4) TYPE(BIN) DISP(28)
/*Requester section offset*/
FLD: SMF87DEF_REQ_LEN TYPE(HALF) DISP(32) /*Requester section length*/
FLD: SMF87DEF_REQ_NUM TYPE(HALF) DISP(34)
/*Number of Requester sections*/
FLD: SMF87DEF_QSCAN_OFF LEN(4) TYPE(BIN) DISP(36)
/*Qscan section offset*/
FLD: SMF87DEF_QSCAN_LEN TYPE(HALF) DISP(40) /*Qscan section length*/
FLD: SMF87DEF_QSCAN_NUM TYPE(HALF) DISP(42)
/*Number of Qscan sections*/
*SMFRCD87_LEN EQU *-SMFRCD87
*
*
********************************************************************
* REQUESTER SECTION *
********************************************************************
***********************************************************************
**** SMF87REQ DSECT
***********************************************************************
COMP: REQ_OFFSET =
WHEN(SMF87RTY=87 AND SMF87DEF_REQ_NUM > 0)
ASSIGN(SMF87DEF_REQ_OFF)
ELSE ASSIGN(99999)
FLD: SMF87REQ DISP(0) LEN(96) OFFSET(REQ_OFFSET)
FLD: SMF87REQ_COMP LEN(8) DISP(0) /*Requester Component ID*/
* 'SCSDS '
FLD: SMF87REQ_VERSION LEN(4) TYPE(BIN) DISP(8)
/*Requester section version*/
* 1 - version 1
FLD: SMF87REQ_SYS LEN(8) DISP(12) /*Requester System Name*/
FLD: SMF87REQ_STOK LEN(8) DISP(20)/*Requester SToken*/
FLD: SMF87REQ_ASID TYPE(HALF) DISP(28) /*Requester Asid*/
FLD: SMF87REQ_TCB LEN(4) TYPE(BIN) DISP(32) /*Requester TCB address*/
FLD: SMF87REQ_JOB LEN(8) DISP(36) /*Requester Jobname*/
FLD: SMF87REQ_STIME LEN(16) DISP(44) /*Requester start timestamp*/
FLD: SMF87_STIME COL(SMF87REQ_STIME+1) TYPE(STCKTIME)
FLD: SMF87REQ_CTIME LEN(16) DISP(60) /*Requester completion timestamp*/
FLD: SMF87_CTIME COL(SMF87REQ_CTIME+1) TYPE(STCKTIME)
FLD: SMF87REQ_RC LEN(4) TYPE(BIN) DISP(76) /*Requester return code*/
FLD: SMF87REQ_RSN LEN(4) TYPE(BIN) DISP(80) /*Requester reason code*/
FLD: SMF87REQ_PSW LEN(8) DISP(84) /*Requester PSW*/
*SMF87REQ_LEN EQU *-SMF87REQ
*
*
********************************************************************
* QSCAN SECTION *
********************************************************************
***********************************************************************
**** SMF87QSCAN DSECT
***********************************************************************
***********************************************************************
* TO REPORT ON ALL OCCURRENCES OF SMF87QSCAN, USE:
* INPUT: SMF87
* NORMWHEN(SMF87RTY=87 AND SMF87STP=1 AND SMF87DEF_QSCAN_NUM>0)
* NORMSMF(SMF87DEF_QSCAN_OFF)
***********************************************************************
COMP: QSCAN_OFFSET =
WHEN(SMF87RTY=87 AND SMF87STP=1 AND SMF87DEF_QSCAN_NUM > 0)
ASSIGN(SMF87DEF_QSCAN_OFF)
ELSE ASSIGN(99999)
FLD: SMF87QSCAN DISP(0) LEN(288) OFFSET(QSCAN_OFFSET)
FLD: SMF87QSCAN_EYE LEN(8) DISP(0)/*Service eye catcher.*/
* 'GQSCAN '
* 'ISGQUERY'
FLD: SMF87QSCAN_VERSION LEN(4) TYPE(BIN) DISP(8)
/*Qscan section version*/
* 1 - version 1
FLD: SMF87QSCAN_SCANACTION LEN(1) DISP(12) /*Requested scan action*/
* 1 Start
* 2 Resume
FLD: SMF87QSCAN_FLAGS LEN(1) DISP(13)
* X'80' Specific Qname?
* X'40' Specific Rname?
FLD: SMF87QSCAN_QNAMELEN LEN(1) TYPE(BIN) DISP(14) /*Qname length*/
FLD: SMF87QSCAN_RNAMELEN LEN(1) TYPE(BIN) DISP(15) /*Rname length*/
FLD: SMF87QSCAN_MINWAITERS LEN(4) TYPE(BIN) DISP(16)
/*Minimum waiters*/
FLD: SMF87QSCAN_QNAME LEN(8) DISP(20) /*Requested Qname*/
COMP: SMF87_QNAME = #SUBSTR(SMF87QSCAN_QNAME,1,SMF87QSCAN_QNAMELEN)
FLD: SMF87QSCAN_RNAME LEN(256) DISP(28) /*Requested Rname*/
COMP: SMF87_RNAME = #SUBSTR(SMF87QSCAN_RNAME,1,SMF87QSCAN_RNAMELEN)
*SMF87QSCAN_LEN EQU *-SMF87QSCAN
FLD: SMF87_END LEN(1) OFFSET(0) |
