A fix is available
APAR status
Closed as program error.
Error description
JSON Gen returning a bad result when suppress phrase is used.
Local fix
N/A
Problem summary
**************************************************************** * USERS AFFECTED: Users of Enterprise COBOL 6 and later * * Releases running programs using * * JSON GENERATE with SUPPRESS * * WHEN LOW-VALUES clause. * **************************************************************** * PROBLEM DESCRIPTION: JSON output intermittently displays * * Incorrect results when JSON GENERATE * * with SUPPRESS WHEN LOW-VALUES * * clause is used. COBOL data items in the * * generated JSON document are incorrectly * * suppressed leading to missing * * data-items * * in the JSON output. * **************************************************************** * RECOMMENDATION: Install the provided PTF. * **************************************************************** JSON documents generated using JSON GENERATE with SUPPRESS WHEN LOW-VALUES clause incorrectly intermittently suppresses extra data items COB0601T/K COB0602T/K COB0603T/K
Problem conclusion
The error in the COBOL Runtime logic has been corrected. The problem was resolved by ensuring that a specific data-item is not supressed unless it meets the conditions defined by the SUPPRESS phrase in JSON GENERATE.
Temporary fix
Comments
APAR Information
APAR number
PH44022
Reported component name
ENT COBOL FOR Z
Reported component ID
5655EC600
Reported release
7D0
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2022-02-10
Closed date
2022-02-22
Last modified date
2022-03-01
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
Modules/Macros
IGZCEV4 IGZCMGEN IGZCMGUE IGZLLIBV IGZXAPI IGZXCA31 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
R7B0 PSY UI79452
UP22/03/01 P F202
R7C0 PSY UI79453
UP22/03/01 P F202
R7D0 PSY UI79454
UP22/03/01 P F202
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"},"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"7D0","Line of Business":{"code":"LOB35","label":"Mainframe SW"}}]
Document Information
Modified date:
12 December 2023