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 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!

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 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.

 

Spectrum SMF Writer
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)

 

Copyright 2017.
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