* SCEPTRE AMENDMENT 585 
*
* Release: 5.0 
* Date: October 10,1994
* 
* This amendment corrects a problem in Sceptre that can cause a record
* lock to be held indefinitely on the definitions file.  This can cause
* other Sceptre sessions to hang waiting for the lock to be released.
* 
* Please apply this amendment 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_0_SCEPTRE  ( 5000 )
* 
POINT(UCS093.PATCHES)
ALTER(585,X00,XF0,NAME=UCS_P585/0_P00)
POINT(UCS000.SCEPTRE_C)
PATCH(X1B8A,X30840480,CODE * LINE 733
    LCT.L     4            * OVERWRITTEN
    PRCL      4
    LDRL.P    #A           * "DES"
    LSD.L     X5F          * RECORD_KEY
    STD.T
    SLSD.L    X61          * RECORD
    SLSS      X190
    IAD.L     3
    LUH.P     #B           * LEN
    ST.T
    RALN      XD
    CALL.IC   X8A          * UCS_DEFS_FH
    LCT.L     4
    LSS.L     X63          * RESULT FROM READ
    JZ        X1B94        * LINE 738
    J         X1B90        * LINE 736
    ALIGN
#A  X18000003
    8
    C'DES'
    ALIGN
#B  X28000001
END,NO,NAME=UCS_P585/0_P01)
CHE(1F513AF6)