A fix is available
APAR status
Closed as program error.
Error description
If a table element access is also reference modified, and the ZONECHECK option is in effect, the compiler incorrectly generates a numeric validation of the first table element, even if some other table element is being accessed. This can lead to both incorrectly positive and negative numeric test outcomes if only some table elements contain correct values.
Local fix
Correct the bad data.
Problem summary
**************************************************************** * USERS AFFECTED: Users of Enterprise COBOL 5.2 compiling and * * running programs compiled with the ZONECHECK * * option and containing reference modified * * zoned decimal data items. * * * **************************************************************** * PROBLEM DESCRIPTION: Incorrect output. Reference modified * * zoned decimal data items were being * * checked when they should not have * * been. This could lead to incorrect * * reports of invalid zoned decimal data * * items. * * * **************************************************************** * RECOMMENDATION: Apply the provided PTF. * * * **************************************************************** The compiler was generating code to check reference modified zoned decimal data items when the ZONECHECK compiler option is in effect. However, when reference modification is applied to a zoned decimal data item, the result is an alphanumeric value and such values should not be checked when ZONECHECK is in effect.
Problem conclusion
The compiler was updated to avoid generating code to perform ZONECHECK testing on reference modified zoned decimal data items.
Temporary fix
Comments
APAR Information
APAR number
PI68605
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
2016-09-02
Closed date
2016-09-27
Last modified date
2016-11-25
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
PI70270 128AC7 PI72824
Modules/Macros
IGYCRCTL
Fix information
Fixed component name
ENT COBOL FOR Z
Fixed component ID
5655W3200
Applicable component levels
R520 PSY UI41146
UP16/09/30 P F609
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:
25 November 2016