The MICS Resource Management DB2 component delivers a series of Management by Objective (MBO) reports.
These reports are automatically run when the the MBO reporting parameter in prefix.MICS.PARMS(EXECDEF) is set to the following:
REPORT MBODAILY ALL,DB2,NONE
The MBO reports summarize data from all DB2 subsystems in the environment.
Users have requested how to run a subset of these reports and maybe target a specific DB2 subsystem to override the "* ALL*" assignment.
Release: All
Component: MDB2
Using this sample JCL, the user can run the reports on an adhoc basis selecting a specific DB2 subsystem:
//your JOB card
// JCLLIB ORDER=sharedprefix.MICS.PROCLIB
//STEP1 EXEC MICSSHRx <--(x = unit identifier)
//SYSIN DD *
%INCLUDE USOURCE(#BASMSTR);
%INCLUDE SOURCE($DB2SFD);
%INCLUDE SOURCE(#DB2MSTR);
%INCLUDE SOURCE(#DB2MOBJ);
* REPORT-REQUEST SETTINGS BELOW -- SEE DB2 GUIDE, SECT 3.1.1. ;
%LET SYSREP = N;
%LET DDYREP = N;
%LET DBMREP = N;
%LET USRAREP = N;
%LET DDUREP = N;
%LET PLANREP = N;
%LET DDPREP = N;
%LET PLANSUM = N;
%LET CALREP = N;
* ;
* FAKE-OUT THE DB2ACTPT OVERRIDE-ASSIGNMENT ;
* ;
%INCLUDE SOURCE(DYDB2MBO);
%LET DB2AUTH = DB2AUTH;
%LET DB2OPID = DB2OPID;
%LET DB2CONN = DBOCONN;
%LET DB2CORR = DB2CORR;
%LET DB2PLAN = DB2PLAN;
%LET DSUFID=DB2DSU01; /* change cycle number if needed */
%LET DDUFID=DB2DDU01;
%LET BY = SYSID DB2ID;
%LET BREAK = DB2ID;
%USRREPT /* launch DB2 Accounting Rpt */
RUN;
To add a subsetting IF statement to possibly target a specific DB2 subsystem, code one of the %LET statements as follows stacking SAS statements. In this case a subsetting IF.
%LET DB2AUTH = %NRSTR(DB2AUTH; IF DB2ID='AD01';);
More information regarding these MBO reports can be found at the following MICS documentation link.