PH67887: U4088 RC3EC RUNNING OUT OF HEAP STORAGE

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• Heap storage is filled with hundreds of thousands of 30 byte
  segments that contain eyecatchers including DLLHADLL and
  IGZXCA31.  The application consists of an AMODE(31) COBOL
  program dynamically calling AMODE(64) COBOL program.
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: Users of Enterprise COBOL 6.4 and later      *
  *                 releases running programs which implement    *
  *                 dynamic calls between AMODE 31 and AMODE 64  *
  *                 COBOL programs or vice versa (ie. AMODE 64   *
  *                 Calling AMODE 31 COBOL programs).            *
  ****************************************************************
  * PROBLEM DESCRIPTION: When transferring control from an AMODE *
  *                      64 (or 31) program to a non same AMODE  *
  *                      program, there is the possibility of    *
  *                      a memory leak resulting in an out of    *
  *                      storage condition. This problem may     *
  *                      demonstrate itself as a SYSTEM          *
  *                      completion code 878 (not enough virtual *
  *                      storage) or other abend such as U4088   *
  *                      (storage condition).                    *
  ****************************************************************
  * RECOMMENDATION: Install the provided PTF.                    *
  ****************************************************************
  When calling between different COBOL AMODE programs, a
  selectnumber of COBOL statements are shared. An example is
  theDISPLAY statement. To coordinate and synchronize the
  output acall back to the AMODE 31 environment is needed to
  share theoutput device. The mechanism to make this call could
  cause an out of storage condition.
  
  COB0604T/K COB0605T/K
  

Problem conclusion

• The COBOL Runtime logic has been fixed. We now track the
  shared functions and avoid repetitive invocations of
  nonessential services to optimize the call strategy.
  

Temporary fix

Comments

APAR Information

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

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

Modules/Macros

• IGZCEV4  IGZCJNI2 IGZLLIBV IGZXAPI  IGZXCA31 IGZXCDA  IGZXD24
  IGZXDMR  IGZXJNI2 IGZXLPIO IGZXLPKA IGZXLPKB IGZXLPKC IGZXLPKD
  IGZXLPKE IGZXLPKF IGZXLPKG IGZXPK2
  

Fix information

• Fixed component name

  LE ENT COBOL LI

• Fixed component ID

  568819812

Applicable component levels

• R7D0 PSY UO05464

     UP25/11/01 P F510

• R7E0 PSY UO05465

     UP25/11/01 P F510

• R7F0 PSY UO05468

     UP25/11/01 P F510

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.