4. EXCEPTIONS › 4.3 Detailed Exception Descriptions › 06101: IMS Application Abend

06101: IMS Application Abend

    FILE:            IMS System Incident
    SAS FILE NAME:   DETAIL.IMSINC01
    SOURCE LOCATION: sharedprefix.MICS.SOURCE(DYIMSEXC)

    SEVERITY:        Critical      (SEVERITY='C')
    MANAGEMENT AREA: Availability  (MGMTAREA='AVAILABILITY')

    PURPOSE:  Identifies an IMS application program abend.

    RATIONALE:  Application abends annoy users and induce
extreme overhead in the system as all processing must be
backed out.  Some abends are IMS generated pseudo abends,
such as intent deadlocks (U777), which can be alleviated by
such means as improved scheduling schemes or use of PROCOPT=E
in PSBs.  These abends do not result in stopping the
transaction or program.  Other abends do result in
availability gaps and should be addressed immediately.

    DEFINITION:  This exception is detected when IMS detects
an application abend.

    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:

*
**  06101
**  IMS APPLICATION ABEND
*;
IF INCCODE = '71'X | INCCODE = '72'X
 THEN DO;
  EXCCODE='06101'; SEVERITY='C'; MGMTAREA='AVAILABILITY';
  EXCDESC1 = INCTEXT;
  EXCDESC2= 'PGM=' || PSBNAME  ||
           ' REG=' || INCREGIN ||
           ' TRAN=' || TRANSACT || ' LINE ' ||
           PUT(LINE,4.) || ' PTERM ' ||
           PUT(PTERM,4.) || ' LTERM ' ||
           LTERM;
  LINK HIT;
END;

    THRESHOLD MODIFICATION:  None required