Report with individualised MQ information.

Products

• SYSVIEW Performance Management

Issue/Introduction

Selecting a transaction in CTRANLOG shows the SMF Record Report (SMFRPT).

For transactions accessing MQ there is an IBM MQ section with Object and Reqs columns:

 

IBM MQ ----------------------------------------------
                                                     
QMGR=MQSA                                           
                                                     
APIcall    Object                               Reqs 
MQOPEN     *none*                                 2 
MQINQ      *none*                                 2 
MQOPEN     ABCDE.XYZ.CONTROL.TO.MF                2 
MQINQ      ABCDE.XYZ.CONTROL.TO.MF                3

 

This article documents the parameters that should be used in XPFRMAIN to create a report with the MQ details for each transaction (each task id) and not a summary of them.

 

Environment

Release : 16.0

Component : Explore Report Writer for SYSVIEW/E

Resolution

Run XPFRMAIN with the following parameters in SYSIN DD :

 

 

//SYSIN    DD *

OPTION(SUMMARY=NO)                          
                                            
DEFINE XID WMQ_QNAME,                       
  PRODUCT=EXPC RECORD=27,                   
  OFFSET=X4 LENGTH=49 TRIPLET=X152,         
  TYPE=CHARACTER HDR1=QUEUE HDR2=NAME       
                                            
DEFINE XID WMQ_REQUEST_TYPE,                
  PRODUCT=EXPC RECORD=27,                   
  OFFSET=X34 TRIPLET=X152,                  
  HDR1=QUEUE HDR2=REQ_TYPE,                 
  LIST=(IT=BIN,IL=1,                        
        01,MQOPEN,                          
        02,MQCLOSE,                         
        03,MQGET,                           
        04,MQPUT,                           
        05,MQPUT1,                          
        06,MQINQ,                           
        07,MQINQL,                          
        08,MQSET,                           
        09,END_WAIT,                        
        10,CLOSE_HAND,                      
        11,PREPARE,                         
        12,COMMIT,                          
        13,BACKOUT,                         
        14,END_THREAD,                      
        15,INQINDOUBT,                      
        16,RESCOMMIT,                       
        17,RESBACKOUT,                      
        18,EXERESOLVE,                      
        19,MQGET_WAIT,                      
        UNKW,UNKNOWN)                       
                                            
DEFINE XVAR CICS TRAN WMQ_TIME,    

  PRODUCT=EXPC RECORD=27,                                  
  OFFSET=X40 LENGTH=8 TRIPLET=X152,                        
  TYPE=6DEC HDR1=QUEUE HDR2=TIME                           
                                                           
DEFINE XVAR CICS TRAN WMQ_REQUESTS,                        
  PRODUCT=EXPC RECORD=27,                                  
  OFFSET=X48 LENGTH=4 TRIPLET=X152,                        
  TYPE=BINARY HDR1=QUEUE HDR2=REQUESTS                     
                                                           
DEFINE VAR CICS TRAN WMQ_TIME% = ,                         
           ( CICS TRAN WMQ_TIME * 100 * 100 ) / ,          
           CICS TRAN LIFETIME                              
                                                           
TITLE1 MQREQS - TRANS MQ REQUESTS                          
                                                           
SELECT TRANID(Your_tran_id)                                        
DEFINE ID KEY JOBNAME ' ' TRANID ' ' TRANNUM               
                                                           
TAB DATETIME SORT(ASCENDING) KEY ENDTIME,                  
  CICS TRAN LIFETIME AND,                                  
  CICS TRAN WMQ_REQUESTS AND,                              
  CICS TRAN WMQ_TIME     AND,                              
  CICS TRAN WMQ_TIME% HDR1(QUEUE) HDR2(PCT) FORMAT(NNN.NN) 
                                                           
TAB2 WMQ_QNAME WMQ_REQUEST_TYPE,                           
  CICS TRAN WMQ_REQUESTS AND,                              
  CICS TRAN WMQ_TIME                                       
                                                           
EACH 1 MINUTE                                              
                                                           
                                                           
 END                                                       
 RUN                                                       
/*                                                         

Additional Information

Reporting