A fix is available
APAR status
Closed as program error.
Error description
When attempting to DISPLAY a USAGE NATIONAL (UTF-16) item, the runtime misinterprets a shift-out (x'0E') or shift-in (x'0F') in the low order byte of a UTF-16 character, allocating an ever larger output buffer until storage exhaustion takes place.
Local fix
DISPLAY FUNCTION HEX-OF(national-item) can be used as a work-around.
Problem summary
**************************************************************** * USERS AFFECTED: Users of Enterprise COBOL V5 and later * * releases running programs compiled with the * * DBCS and * * NSYMBOL(NATIONAL) options, and contain * * DISPLAY statements * * of NATIONAL data items with hex value 0E or * * 0F in the second * * byte of a NATIONAL character, for example * * U+5C0F. * **************************************************************** * PROBLEM DESCRIPTION: The program either fails with * * CEE0813S Insufficient storage or * * produces incorrect * * output when executing a DISPLAY * * statement to display NATIONAL * * data item with hex value 0E or 0F as * * the second byte of the * * NATIONAL character. The program is * * compiled with the DBCS and * * NSYMBOL(NATIONAL) options. * **************************************************************** * RECOMMENDATION: Apply the provided PTF. * **************************************************************** In programs compiled with DBCS and NSYMBOL(NATIONAL) options, the COBOL Runtime had a logic error in the DISPLAY routine when processing NATIONAL data items with hex value 0E or 0F as the second byte of the NATIONAL character. These hex values coincide with the single byte Shift-Out and Shift-In characters. This resulted in either an excessive internal buffer request causing CEE0813S Insufficient storage or incorrect output from DISPLAY. COB0501T/K COB0502T/K COB0601T/K COB0602T/K COB0603T/K
Problem conclusion
The Runtime was fixed to correctly process NATIONAL data items that contain hex value 0E and 0F as the second byte of the NATIONAL character, in programs compiled with the DBCS and NSYMBOL(NATIONAL) options.
Temporary fix
Comments
APAR Information
APAR number
PH38921
Reported component name
LE ENT COBOL LI
Reported component ID
568819812
Reported release
7C0
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2021-07-13
Closed date
2021-07-26
Last modified date
2021-08-09
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
UI76451 UI76452
Modules/Macros
IGZCEV4 IGZCMGEN IGZCMGUE IGZLLIBV IGZXAPI IGZXCDA IGZXD24 IGZXDMR IGZXJNI2 IGZXLPIO IGZXLPKA IGZXLPKB IGZXLPKC IGZXLPKD IGZXLPKE IGZXLPKF IGZXLPKG IGZXPK2
Fix information
Fixed component name
LE ENT COBOL LI
Fixed component ID
568819812
Applicable component levels
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":"LOB35","label":"Mainframe SW"},"Business Unit":{"code":"BU058","label":"IBM Infrastructure w\/TPS"},"Product":{"code":"SS6SG3","label":"Enterprise COBOL for z\/OS"},"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"7C0"}]
Document Information
Modified date:
10 August 2021