* SCEPTRE AMENDMENT 599
*
* Release:  5.0
* Date:  22 February, 1995
*
* The Overlord monitor will fail with a program error type 5 subtype 1 at
* displacement X21E0 in IIN 1 of module ICL8UCS0SERVICE if an IDMS or TPMS
* service definition named in the MONITORS division of the OSDL can not be
* found in the definitions file.  The most likely reason for this is that the
* service definition has been deleted from the definitions file since the OSDL
* was last processed.
*
* Prior to the program error, Overlord will report the failure to find the
* service definition with one of the following messages:
*
* FAILURE CALLING VME INTERFACE IN UCS_BEGIN_SERVICE_USE(IDMS).  RESULT CODE =
* 9034.
*
* FAILURE CALLING VME INTERFACE IN UCS_BEGIN_SERVICE_USE(TPMS).  RESULT CODE =
* 9034.
*
* The amendment below corrects this error.  Please apply it using the
* procedure described in the Software Notice issued with the Sceptre software.
*
* This amendment applies to both SCEPTRE and SCEPTRE-E.
*
* Module to be amended is: ICL8_UCS_9_MON ( 5000)
*
POINT(UCS093.PATCHES)
ALTER(599,X00,XF0,NAME=UCS_P599/0_P00)
AREA(UCS922.2)
PATCH(X78,X18045D9C,CODE
    LB.L     5      * T.LOADINFO
    LSS.MIP  #X     * T.LOADINFO.SERVICETABLEINDEX
    JN       #A     * JUMP IF SV DEF WAS NOT FOUND
    PRCL     4      * OVERWRITTEN
    STLN.B          * OVERWRITTEN
    RETURN
#A  EXIT
    ALIGN
#X  X2B000001
    X00000058
END,RET=NO,NAME=UCS_P599/0_P01)
AREA(UCS922.4)
PATCH(X78,X18045D9C,CODE
    LB.L     5      * D.LOADINFO
    LSS.MIP  #X     * D.LOADINFO.SERVICETABLEINDEX
    JN       #A     * JUMP IF SV DEF WAS NOT FOUND
    PRCL     4      * OVERWRITTEN
    STLN.B          * OVERWRITTEN
    RETURN
#A  EXIT
    ALIGN
#X  X2B000001
    X00000050
END,RET=NO,NAME=UCS_P599/0_P02)
CHE(X305DDAC7)