// JOB GA72252 DOCS 7.2.252 APAR GA72252
* DOCS 7.2.252, Issued by PRP on June 16, 2004
* Revised August 19, 2004
* Status=TESTED Type=OPTIONAL
* -------------------------------------------------------------------
* Problem: Change $R command to $Y command
* This OPTIONAL APAR changes any entered $R command to a $Y
* command.
*
* Refer to issue 169229 for background and details.
*
* -------------------------------------------------------------------
* 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:GA72252 /* 1975-DOC-01-072:GA72252 for VSE/SP */
AFFECTS PHASE=DOCS$A
ALTER 128 0C:FF
AFFECTS PHASE=$DOCSPAT
ALTER  2DE 02DE02E0     : 918074A5     /*PAT1 TM   DEVFLG13,DEV$SRV */
ALTER  2E2 02E202E4     : 4710BDAC     /*     BO   READ81           */
ALTER  2E6 02E602E802EA : D50179C9A2BB /*     CLC  DEVID,$R         */
ALTER  2EC 02EC         : 0778         /*     BNER LINK             */
ALTER  2EE 02EE02F0     : 92E879CA     /*     MVI  DEVID+1,C'Y'     */
ALTER  2F2 02F2         : 07F8         /*     BR   LINK             */
                                       /*                           */
AFFECTS PHASE=DOCSMAIN                 /* FIX AT READ69             */
ALTER 37B4 918074A5     : 58809544     /*     L    LINK,@PAT        */
ALTER 37B8 4710BDAC     : 4D8082DE     /*     BAS  LINK,PAT1        */
/*
/&