Previous Topic: 5.5.4 Augmenting the Summarization with %NEGATENext Topic: Reporting Examples


5.5.5 Summarization Examples


These examples illustrate the use of the CA MICS
summarization facility.

Example 1
---------

Report the total CICS usage in terms of CPU time and I/O for
user ID SYSXX9, considering both CICS systems CICA and CICB
only, on a monthly basis for this month and the previous
three months.  (Note that the user ID has been stored in the
third CICS account field.)

  * CA MICS SUMMARIZATION VARIABLES SHOULD PRECEDE OTHER
  * SUMMARY MACRO STATEMENTS;
     %LET BY = CICACT3 YEAR MONTH ;
     %LET BREAK = MONTH ;
     DATA TEMPFILE;
     SET &PCICM..CICCSU00 &PCICM..CICCSU01 &PCICM..CICCSU02
         &PCICM..CICCSU03;
  * SELECT OBSERVATIONS OF INTEREST;
     IF CICACT3='SYSXX9';
     IF CICSID='CICA' OR CICSID='CICB';
  * ARRANGE IN REQUIRED SEQUENCE;
     PROC SORT DATA=TEMPFILE OUT=SORTFILE; BY &BY;
  * SUMMARIZE;
     DATA SUMFILE;
     SET SORTFILE;
     %CSUSUM;
  * OUTPUT RESULTS;
     PROC PRINT; VAR CICACT3 YEAR MONTH CSUCPUTM CSUEXCPS;
     TITLE CPU AND I/O ACTIVITY FOR USERID SYSXX9 ;


Example 2
---------

Report real memory usage of VTAM in performance group 8, over
the last three days for zone 1.

  %LET BY = SYSID PERFGRP YEAR MONTH DAY ;
  %LET BREAK = DAY ;
  DATA TEMPFILE;
  SET &PSCPD..SCPPGA01 &PSCPD..SCPPGA02 &PSCPD..SCPPGA03;
  IF PERFGRP=8;
  IF ZONE='1';
  DATA SUMFILE;
  SET TEMPFILE;
  %PGASUM;
  PROC PRINT; VAR PERFGRP MONTH DAY PGAAVRSF;
  TITLE AVERAGE DAILY REAL STORAGE FRAME USAGE FOR VTAM;
Example 3
---------

Report the number of jobs submitted with class A, priority
13, and display the average turnaround time, elapsed run
time, and input and output queue times, by system for the
last two days.

  %LET BY = SYSID ;
  %LET BREAK = SYSID ;
  DATA TEMPFILE;
  SET &PBATX..BATJOB01 &PBATX..BATJOB02;
  IF JOBCLASS='A';
  IF JOBIPRTY=13;
  PROC SORT DATA=TEMPFILE OUT=SORTFILE; BY &BY;
  DATA SUMFILE;
  SET SORTFILE;
  %JOBSUM;
  PROC PRINT; VAR SYSID JOBCOUNT JOBTURTM JOBINQTM
              JOBPRQTM;
  TITLE TURNAROUND TIME AND QUEUE TIMES BY SYSTEM;

Example 4
---------

Report the ten programs that consumed the most service units
this month.

  %LET BY = PROGRAM ;
  %LET BREAK = PROGRAM ;
  PROC SORT DATA=&PBATM..BATPGM00; OUT=SORTFILE; BY &BY;
  DATA TEMPFILE;
  SET SORTFILE;
  %PGMSUM;
  PROC SORT DATA=TEMPFILE; OUT=SORTFILE:
       BY DESCENDING PGMSERVU;
  DATA TOPTEN;
  SET SORTFILE;
  IF _N_ < 11;
  PROC PRINT; VAR PROGRAM PGMSERVU;
  TITLE TOP TEN SERVICE UNIT CONSUMING PROGRAMS;