// JOB GA72240 DOCS 7.2.240 APAR GA72240
* DOCS 7.2.240, Issued by PRP on February 13, 2003
* Status=TESTED Type=REQUIRED
* -------------------------------------------------------------------
* Problem: Console flooded with DOC369 message for READHCF RC=1C.
* If DOCSUTIL encounters an overlayed record condition (READHCF RC=28 x'1C')
* while listing records from the VSE Hardcopy file, it may loop and
* fill the console with the same DOC369 error message.
*
* This APAR resolves the problem reported in Info/Sys 8092.
* -------------------------------------------------------------------
* Conditions for applying APAR:
* 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:GA72240 /* 1975-DOC-01-072:GA72240 for VSE/SP */
AFFECTS PHASE=DOCS$A
ALTER 11C 00:FF
AFFECTS PHASE=DOCSLS72
                                       /* PATCH CODE                */
ALTER 1FDC BFDCBFDE : 95401007         /*PAT1 CLI  ERRORID,C' '     */
ALTER 1FE0 BFE0     : 0778             /*     BNER LINK             */
ALTER 1FE2 BFE2BFE4 : 925C1007         /*     MVI  ERRORID,C'*'     */
ALTER 1FE6 BFE6BFE8 : 47F0B3B0         /*     B    MSG              */
                                       /* FIX AT GETHC00+X'34'      */
ALTER 21F0 4580B3B0 : 4580BFDC         /*     BAL  LINK,PAT1        */
ALTER 2566 C6       : F1               /*     DC   CL8'READHC1 '    */
                                       /* FIX AT VESOPENF+X'30'     */
ALTER 266A 4580B3B0 : 4580BFDC         /*     BAL  LINK,PAT1        */
ALTER 2E66 C6       : F2               /*     DC   CL8'READHC2 '    */
/*
/&