// JOB GA72248 DOCS 7.2.248 APAR GA72248
* DOCS 7.2.248, Issued by PRP on September 30, 1999
* Revised October 24, 2003
* Status=TESTED Type=REQUIRED
* -------------------------------------------------------------------
* Problem: DOCS may cause an IBM 0D39E DATA LOGGING FAILURE error.
* An error in DOCS may result in a record not being written to
* the IBM Hardcopy file. This condition will result in an
* occurance of message 0D39E LOGGING FAILURE - DATA LOST which
* will be followed by the DOCS message DOC896 HCF INtercept
* Error -
*
* The error can occur if DOCS does not recognize an Action
* required type message and processes it as if it were a
* response.
*
* This APAR is intended to provide a solution to the problem
* described in Info/Sys 8119.
* -------------------------------------------------------------------
* Conditions for applying APAR:
* *------------------------------------------------------*
* * This APAR may only be applied to LIBR format systems *
* * and only affects VSE/ESA Version 2 or later systems. *
* *------------------------------------------------------*
*
* 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:GA72248 /* 1975-DOC-01-072:GA72248 FOR VSE/SP */
AFFECTS PHASE=DOCS$A
ALTER 124 08:FF
                                       /*                            */
AFFECTS PHASE=$DOCSICS                 /*                            */
                                       /* FIX AT IHCFW03A            */
ALTER  456 91086004     : 917C6004     /*     TM    ICSMSGLV,^WTOR  |*/
ALTER  45A 4710B4CA     : 4770B4CA     /*     BNZ   IHCFW03F        |*/
                                       /* FIX AT QHCFW21+X'0C'       */
ALTER  A22 91086004     : 917C6004     /*     TM    ICSMSGLV,^WTOR  |*/
ALTER  A26 4710B108     : 4770B108     /*     BNZ   QHCFW24         |*/
/*
/&