A fix is available
APAR status
Closed as program error.
Error description
Using OPT(1) and TRUNC(BIN) program fails with the following error: IGYCB7104-U Internal error while compiling function xxxx. Failed assertion on ./CodeGenerator.cpp:6965. Compilation terminated.
Local fix
Use opt(0) or trunc(std).
Problem summary
**************************************************************** * USERS AFFECTED: Users of Enterprise COBOL 5.1 compiling * * programs that move a COMP-3 data item to a * * COMP-3 data item in a table, using the * * source COMP-3 data item as the subscript * * * **************************************************************** * PROBLEM DESCRIPTION: Compiler abort with message * * MSGIGYCB7104-U Internal error while * * compiling function * * * **************************************************************** * RECOMMENDATION: Apply the provided PTF. * * * **************************************************************** The compiler was incorrectly calculating some internal state when encountering COBOL code that moves a COMP-3 data item to a COMP-3 data item in a table, using the source COMP-3 data item as the subscript, and was terminating since the state wasn't as it should have been.
Problem conclusion
The compiler was fixed to no longer abort when compiling code that moves a COMP-3 data item to a COMP-3 data item in a table, using the source COMP-3 data item as the subscript.
Temporary fix
Comments
APAR Information
APAR number
PI21950
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
2014-07-14
Closed date
2014-09-26
Last modified date
2014-10-02
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
R510 PSY UI21755
UP14/09/30 P F409
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 2014