4. EXCEPTIONS › 4.3 Detailed Exception Descriptions › 04004: CICS Application Exceeds Avg Wait Time Limit

04004: CICS Application Exceeds Avg Wait Time Limit

FILE:             CICS Application Unit Activity File
SAS FILE NAME:    DAYS.CICCAU01
SOURCE LOCATION:  prefix.MICS.USER.SOURCE(DYCICEXC)

SEVERITY:  Warning              (SEVERITY='W')
MANAGEMENT AREA:  Service       (MGMTAREA='SERVICE')

PURPOSE:   Identifies those CICS applications whose average
wait time totalled more than the installation-defined wait
time objective.

RATIONALE:  An installation can set a service objective for
application wait time.  Setting the service objective this
way recognizes the impact of individual applications that
monopolize CICS resources while they are undispatchable.
Such applications may be controlled by transaction class max
task limits or restructuring to resolve such problems as
long-term enqueue lockouts.

DEFINITION:  This exception is detected when an application's
average hourly wait time exceeds the installation's wait time
objective.

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.

************************************************************;
*
**  04004
**  CICS APPLICATION EXCEEDS AVG WAIT TIME LIMIT
*;
SECONDS=seconds;
FORMAT AVG TIME.;
IF CAUTRANS > 0 THEN AVG=CAUWAITM/CAUTRANS; ELSE AVG=0;
IF AVG > SECONDS
THEN DO;
EXCCODE='04004'; SEVERITY='W'; MGMTAREA='SERVICE';
EXCDESC1=
'CICS APPLICATION EXCEEDS AVG WAIT TIME LIMIT';
EXCDESC2= 'APPL=' || CICAPU ||
        ', AVG WAIT TIME=' ||
        PUT(AVG,TIME.);
  LINK HIT;
END;

THRESHOLD MODIFICATION:    Modify the value of seconds to
define your installation's service objective according to the
following convention:

    seconds - The number of wait time seconds in the
       objective.  An objective of five seconds appears as:

          SECONDS = 5;