PH48857: JSON GENERATE IMPROPERLY SUPPRESSES COMMAS IN JSON OUTPUT WHEN SUPPRESS CLAUSE IS USED

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

Local fix

• BYPASS/CIRCUMVENTION:
  none
  

Problem summary

• ****************************************************************
  * USERS AFFECTED: Users of Enterprise COBOL 6 and later        *
  *                 releases running programs using JSON         *
  *                 GENERATE statement with SUPPRESS phrase.     *
  ****************************************************************
  * PROBLEM DESCRIPTION: The commas separating data-items in     *
  *                      JSON output were incrrectly suppressed  *
  *                      when JSON GENRATE was used to SUPRESS   *
  *                      data-items. This problem occurs when a  *
  *                      suppressed data-item is in between two  *
  *                      non-suppressed data items.              *
  *                                                              *
  *                      Example: 3 data items A, B, and C are   *
  *                      defined.                                *
  *                      Where B is suppressed.                  *
  *                                                              *
  *                      Expected output: A , C                  *
  *                      Actual output : A C                     *
  ****************************************************************
  * RECOMMENDATION: Install the provided PTF.                    *
  ****************************************************************
  When JSON GENERATE with the SUPPRESS phrase was used,
  the commas between non-suppressed data-items were improperly
  suppressed. In the final JSON output the non-suppressed data
  items did not have a comma separating them.
  
  COB0601T/K COB0602T/K COB0603T/K
  

Problem conclusion

• The COBOL Runtime logic has been corrected to ensure a comma is
  printed between every data-item where needed. In case a
  data-item is suppressed, only then the corresponding comma will
  be deleted to ensure there are no extra commas printed in
  the JSON output.
  

Temporary fix

Comments

APAR Information

• APAR is sysrouted FROM one or more of the following:

• APAR is sysrouted TO one or more of the following:

  UI82937 UI82938

Modules/Macros

• IGZCEV4  IGZCJNI2 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

• R7C0 PSY UI82937

     UP22/10/28 P F210

• R7D0 PSY UI82938

     UP22/10/28 P F210

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.