// JOB GA72242 DOCS 7.2.242 APAR GA72242
* DOCS 7.2.242, Issued by PRP on February 13, 2003
* Revised July 30, 2004
* Status=TESTED Type=REVOKED
* -------------------------------------------------------------------
* Problem: Allow DOCS DUMP to process VSE/ESA 2.6 DUMPS
* *** THIS APAR is REVOKED, it has been superseded by APAR
* GA72254 ***
*
* Correct DOCS DUMP utility so that it can process DUMPS from
* VSE/ESA 2.6 and later releases.
* -------------------------------------------------------------------
* Conditions for applying APAR:
* *** THIS APAR is REVOKED, it has been superseded by APAR
* GA72254 ***
*
* This APAR may be applied at any time, even while the product
* is active. The effect of this APAR will be experienced the
* next time the affected component is executed.
// 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:GA72242 /* 1975-DOC-01-072:GA72242 for VSE/SP */
AFFECTS PHASE=DOCS$A
ALTER 11E 02:FF
AFFECTS PHASE=DOCSDU72
ALTER  7B2 A7B2A7B4     : 4740B800     /*PAT1 BL   INIT27B         */
ALTER  7B6 A7B6A7B8A7BA : D200A678F007 /*     MVC  RFREL,RFTABREL  */
ALTER  7BC A7BC         : 07F8         /*     BR   LINK            */
ALTER  7BE A7BEA7C0     : 4133F050     /*PAT2 LA   R3,80(R3,RF)    */
ALTER  7C2 A7C2A7C4     : 953EA678     /*     CLI  RFREL,RF3E      */
ALTER  7C6 A7C6         : 0748         /*     BLR  LINK            */
ALTER  7C8 A7C8A7CA     : 41303004     /*     LA   R3,4(,R3)       */
ALTER  7CC A7CC         : 07F8         /*     BR   LINK            */
                                       /* FIX AT INIT27A-X'04'     */
ALTER 17A0 4740B800     : 4580A7B2     /*     BAL  LINK,PAT1       */
                                       /* FIX AT INIT27A+X'36'     */
ALTER 17DA 4133F050     : 4580A7BE     /*     BAL  LINK,PAT2       */
                                       /* FIX AT DOCSTBBK DEVSESSA */
ALTER 1D881 0004E800    : 04E80004     /*     ADJUST FOR           */
ALTER 1D885 040015      : 001640       /*       DEVSESSA           */
/*
/&