A fix is available
APAR status
Closed as program error.
Error description
IGYCB7104-U Internal error while compiling function X. Failed assertion on ilgen/WCodeSymbol.cpp:2527.
Local fix
N/A
Problem summary
**************************************************************** * USERS AFFECTED: Users of Enterprise COBOL v5.1 compiling * * programs that contain a REDEFINES clause * * where the redefining data item is declared * * with the GLOBAL clause but the redefined * * data item is not declared with the CLOBAL * * clause. * * * **************************************************************** * PROBLEM DESCRIPTION: Compiler ABORT with internal error * * message IGYCB7104-U. * * * **************************************************************** * RECOMMENDATION: Apply the provided PTF. * * * **************************************************************** The compiler did not mark the redefined data item as GLOBAL, so it could not be referenced in a nested program.
Problem conclusion
The compiler was modified to mark the redefined and redefining data items as GLOBAL, if one of them has the GLOBAL attribute. This way, both of them can be used in a nested program.
Temporary fix
Comments
APAR Information
APAR number
PI46566
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-09
Closed date
2015-08-21
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
IGYPSRVE
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