A fix is available
APAR status
Closed as program error.
Error description
Using Cobol V5.1 the UNSTRING from a delimited character data statement into numeric data items when SIGN is NOT SEPARATE are producing incorrect results compared to CBL V4. This occurs at OPT 0,1 and 2.
Local fix
Problem summary
**************************************************************** * USERS AFFECTED: Enterprise COBOL V5.1 users compiling and * * running programs that contain an UNSTRING * * statement with a numeric receiver. * * * **************************************************************** * PROBLEM DESCRIPTION: Incorrect output: The sign nibble of a * * zoned imbedded signed receiver is * * incorrect. * * * **************************************************************** * RECOMMENDATION: Apply the provided PTF. * * * **************************************************************** For an UNSTRING statement which has an INTO phrase with a zoned imbedded sign data item, the sign is incorrect.
Problem conclusion
The UNSTRING statement compiler and runtime code was changed to correct the handling of a zoned imbedded sign receiver.
Temporary fix
Comments
APAR Information
APAR number
PI64253
Reported component name
ENT COBOL FOR Z
Reported component ID
5655W3200
Reported release
510
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2016-06-15
Closed date
2016-06-24
Last modified date
2016-07-04
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
Modules/Macros
IGYECNTL
Fix information
Fixed component name
ENT COBOL FOR Z
Fixed component ID
5655W3200
Applicable component levels
R510 PSY UI38928
UP16/06/30 P F606
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":"510","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":"510","Edition":"","Line of Business":{"code":"","label":""}}]
Document Information
Modified date:
04 July 2016