A fix is available
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.1 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 the provided PTF. * * * **************************************************************** The compiler was generating code that did not efficiently re-use temps used to hold the intermediate results of alphanumeric intrinsic functions so the runtime STACK storage requirement was large.
Problem conclusion
The compiler was updated to generate code that efficiently re-uses temps used to hold the intermediate results of alphanumeric intrinsic functions, which reduces the need for STACK storage and allows many more programs to run with STACK(,,BELOW).
Temporary fix
Comments
APAR Information
APAR number
PI46935
Reported component name
ENT COBOL FOR Z
Reported component ID
5655W3200
Reported release
510
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt
Submitted date
2015-08-14
Closed date
2015-08-24
Last modified date
2015-10-02
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
Modules/Macros
IGYICNTL IGYPARTH IGYPCNTL IGYPCTLS IGYPDBUG IGYPERR IGYPFMOR IGYPFUNC IGYPLINK IGYPMOVE IGYPNATC IGYPSRVE IGYPSTOR IGYPTEXT IGYPTMGT IGYPXGF IGYPXPS IGYRBECB IGYSCNTL IGYTPUTE IGYTTMGT IGYWINIT IGYWSYM
Fix information
Fixed component name
ENT COBOL FOR Z
Fixed component ID
5655W3200
Applicable component levels
R510 PSY UI30482
UP15/09/02 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.
[{"Business Unit":{"code":"BU058","label":"IBM Infrastructure w\/TPS"},"Product":{"code":"SS6SG3","label":"Enterprise COBOL for z\/OS"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"5.1","Edition":"","Line of Business":{"code":"LOB17","label":"Mainframe TPS"}},{"Business Unit":{"code":"BU054","label":"Systems w\/TPS"},"Product":{"code":"SG19M","label":"APARs - z\/OS environment"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"5.1","Edition":"","Line of Business":{"code":"","label":""}}]
Document Information
Modified date:
02 October 2015