4. EXCEPTIONS › 4.3 IDMS Detail Exception Descriptions
4.3 IDMS Detail Exception Descriptions
This section provides a description of each standard IDMS
exception. They are listed by number, starting at 13001.
The description provides the title, number, and a statement
about the purpose, rationale, and definition of each
exception to give the user some insight as to the meaning and
use of the information.
13001 Terminal Errors
+-----------------+
| E X C 1 3 0 0 1 | Terminal Errors
+-----------------+
FILE: IDMS User Activity File (IDMSUA)
PURPOSE: Identifies terminal transmission errors.
RATIONALE: Transmission errors affect the reliability and
performance of the IDMS system.
DEFINITION: This exception is detected when an IDMS task
reports terminal errors have occurred.
/* **************************************************** **
** 13001 -- TERMINAL ERRORS **
** FILE: DAYS.IDMSUA01 **
** **************************************************** */
IF SUATERRS GT 0 THEN DO;
EXCCODE='13001'; SEVERITY='I'; MGMTAREA='PERFORMANCE';
EXCDESC1= 'TERMINAL ERRORS' ;
EXCDESC2= 'NUMBER OF ERRORS=' || PUT(SUATERRS,4.) ||
' IDMSID=' || PUT(IDMSID,$4.) ||
' IDMTYPE=' || PUT(IDMTYPE,$1.);
LINK HIT;
END;
13002 Storage Kept Exceeds Limit
+-----------------+
| E X C 1 3 0 0 2 | Storage Kept Exceeds Limit
+-----------------+
FILE: IDMS User Activity File (IDMSUA)
PURPOSE: Indicates that storage retained by tasks exceeds a
user-defined limit.
RATIONALE: As more storage is retained by current IDMS
tasks, fewer tasks will be able to execute or the performance
of the existing tasks will be degraded.
DEFINITION: This exception is detected when SUAKPTS exceeds
the user-specified threshold.
/* **************************************************** **
** 13002 -- STORAGE KEPT EXCEEDS LIMIT **
** FILE: DAYS.IDMSUA01 **
** **************************************************** */
IF _SKPT NE . AND SUATTRAN GT 0 THEN DO;
XXX=SUAKPTS/SUATTRAN;
IF XXX GE _SKPT THEN DO;
EXCCODE='13002'; SEVERITY='I'; MGMTAREA='PERFORMANCE';
EXCDESC1= 'STORAGE KEPT EXCEEDS LIMIT' ;
EXCDESC2= 'STORAGE KEPT=' || PUT(XXX,6.) ||
' IDMSID=' || PUT(IDMSID,$4.) ||
' IDMTYPE=' || PUT(IDMTYPE,$1.);
LINK HIT;
END;
END;
13003 Data Base Calls Exceed Limit
+-----------------+
| E X C 1 3 0 0 3 | Data Base Calls Exceed Limit
+-----------------+
FILE: IDMS User Activity File (IDMSUA)
PURPOSE: Indicates tasks which perform an excessive amount
of data base activity.
RATIONALE: Tasks which issue many data base calls may not be
able to perform within user-prescribed service levels and may
also have an adverse effect on other tasks executing in the
same time period.
DEFINITION: This exception is detected when SUADBCLS exceeds
the user-specified threshold.
/* **************************************************** **
** 13003 -- DATA BASE CALLS EXCEEDS LIMIT **
** FILE: DAYS.IDMSUA01 **
** **************************************************** */
IF _DBCLS NE . AND SUATTRAN GT 0 THEN DO;
XXX=SUADBCLS/SUATTRAN;
IF XXX GE _DBCLS THEN DO;
EXCCODE='13003'; SEVERITY='I'; MGMTAREA='PERFORMANCE';
EXCDESC1= 'DATA BASE CALLS EXCEEDS LIMIT' ;
EXCDESC2= 'DB CALLS=' || PUT(XXX,6.) ||
' IDMSID=' || PUT(IDMSID,$4.) ||
' IDMTYPE=' || PUT(IDMTYPE,$1.);
LINK HIT;
END;
END;
13004 Active Storage Exceeds Limit
+-----------------+
| E X C 1 3 0 0 4 | Active Storage Exceeds Limit
+-----------------+
FILE: IDMS User Activity File (IDMSUA)
PURPOSE: Indicates tasks which may exceed storage
utilization guidelines as defined by the user.
RATIONALE: As given tasks use more storage to accomplish
their work, other tasks in the system will be degraded or may
not be able to execute at all due to lack of adequate storage
to obtain the necessary control blocks or buffers for their
execution.
DEFINITION: This exception is detected when SUAUSDS exceeds
the user-specified threshold.
/* **************************************************** **
** 13004 -- ACTIVE STORAGE EXCEEDS LIMIT **
** FILE: DAYS.IDMSUA01 **
** **************************************************** */
IF _ACSTG NE . AND SUATTRAN GT 0 THEN DO;
XXX=SUAUSDS/SUATTRAN;
IF XXX GE _ACSTG THEN DO;
EXCCODE='13004'; SEVERITY='I'; MGMTAREA='PERFORMANCE';
EXCDESC1= 'ACTIVE STORAGE EXCEEDS LIMIT' ;
EXCDESC2= 'ACTIVE STORAGE=' || PUT(XXX,6.) ||
' IDMSID=' || PUT(IDMSID,$4.) ||
' IDMTYPE=' || PUT(IDMTYPE,$1.);
LINK HIT;
END;
END;
13005 ADS/O Levels Exceed Limit
+-----------------+
| E X C 1 3 0 0 5 | ADS/O Levels Exceed Limit
+-----------------+
FILE: IDMS User Activity File (IDMSUA)
PURPOSE: Indicates tasks which exceed a defined level of
ADS/O dialogs as defined by the user.
RATIONALE: With each increase in the program level of an
ADS/O task, the storage and time required to process the task
will increase. This prohibits other tasks from being
executed due to lack of available resources and may elongate
user response times.
DEFINITION: This exception is detected when SUAPLVS exceeds
the user-specified threshold.
/* **************************************************** **
** 13005 -- ADS/O LEVELS EXCEED LIMIT **
** FILE: DAYS.IDMSUA01 **
** **************************************************** */
IF _ADSOL NE . AND SUAPLVS GE _ADSOL THEN DO;
EXCCODE='13005'; SEVERITY='I'; MGMTAREA='PERFORMANCE';
EXCDESC1= 'ADS/O LEVELS EXCEED LIMIT ' ;
EXCDESC2= 'ADS/O LEVELS=' || PUT(SUAPLVS,4.) ||
' IDMSID=' || PUT(IDMSID,$4.) ||
' IDMTYPE=' || PUT(IDMTYPE,$1.);
LINK HIT;
END;
13006 Average System CPU Time Exceeds Limit
+-----------------+
| E X C 1 3 0 0 6 | Average System CPU Time Exceeds Limit
+-----------------+
FILE: IDMS User Activity File (IDMSUA)
PURPOSE: Indicates tasks which may require an excessive
amount of system services or cause the overhead CPU time for
data manipulation to increase due to fragmented or poorly
organized data bases.
RATIONALE: As the amount of time required by the IDMS system
to process a task increases, the ability of the system to
process concurrent tasks decreases. The effect of this may
be realized in longer response times, fewer tasks processed
per given time frame, and the inability of the system to
provide service to users at predefined service levels.
DEFINITION: This exception is detected when the value of
(SUASYSTM/SUATTRAN) exceeds the user-specified threshold.
/* **************************************************** **
** 13006 -- AVERAGE SYSTEM CPU TIME EXCEEDS LIMIT **
** FILE: DAYS.IDMSUA01 **
** **************************************************** */
IF SUATTRAN THEN DO;
XXX=SUASYSTM/SUATTRAN;
IF _AVSYS NE . AND XXX GE _AVSYS THEN DO;
EXCCODE='13006'; SEVERITY='I'; MGMTAREA='PERFORMANCE';
EXCDESC1= 'AVERAGE SYSTEM CPU TIME EXCEEDS LIMIT' ;
EXCDESC2= 'AVERAGE SYSTEM CPU TIME=' || PUT(XXX,5.2) ||
' IDMSID=' || PUT(IDMSID,$4.) ||
' IDMTYPE=' || PUT(IDMTYPE,$1.);
LINK HIT;
END;
END;
13007 Average User CPU Time Exceeds Limit
+-----------------+
| E X C 1 3 0 0 7 | Average User CPU Time Exceeds Limit
+-----------------+
FILE: IDMS User Activity File (IDMSUA)
PURPOSE: Indicates tasks which require large amounts of CPU
time to complete their work.
RATIONALE: When a given task monopolizes the CPU, it
eliminates the ability of other tasks to obtain the time
required for their execution because only one task may
utilize CPU resources at any given instant of time.
Overutilization of IDMS increases average user response times
because other tasks will have to wait for the availability of
the CPU.
DEFINITION: This exception is detected when the value of
(SUAUSRTM/SUATTRAN) exceeds the user-specified threshold.
/* **************************************************** **
** 13007 -- AVERAGE USER CPU TIME EXCEEDS LIMIT **
** FILE: DAYS.IDMSUA01 **
** **************************************************** */
IF SUATTRAN THEN DO;
XXX=SUAUSRTM/SUATTRAN;
IF _AVUSR NE . AND XXX GE _AVUSR THEN DO;
EXCCODE='13007'; SEVERITY='I'; MGMTAREA='PERFORMANCE';
EXCDESC1= 'AVERAGE USER CPU TIME EXCEEDS LIMIT' ;
EXCDESC2= 'AVERAGE USER CPU TIME=' || PUT(XXX,5.2) ||
' IDMSID=' || PUT(IDMSID,$4.) ||
' IDMTYPE=' || PUT(IDMTYPE,$1.);
LINK HIT;
END;
END;
13008 Maximum Total Response Time Exceeds Limit
+-----------------+
| E X C 1 3 0 0 8 | Maximum Total Response Time Exceeds
+-----------------+ Limit
FILE: IDMS User Activity File (IDMSUA)
PURPOSE: Indicates the longest executing tasks within the
particular IDMS system.
RATIONALE: This helps to identify transactions which require
excessive resources or are unable to process due to some
constraint within the system. It also indicates tasks which
have justifiably large processing requirements whose use
should be restricted or be run other than on line.
DEFINITION: This exception is detected when SUAMXTRT exceeds
the user-specified threshold.
/* **************************************************** **
** 13008 -- MAX. TOTAL RESPONSE TIME EXCEEDS LIMIT **
** FILE: DAYS.IDMSUA01 **
** **************************************************** */
IF _MXTRT NE . AND SUAMXTTM GE _MXTRT THEN DO;
EXCCODE='13008'; SEVERITY='I'; MGMTAREA='PERFORMANCE';
EXCDESC1= 'MAXIMUM TOTAL RESPONSE TIME EXCEEDS LIMIT' ;
EXCDESC2= 'RESPONSE TIME=' || PUT(SUAMXTTM,5.2) ||
' IDMSID=' || PUT(IDMSID,$4.) ||
' IDMTYPE=' || PUT(IDMTYPE,$1.);
LINK HIT;
END;
13009 Maximum Short Response Time Exceeds Limit
+-----------------+
| E X C 1 3 0 0 9 | Maximum Short Response Time Exceeds
+-----------------+ Limit
FILE: IDMS User Activity File (IDMSUA)
PURPOSE: Indicates tasks which exceed user-defined limits
for quick, low resource usage tasks.
RATIONALE: These types of tasks are normally simple, low
overhead transactions. When the time required to process
these tasks increases beyond the limits defined for your
system, this indicates overutilization of the available
resources or some unexpected growth in the user's application
systems.
DEFINITION: This exception is detected when SUAMXSTM exceeds
the user-specified threshold.
/* **************************************************** **
** 13009 -- MAX. SHORT RESPONSE TIME EXCEEDS LIMIT **
** FILE: DAYS.IDMSUA01 **
** **************************************************** */
IF _MXSRT NE . AND SUAMXSTM GE _MXSRT THEN DO;
EXCCODE='13009'; SEVERITY='I'; MGMTAREA='PERFORMANCE';
EXCDESC1= 'MAXIMUM SHORT RESPONSE TIME EXCEEDS LIMIT' ;
EXCDESC2= 'RESPONSE TIME=' || PUT(SUAMXSTM,5.2) ||
' IDMSID=' || PUT(IDMSID,$4.) ||
' IDMTYPE=' || PUT(IDMTYPE,$1.);
LINK HIT;
END;
13010 Maximum Medium Response Time Exceeds
Limit
+-----------------+
| E X C 1 3 0 1 0 | Maximum Medium Response Time Exceeds
+-----------------+ Limit
FILE: IDMS User Activity File (IDMSUA)
PURPOSE: Indicates tasks which exceed user-defined limits
for average, normal resource-intensive transactions.
RATIONALE: Most transactions in the system are classified as
medium response time transactions. When this exception is
reported, it indicates that the majority of resources are
being used by IDMS. This also indicates that the IDMS system
may have been operating at peak throughput when this
threshold was reached.
DEFINITION: This exception is detected when SUAMXMTM exceeds
the user-specified threshold.
/* **************************************************** **
** 13010 -- MAX. MEDIUM RESPONSE TIME EXCEEDS LIMIT **
** FILE: DAYS.IDMSUA01 **
** **************************************************** */
IF _MXMRT NE . AND SUAMXMTM GE _MXMRT THEN DO;
EXCCODE='13010'; SEVERITY='I'; MGMTAREA='PERFORMANCE';
EXCDESC1= 'MAXIMUM MEDIUM RESPONSE TIME EXCEEDS LIMIT' ;
EXCDESC2= 'RESPONSE TIME=' || PUT(SUAMXMTM,5.2) ||
' IDMSID=' || PUT(IDMSID,$4.) ||
' IDMTYPE=' || PUT(IDMTYPE,$1.);
LINK HIT;
END;
13011 Maximum Long Response Time Exceeds Limit
+-----------------+
| E X C 1 3 0 1 1 | Maximum Long Response Time Exceeds
+-----------------+ Limit
FILE: IDMS User Activity File (IDMSUA)
PURPOSE: Indicates tasks which have exceeded the
user-defined limit for long, extensive resource usage
transactions.
RATIONALE: Long transactions that exceed the user-defined
limit indicate that the system may be operating in a degraded
mode because these IDMS tasks are utilizing resources
required by other tasks. Another possibility is that the
task is waiting for an extended period of time for a
particular resource to become available.
DEFINITION: This exception is detected when SUAMXLTM exceeds
the user-specified threshold.
/* **************************************************** **
** 13011 -- MAX. LONG RESPONSE TIME EXCEEDS LIMIT **
** FILE: DAYS.IDMSUA01 **
** **************************************************** */
IF _MXLRT NE . AND SUAMXLTM GE _MXLRT THEN DO;
EXCCODE='13011'; SEVERITY='I'; MGMTAREA='PERFORMANCE';
EXCDESC1= 'MAXIMUM LONG RESPONSE TIME EXCEEDS LIMIT' ;
EXCDESC2= 'RESPONSE TIME=' || PUT(SUAMXLTM,5.2) ||
' IDMSID=' || PUT(IDMSID,$4.) ||
' IDMTYPE=' || PUT(IDMTYPE,$1.);
LINK HIT;
END;
13012 Maximum Conversational Response Time
Exceeds Limit
+-----------------+
| E X C 1 3 0 1 2 | Maximum Conversational Response Time
+-----------------+ Exceeds Limit
FILE: IDMS User Activity File (IDMSUA)
PURPOSE: Indicates tasks which exceed the limits for user-
defined conversations.
RATIONALE: Conversational tasks typically require more
system resources to process because they require these
resources for long periods of time. As the duration of
conversational tasks within the system increases, system
degradation occurs because more of the system's available
resources are being utilized by fewer transactions.
DEFINITION: This exception is detected when SUAMXCTM exceeds
the user-specified threshold.
/* **************************************************** **
** 13012 -- MAX. CONV. RESPONSE TIME EXCEEDS LIMIT **
** FILE: DAYS.IDMSUA01 **
** **************************************************** */
IF _MXCRT NE . AND SUAMXCTM GE _MXCRT THEN DO;
EXCCODE='13012'; SEVERITY='I'; MGMTAREA='PERFORMANCE';
EXCDESC1= 'MAX CONVERSATIONAL RESPONSE TIME EXCEEDS LIMIT';
EXCDESC2= 'RESPONSE TIME=' || PUT(SUAMXCTM,5.2) ||
' IDMSID=' || PUT(IDMSID,$4.) ||
' IDMTYPE=' || PUT(IDMTYPE,$1.);
LINK HIT;
END;
13013 Maximum User Response Time Exceeds Limit
+-----------------+
| E X C 1 3 0 1 3 | Maximum User Response Time
+-----------------+ Exceeds Limit
FILE: IDMS User Activity File (IDMSUA)
PURPOSE: Indicates that special user-defined transactions
have exceeded the predefined limit for acceptable response
times.
RATIONALE: As the limits for user-defined transactions are
exceeded, service levels for the system may not be met.
DEFINITION: This exception is detected when SUAMXUTM exceeds
the user-specified threshold.
/* **************************************************** **
** 13013 -- MAX. USER RESPONSE TIME EXCEEDS LIMIT **
** FILE: DAYS.IDMSUA01 **
** **************************************************** */
IF _MXURT NE . AND SUAMXUTM GE _MXURT THEN DO;
EXCCODE='13013'; SEVERITY='I'; MGMTAREA='PERFORMANCE';
EXCDESC1= 'MAXIMUM USER RESPONSE TIME EXCEEDS LIMIT' ;
EXCDESC2= 'RESPONSE TIME=' || PUT(SUAMXUTM,5.2) ||
' IDMSID=' || PUT(IDMSID,$4.) ||
' IDMTYPE=' || PUT(IDMTYPE,$1.);
LINK HIT;
END;
13020 Task ABENDs
+-----------------+
| E X C 1 3 0 2 0 | Task ABENDs
+-----------------+
FILE: IDMS System Incident File (IDMSIN)
PURPOSE: Identifies task ABENDs.
RATIONALE: It is important to identify the occurrence of
task ABENDs because they affect the reliability and
performance of the IDMS system.
DEFINITION: This exception is detected when an IDMS task
reports a task ABEND.
/* **************************************************** **
** 13020 -- IDMS TASK ABENDS **
** FILE: DETAIL.IDMSIN01 **
** **************************************************** */
IF SINABNDI GT 0 THEN DO;
EXCCODE='13020'; SEVERITY='I'; MGMTAREA='PERFORMANCE';
EXCDESC1= 'IDMS TASK ABENDS';
IF IDMTYPE EQ 'O' THEN
EXCDESC2= 'ABEND CODE = ' || SINABNDC ||
' TASK CODE = ' || SINDCTSK ||
' TERM NAME = ' || SINTERM ;
IF IDMTYPE EQ 'B' THEN
EXCDESC2= 'ABEND CODE = ' || SINABNDC ||
' JOB NAME = ' || SINJOB ||
' PROG NAME = ' || SINPGM ;
IF IDMTYPE EQ 'C' THEN
EXCDESC2= 'ABEND CODE = ' || SINABNDC ||
' TRAN CODE = ' || SINCTRNC ||
' TERM NAME = ' || SINTERM ;
LINK HIT;
END;
