4. EXCEPTIONS › 4.3 Detailed Exception Descriptions › 06201: Application Avg BMP DL/I Calls Exceed Standard

06201: Application Avg BMP DL/I Calls Exceed Standard

    FILE:            IMS Application Unit Activity
    SAS FILE NAME:   DAYS.IMSIAU01
    SOURCE LOCATION: sharedprefix.MICS.SOURCE(DYIMSEXC)

    SEVERITY:        Critical      (SEVERITY='C')
    MANAGEMENT AREA: Standards     (MGMTAREA='STANDARDS')

    PURPOSE:  Identifies an excessive amount of DL/I calls
for a BMP program run in a given zone.

    RATIONALE:  An excessive number of DL/I calls can be
an indication of non-optimum data base design, inefficient
use of the DC facilities of IMS (multiple short messages), or
non-optimum application processing schemes.

    DEFINITION:  This exception is detected when the number
of DL/I calls exceeds the installation-defined limit for BMPs
in the user-specified zone.

    EXCEPTION STATEMENTS:  The SAS statements identifying the
exception situation and describing the condition are stored
in the source member named in SOURCE LOCATION and are
described below:

*
**  06201
**  APPLICATION AVG BMP DL/I CALLS EXCEED STANDARD;
*;
CALLS = number-of-DL/I-calls
IF IAUTRANS THEN COUNT = IAUDBTOT / IAUTRANS;
ELSE COUNT = 0;
IF
   (IMSAPU = 'application-unit') AND
   ( COUNT > CALLS )
 THEN DO;
  EXCCODE='06201'; SEVERITY='C'; MGMTAREA='STANDARDS';
  EXCDESC1=
  'APPLICATION AVG BMP DL/I CALLS EXCEED STANDARD';
  EXCDESC2=
           ' APPL UNIT =' || IMSAPU ||
           ' AVG CALLS =' || PUT(CALLS,7.);
  LINK HIT;
END;

    THRESHOLD MODIFICATION:  Modify the list of transactions
according to the following conventions:

  application-unit:  The application unit identifier used
     to restrict selection to the desired BMP activity,
     specified as a one to twelve character alphanumeric
     field, must be enclosed in quotes as a standard SAS
     character literal.  Additional identifiers must be
     included in the parenthesis and be connected to the list
     with an OR.  For all application units with an ID
     beginning with SYS or ABC, the specification is:

     AND (IMSAPU=:'SYS' OR IMSAPU=:'ABC')

     For all units with an ID that does not begin with SYS or
     equal ABC006, the specification is:

     AND NOT(IMSAPU=:'SYS' OR IMSAPU='ABC006')

  number-of-DL/I-calls:  Specify the total number of DL/I
     calls as the threshold, including Get without hold, Get
     with hold, Insert, Replace, and Delete calls.

     CALLS=20;