PI78197: CEE0813S insufficient storage creating procedure-pointer via SETstatement or the CEEFETCH macro

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• The COBOL run-time creates function descriptors in an LE
  "additional" heap for function-pointer's and procedure-pointer's
  in SET statements involving dynamic loads, or for the uses of
  the CEEFETCH macro loading COBOL code.
  
  When creating that additional heap, it allows the primary and
  secondary segment sizes to default to those specified in the
  HEAP() run-time option.
  
  This causes memory allocation problems when the HEAP() segment
  sizes are large, especially when ALL31(OFF) is the case,
  although it is also possible with ALL31(ON) where the segment
  size is a significant portion of the REGION size.
  
  The call sequences for this issue are as follows:
  
  CEEFETCH: CEEBFTCH > CEEPGETP > IGZCEV40 > getstg2
  SET:      IGZXPPL > getstg2.
  

Local fix

• Reduce the HEAP() initial segment size to well below half the
  REGION size, or half the available memory below the line if
  ALL31(OFF).
  

Problem summary

• ****************************************************************
  * USERS AFFECTED: Enterprise COBOL V5+ users running programs  *
  *                 that contain SET procedure-pointer           *
  *                 statements or CALLs to CEEFETCH.             *
  *                                                              *
  ****************************************************************
  * PROBLEM DESCRIPTION: Runtime CEE0813S ABEND due to           *
  *                      insufficient storage, when creating     *
  *                      procedure-pointer via SET or CEEFETCH.  *
  *                                                              *
  ****************************************************************
  * RECOMMENDATION: Apply the provided PTF.                      *
  *                                                              *
  ****************************************************************
  When creating the HEAP POOL for storing information about entry
  point for SET or CEEFETCH, the value that the user specified
  for HEAP() LE runtime option is used.  The storage requirement
  for the entry point information is unlikely to be that large.
  

Problem conclusion

• The HEAP POOL created for storing information about entry point
  has been reduced in size.
  

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

• IGZXLPKA
  

Fix information

• Fixed component name

  LE ENT COBOL LI

• Fixed component ID

  568819812

Applicable component levels

• R7A0 PSY UI45690

     UP17/03/31 P F703

• R790 PSY UI45691

     UP17/03/31 P F703

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.