A fix is available
APAR status
Closed as program error.
Error description
Due to an ordering problem in the optimizer, an intermediate result has too many digits for the instruction being generated. This problem is specific to ARCH(11) at OPT(1|2).
Local fix
Compile at a lower ARCH() level, such as ARCH(10).
Problem summary
**************************************************************** * USERS AFFECTED: Users of Enterprise COBOL V5.2 compiling * * programs at OPT(1|2) and ARCH(10|11) * * performing multiplication or division of * * PACKED-DECIMAL data items. * * * **************************************************************** * PROBLEM DESCRIPTION: Compiler abend with message * * MSGIGYCB7104-U Internal error while * * compiling function XXXXX. Failed * * assertion on FPTreeEvaluator.cpp:1093. * * * **************************************************************** * RECOMMENDATION: Apply provided service. * **************************************************************** The compiler was performing an optimization that generated an unwanted truncation of packed-decimal data. The compiler recognized the problem and intentionally abended, rather than generate incorrect code.
Problem conclusion
The compiler was fixed to avoid performing the optimization in cases that would generate unwanted truncations.
Temporary fix
Comments
APAR Information
APAR number
PI53705
Reported component name
ENT COBOL FOR Z
Reported component ID
5655W3200
Reported release
520
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2015-12-07
Closed date
2016-01-22
Last modified date
2016-02-01
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
Modules/Macros
IGYCBE
Fix information
Fixed component name
ENT COBOL FOR Z
Fixed component ID
5655W3200
Applicable component levels
R520 PSY UI34689
UP16/01/28 P F601
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":"520","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":"520","Edition":"","Line of Business":{"code":"","label":""}}]
Document Information
Modified date:
01 February 2016