// JOB GA72255 DOCS 7.2.255 APAR GA72255
* DOCS 7.2.255, Issued by PRP on March 16, 2005
* Revised August 24, 2005
* Status=TESTED Type=REQUIRED
* -------------------------------------------------------------------
* Problem: FFF Hardwait after DOCS loaned terminal is returned.
* DOCS may cause a FFF Hardwait during Terminal Loan/Return
* processing when a DOCS terminal is returned to DOCS.
*
* -------------------------------------------------------------------
* Conditions for applying APAR:
* This APAR may be applied at any time, however its effect will
* not be experienced until the next time the system is IPL'ed.
// PAUSE *** Enter CANCEL to bypass APAR.  Press ENTER to apply.
// LIBDEF CL,TO=IJSYSRS,FROM=IJSYSRS (target lib) MVT/VSE systems only.
// DEFINE GETVIS=200K                             MVT/VSE systems only.
// EXEC MSHP,SIZE=900K
CORRECT 1975-72-DOC:GA72255 /* 1975-DOC-01-072:GA72255 for VSE/SP */
AFFECTS PHASE=DOCS$A
ALTER 12B 0F:FF
AFFECTS PHASE=DOCS61
ALTER 1FF8 58B0B420 : 47F0B432         /*FIX1 B     PAT1           */
                                       /*                          */
ALTER 2036 B432B434 : 41000018         /*PAT1 LA    R0,SCANCNT     */
ALTER 203A B436B438 : 58100080         /*     L     R1,ASYSCOM     */
ALTER 203E B43AB43C : 58101014         /*     L     R1,ASUPAVT     */
ALTER 2042 B43EB440 : 4B10B42A         /*SCAN SH    R1,=H'4'       */
ALTER 2046 B442B444B446 : D5031000B450 /*     CLC   0(4,R1),CEAX   */
ALTER 204C B448B44A : 4780B458         /*     BE    SGOK           */
ALTER 2050 B44CB44E : 4600B43E         /*     BCT   R0,SCAN        */
ALTER 2054 B450B452 : 00010000         /*CEAX DC    X'00010000'    */
ALTER 2058 B454B456 : 0000D4EE         /*INSO DC    X'0000D4EE'    */
ALTER 205C B458B45A : 41001004         /*SGOK LA    R0,4(,R1)      */
ALTER 2060 B45CB45E : 5820B454         /*     L     R2,INSO        */
ALTER 2064 B460     : 1A29             /*     AR    R2,R9          */
ALTER 2066 B462B464 : 40002002         /*     STH   R0,2(,R2)      */
ALTER 206A B466B468 : 58B0B420         /*     L     RB,=A(VERIFY)  */
ALTER 206E B46A     : 07FB             /*     BR    RB             */
/*
/&