Type ASSEMBLE
Source Lines : 427
Fixes Applied : 0
Most Recent Version : Tuesday, December 12, 1978
Last Fix ID : [Unmodified]

Module

       DMSITP (INTPROG)

Function

       HANDLE PROGRAM INTERRUPTS, PROCESS SPIE EXITS, PASS
       CONTROL TO PROGRAM CHECK ROUTINE (CMSDOS), PASS CONTROL
       TO DMSBAB TO CHECK FOR LINKAGE TO ABNORMAL TERMINATION
       ROUTINE (CMSDOS).

Attributes

       RE-ENTRANT, NUCLEUS-RESIDENT

Operation

       CMS/OS:
       IF A SPIE EXIT ROUTINE HAS BEEN SPECIFIED, AND IT IS NOT
       ALREADY ACTIVE, THEN CONTROL PASSES THERE, AFTER A 'PIE' HAS
       BEEN ALLOCATED IN USER STORAGE.  WHEN CONTROL RETURNS FROM
       THE EXIT ROUTINE, THE MODIFIED PGM OLD PSW IS LOADED, AFTER
       ANY MODIFIED REGISTERS HAVE BEEN RE-LOADED.

       IF A SPIE EXIT ROUTINE CANNOT BE TAKEN, THEN AN ERROR MESSAGE
       IS TYPED OUT, AND CONTROL IS PASSED TO DMSABN, THE ABEND
       RECOVERY ROUTINE.

       CMS/DOS:
       IF LINKAGE HAS BEEN ESTABLISHED TO A PROGRAM CHECK
       ROUTINE (STXIT PC), CONTROL IS PASSED TO THIS ROUTINE.
       IF NO LINKAGE HAS BEEN ESTABLISHED TO A PROGRAM CHECK
       ROUTINE, A CHECK IS MADE TO SEE IF LINKAGE HAS BEEN
       ESTABLISHED TO AN ABNORMAL TERMINATION ROUTINE (STXIT AB).
       IF SO, CONTROL IS PASSED TO DMSBAB WHICH WILL GIVE CONTROL
       TO THE STXIT AB ROUTINE.
       IF NO PC OR AB ROUTINE CAN BE GIVEN CONTROL, CONTROL
       PASSES TO DMSABN.

Calls to Other Routines

       DMSABNGO -- TO ABEND THE USER.

       DMSFREE -- TO ALLOCATE USER FREE STORAGE FOR A 'PIE'.

       DMSERR -- TO TYPE OUT THE PROGRAM CHECK ERROR MESSAGE.