4. EXCEPTIONS › 4.3 Detailed Exception Descriptions › 00004: Interactive TSO Compilation Service Objective Missed

00004: Interactive TSO Compilation Service Objective Missed

FILE              TSO Interactive Usage Activity
SAS FILE NAME     DETAIL.TSOTSI01
SOURCE LOCATION   sharedprefix.MICS.SOURCE(DYTSOEXC)

SEVERITY          Warning       (SEVERITY='W')
MANAGEMENT AREA   Standards     (MGMTAREA='STANDARDS')

PURPOSE      Identifies interactive compilations that are
             within the installation defined service units
             consumption limit and have not received the
             installation service objective.

RATIONALE    Interactive compilations are productive for
             short programs.  Long compilations may cause
             system service degradation and long waits for
             the user at a locked keyboard.  An installation
             can define a service objective for short
             compiles and encourage users to run long
             compiles as batch jobs.  This exception could be
             multiply defined with objectives for various
             service unit consumption levels.

DEFINITION   This exception is detected when an interactive
             run exceeds the installation defined limits for
             service and consumes less than the defined
             service units.

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

************************************************************;
*
**  00004
**  INTERACTIVE TSO COMPILATION SERVICE OBJECTIVE MISSED
*;
IF (TSIELPTM > elapsed-time
 AND TSISERVU < service-units)
 AND
 (   COMMAND='ASM' OR PROGRAM='ASM'
  OR COMMAND='COBOL' OR PROGRAM='COBOL'
  OR COMMAND='FORT' OR PROGRAM='FORT'
  OR COMMAND='PLI' OR PROGRAM='PLI'
  OR COMMAND='PLIC' OR PROGRAM='PLIC'
  OR COMMAND='GOFORT' OR PROGRAM='GOFORT'
  OR COMMAND='TESTCOB' OR PROGRAM='TESTCOB'
  OR COMMAND='TESTFORT' OR PROGRAM='TESTFORT'
 )
 THEN DO;
    EXCCODE='00004'; SEVERITY='W'; MGMTAREA='STANDARDS';
    EXCDESC1=
    'INTERACTIVE TSO COMPILATION SERVICE OBJECTIVE MISSED';
    EXCDESC2='ELAPSED TIME(HH:MM:SS)= '
             || PUT(TSIELPTM,TIME.);
    LINK HIT;
END;

THRESHOLD      Modify the values used for elapsed time and
MODIFICATION   service units, according to the following
               conventions:

    elapsed-time      The amount of elapsed time is described
                      as hours, minutes, and seconds.  A
                      threshold of 3 minutes and 20 seconds
                      would appear as:

                         TSIELPTM > HMS(0,3,20)

    service-units     The number of service units is
                      specified.  A threshold of 35000
                      service units would appear as:

                         TSISERVU < 35000

    program/command   The name of the command or program
                      compiler is specified as a one to eight
                      character alphanumeric field, and must
                      be enclosed in quotes as a standard SAS
                      character literal.  Additional
                      program/command names must be inserted
                      within the list and be connected to
                      the list with an OR.  For the COBOL
                      compiler, the specification would be:

                         COMMAND='COBOL' OR 'PROGRAM='COBOL'