PI89097: After abendx37 on an ADVANCING file, abend0c4 producing an IGZ0034W message reporting source module and offset of abend

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• When writing to files with the ADVANCING phrase, a library
  routine charged with tracking the ADVANCING state is used prior
  to the usual I/O routine. If such a file encounters an out of
  space condition (abendB37 or abendD37), an IGZ0034W message is
  attempted as usual, but the additional library routine may
  confuse the derivation of the incurring module and offset for
  the message text, leading to an abend0c4.
  
  The abend0c4 depends on residual state on the stack, and thus on
  processing in the application prior to the write incurring the
  out of space.
  
  This may be followed by a CEE3542S Unable to find a valid Entry
  Point or PPA1 or PPA2 for this DSA, as for efficiency reasons
  the I/O routines do not fully save registers.
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: Users of Enterprise COBOL V5 and later       *
  *                 releases compiling and running programs      *
  *                 using QSAM File I/O.                         *
  ****************************************************************
  * PROBLEM DESCRIPTION: Run-time abends with ABEND 0C4 when     *
  *                      processing ABEND B37 (data set out of   *
  *                      space condition) for a COBOL user file  *
  *                      where the FILE STATUS clause or an      *
  *                      eligible DECLARATIVE is not defined.    *
  ****************************************************************
  * RECOMMENDATION: Apply the provided PTF.                      *
  ****************************************************************
  When generating runtime message IGZ034W to report ABEND B37 of
  a user COBOL file which does not have FILE STATUS clause and
  does not have an eligible DECLARATIVE defined, the COBOL
  Runtime accesses the COBOL program name using an incorrect
  address.  This led to ABEND 0C4
  

Problem conclusion

• The COBOL runtime library has been fixed to process message
  IGZ034W correctly.
  

Temporary fix

Comments

APAR Information

• APAR is sysrouted FROM one or more of the following:

  PI88376

• APAR is sysrouted TO one or more of the following:

Modules/Macros

• IGZ2OPT  IGZCEV4  IGZCMGEN IGZCMGUE IGZLLIBV IGZXAPI  IGZXCDA
  IGZXD24  IGZXDMR  IGZXLPIO IGZXLPKA IGZXLPKB IGZXLPKC IGZXLPKD
  IGZXLPKE IGZXLPKF IGZXLPKG IGZXOPT  IGZXPK2
  

Fix information

• Fixed component name

  LE ENT COBOL LI

• Fixed component ID

  568819812

Applicable component levels

• R7B0 PSY UI51309

     UP17/10/30 P F710

Fix is available

• Select the PTF appropriate for your component level. You will be required to sign in. Distribution on physical media is not available in all countries.