CPAOMEGA - OMEGAMON reports

This JCL runs CICS PA OMEGAMON® reports. For example:
 1 
OMEGAMON List report of Total and Database segments
 2 
OMEGAMON List report of Total segment
 3 
OMEGAMON List report of Database segment for transaction codes starting with FNL*
 4 
OMEGAMON Transaction Summary report with Average and Maximum statistics for Total and Database segments
 5 
OMEGAMON Database Summary report with Average and Maximum statistics for Total and Database segments
 6 
OMEGAMON Transaction and Database Summary reports with Total, Maximum and 90% Peak Percentile for Database segments
Figure 1. Sample JCL CPAOMEGA - OMEGAMON reports
//CPAOMEGA JOB ,CLASS=A,NOTIFY=&SYSUID
//CICSPA   EXEC PGM=CPAMAIN,REGION=4M,PARM=NOSTAE
//STEPLIB  DD  DSN=CPA.V3R2M0.SCPALINK,DISP=SHR
//SYSPRINT DD  SYSOUT=*                                   
//*                                                       
//* SMF Input Files                                     
//SMFIN001 DD  DISP=SHR,DSN=<SMF.Input.DSN.applid1>       
//*                                                       
//* Commands to request CICS PA reports                   
//SYSIN    DD  *                                          
 CICSPA IN(SMFIN001),                                     
        APPLID(<applid1>),                                
            OMEGAMON(OUTPUT(OMEG0001),                  1         
                LIST,                                               
                PRINT(TOTALS,DB),                                   
                DBMS(ADABAS,SUPRA,DATACOM,IDMS)),                   
            OMEGAMON(OUTPUT(OMEG0002),                  2         
                LIST,                                               
                PRINT(TOTALS),                                      
                DBMS(ADABAS,SUPRA,DATACOM,IDMS)),                   
            OMEGAMON(OUTPUT(OMEG0003),                  3        
                LIST,                                               
                PRINT(DB),                                          
                SELECT(PERFORMANCE(                                 
                INC(TRAN(FNL*))))),                                 
            OMEGAMON(OUTPUT(OMEG0004),                  4         
                SUMMARY(TRAN,AVG,MAX),                              
                PRINT(TOTALS,DB)),                                  
            OMEGAMON(OUTPUT(OMEG0005),                  5         
                SUMMARY(DATABASE,AVG,MAX),                          
                PRINT(TOTALS,DB),                                   
                DBMS(ADABAS,SUPRA,DATACOM,IDMS)),                   
            OMEGAMON(OUTPUT(OMEG0006),                  6         
                SUMMARY(TRAN,DATABASE,TOT,MAX,PEAK(90)),            
                PRINT(DB),                                          
                DBMS(ADABAS,SUPRA,DATACOM,IDMS))                    
/*