A fix is available
APAR status
Closed as program error.
Error description
An array of USAGE IS NATIONAL isn't displaying correctly when using the Debug Tool. The length of such data isn't passed correctly between COBOL runtime and Debug Tool. This fault is see with decimal numbers.
Local fix
Problem summary
**************************************************************** * USERS AFFECTED: Enterprise COBOL for z/OS users who have * * national numeric data that is defined with * * an OCCURS clause and are using the Debug * * Tool. * * * **************************************************************** * PROBLEM DESCRIPTION: Incorrect output values may be * * displayed when an array containing * * national numeric data is listed or * * monitored using the Debug Tool. The * * first element in the array is * * displayed correctly; subsequent * * elements are incorrect. * * * **************************************************************** * RECOMMENDATION: Apply the provided PTF. * * * **************************************************************** When COBOL formats national data for display, it converts the data from Unicode to EBCDIC before returning it to the Debug Tool. Conversion changes the number of bytes occupied by the element. When displaying an array of national data, the length field was not being reset between elements to reflect the length of the data currently referenced. This resulted in COBOL passing the wrong length to the conversion routine, causing it to fail.
Problem conclusion
Enterprise COBOL for z/OS is changed to reset the data length field between elements when processing national numeric data items in an array.
Temporary fix
Comments
APAR Information
APAR number
PM43857
Reported component name
LE COBOL LIB
Reported component ID
568819802
Reported release
760
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2011-07-18
Closed date
2011-09-12
Last modified date
2011-10-03
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
UK71832 UK71833 UK71834 UK71835
Modules/Macros
IGZIC41
Fix information
Fixed component name
LE COBOL LIB
Fixed component ID
568819802
Applicable component levels
R750 PSY UK71832
UP11/09/14 P F109
R760 PSY UK71833
UP11/09/14 P F109
R770 PSY UK71834
UP11/09/14 P F109
R780 PSY UK71835
UP11/09/14 P F109
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.
[{"Line of Business":{"code":"LOB16","label":"Mainframe HW"},"Business Unit":{"code":"BU054","label":"Systems w\/TPS"},"Product":{"code":"SG27M","label":"APARs - z\/VM environment"},"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"7.6"}]
Document Information
Modified date:
22 January 2021