A fix is available
APAR status
Closed as program error.
Error description
(COB V5.1) Compile under COB V5.1 gives error: IGYCB7104-U Internal error while compiling function xxxxxxxx. Failed assertion on ../codegen/WCode.hpp:1637.
Local fix
Problem summary
**************************************************************** * USERS AFFECTED: Users of Enterprise COBOL v5.1 compiling * * programs that contain invocations of * * FUNCTION DAY-TO-YYYYDDD with a data name as * * the second argument. * * * **************************************************************** * PROBLEM DESCRIPTION: Compiler ABORT with unrecoverable error * * message IGYCB7104-U. * * * **************************************************************** * RECOMMENDATION: Install the provided PTF. * * * **************************************************************** The compiler was assuming the second argument was a literal and using the internal data name number as a literal number.
Problem conclusion
The compiler has been fixed so it can handle a data name as a the second argument to FUNCTION DAY-TO-YYYYDDD.
Temporary fix
Comments
APAR Information
APAR number
PI40879
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-05-11
Closed date
2015-06-15
Last modified date
2015-07-14
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
UI28607 UI28608 UI28610 PI44923
Modules/Macros
IGYCDOPT IGYCLVL8 IGYCOPI IGYCOPT IGYEEN$8 IGYEJA$8 IGYEUE$8 IGYKCNTL IGYKSTAT IGYLSRVE IGYNSORT IGYPFDAT IGYPFLIB IGYPMBB IGYPMERG IGYPREAD IGYPSORT IGYPSRVE IGYPTEXT IGYSCNTL IGYWINIT IGY1WCOD
Fix information
Fixed component name
ENT COBOL FOR Z
Fixed component ID
5655W3200
Applicable component levels
R510 PSY UI28607
UP15/06/25 P F506
R511 PSY UI28608
UP15/06/25 P F506
R512 PSY UI28610
UP15/06/25 P F506
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:
14 July 2015