3. REPORTS › 3.2 Changing Report Parameters

3.2 Changing Report Parameters

The CICS Analyzer provides three methods with which you can
tailor the input to meet your reporting needs:

  o MICF execution-time parameters

    MICF execution-time parameters provide the means to
    specify input selection criteria which typically include
    parameters such as date, file cycle, ZONE, CICSID, and
    SYSID.

  o Report global exits

    Global exits, which are invoked by specific inquiries as
    documented in this guide, enable you to specify global
    input selection criteria and to manipulate report
    elements such as application IDs and system IDs.

  o Global exit overrides

    Global exit overrides, which are invoked after the global
    exits, provide additional flexibility in input data
    selection and are specified through MICF independent
    source statements.  Global exits and their overrides are
    more flexible than the execution parameters since you can
    supply SAS statements for them to manipulate any data
    element in the input file.  However, execution-time
    parameters take precedence over the global exits and
    global exit overrides since they allow you to change
    input selection criteria for each execution of the
    inquiry.

Detailed information on global exits are provided below.

GLOBAL EXITS

Global exits for CICS Analyzer reports are defined in
sharedprefix.MICS.SOURCE(CICRPTGL).  Most of the exits are
defined as dummy SAS macros; however, some are shipped with
default values.  The exits apply to all MICF inquiries in
which they are invoked.  You can override most of the exits
using either independent SAS statements or execution time
parameters.  The following exits, in alphabetical order, are
provided in the CICRPTGL module.

%GAPPL - This exit identifies your CICS application.  The
         default value is CICAPU which is saved in the report
         variable APPL.  You can override the default if you
         wish to use a data element other than CICAPU to
         identify your CICS application, or to manipulate
         CICAPU or other data elements in the input file to
         assign APPL.  When you code the exit, you must
         assign a value to APPL, the application field used
         in CICS Analyzer reports, and APPLLBL, the report
         heading for the APPL field.  The CA MICS data
         elements that are available during this exit include
         all fields in the input file, which by default is
         the CICCAU (CICS Application Unit Activity) file.

         Default exit code:

         %MACRO GAPPL;
          %* SET APPLICATION VALUE;
          %GLOBAL APPLLBL;
          %LET APPLLBL=APPLICATION;
          APPL=CICAPU;
         %MEND GAPPL;

         Sample exit code to use CICACTx for application
         reporting:

         %MACRO GAPPL;
          %* SET APPLICATION VALUE USING CICACT1 FROM CICCSU
             FILE;
          %GLOBAL APPLLBL;
          %LET APPLLBL=APPLICATION;
          APPL=CICACT1;
         %MEND GAPPL;


GLOBAL EXIT OVERRIDE

To override the global exits defined in
sharedprefix.MICS.SOURCE(CICRPTGL) for individual inquiries,
you must redefine the exit macros using independent SAS
statements within the inquiry.  This requires that you modify
the inquiry after it has been copied from the MICF shared
catalog to your private catalog.  Once you have modified and
tested the changes in your private catalog, the inquiry can
then be moved to the shared catalog either as a new inquiry
or replacement for the existing inquiry.

The global exits are currently invoked via %INCLUDE statement
in the Independent Source Statement step of the MICF inquiry.
To override any of the exits, you must redefine the exit
macros after the %INCLUDE statement.  For example, to
override the GAPPL exit to use data element CICACT1 for
application reporting, you can code the following statements
after the %INCLUDE statement for module CICRPTGL:

     %INCLUDE SOURCE(CICRPTGL,$CICRMAC);
     ***** DEFINE GLOBAL EXIT OVERRIDE *********;
     %MACRO GAPPL;
     %* SET APPLICATION VALUE USING CICACT1 FROM CICCSU
        FILE;
      %GLOBAL APPLLBL;
      %LET APPLLBL=APPLICATION;
      APPL=CICACT1;
     %MEND GAPPL;