PI48874: FUNCTION RESULT TEMPORARIES FOR NATIONAL-OF(), DISPLAY-OF() ARE NOT REUSED APPROPRIATELY

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• The results of the FUNCTION's NATIONAL-OF() and DISPLAY-OF() are
  written to temporary fields on the stack before being moved to
  the target field. All such calls could reuse the same temporary
  if it were large enough, but this is not being done.
  
  With many calls to or large results from those FUNCTION's, the
  stack frame could become large enough to cause a storage
  shortage, for example a CEE0813S, when running with
  STACK(,,BELOW).
  

Local fix

• N/A
  

Problem summary

• ****************************************************************
  * USERS AFFECTED: Users of Enterprise COBOL 5.2 who have the   *
  *                 STACK(,,BELOW) LE runtime option set in      *
  *                 their environment and are compiling and      *
  *                 running programs that pass large,            *
  *                 alphanumeric data items to intrinsic         *
  *                 functions that return an alphanumeric value  *
  *                 (e.g., NATIONAL-OF, DISPLAY-OF).             *
  *                                                              *
  ****************************************************************
  * PROBLEM DESCRIPTION: Runtime ABEND due to program exhausting *
  *                      stack space: USER COMPLETION CODE=4088  *
  *                      REASON CODE=000003EC, module CEEBINIT.  *
  *                                                              *
  ****************************************************************
  * RECOMMENDATION: Apply provided service.                      *
  ****************************************************************
  The compiler was generating code that did not efficiently
  re-using temps used to hold the intermediate results of
  alphanumeric intrinsic functions so that the runtime STACK
  storage requirement was large.
  

Problem conclusion

• The compiler was updated to generate code that would efficiently
  re-use temps used to hold the intermediate results of
  alphanumeric intrinsic functions, which reduced the need for
  STACK storage and would allow many more programs to run with
  STACK(,,BELOW).
  

Temporary fix

Comments

APAR Information

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

  PI46935

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

  UI31476 UI31477 UI31478

Modules/Macros

• IGYCCBE  IGYCCICS IGYCCSRV IGYCDGEN IGYCDIAG
  IGYCDMAP IGYCEN$D IGYCEN$R IGYCEN$0 IGYCEN$1 IGYCEN$2 IGYCEN$3
  IGYCEN$4 IGYCEN$5 IGYCEN$8 IGYCFGEN IGYCFREE IGYCINIT IGYCJA$D
  IGYCJA$R IGYCJA$0 IGYCJA$1 IGYCJA$2 IGYCJA$3 IGYCJA$4 IGYCJA$5
  IGYCJA$8 IGYCLIBH IGYCLIBO IGYCLIBR IGYCLSTR IGYCLVL0 IGYCLVL1
  IGYCLVL2 IGYCLVL3 IGYCLVL8 IGYCMALL IGYCOSCN IGYCPGEN IGYCRCTL
  IGYCRDPR IGYCRDSC IGYCREAL IGYCRWT  IGYCSCAN IGYCSIMD IGYCUE$D
  IGYCUE$R IGYCUE$0 IGYCUE$1 IGYCUE$2 IGYCUE$3 IGYCUE$4 IGYCUE$5
  IGYCUE$8 IGYCXREF IGYECWI  IGYMSGE  IGYMSGK  IGYMSGT  IGY8RWTU
  

Fix information

• Fixed component name

  ENT COBOL FOR Z

• Fixed component ID

  5655W3200

Applicable component levels

• R520 PSY UI31476

     UP15/09/30 P F509

• R521 PSY UI31477

     UP15/09/30 P F509

• R522 PSY UI31478

     UP15/09/30 P F509

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.