PI82740: CORRECT JSON SUPPRESS I/O ISSUES

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• Error Description
  ----------------------------------------------------------------
  ------------------
  JSON GENERATE incorrect output when using a SUPPRESS keyword:
  - misplaced right brace after suppression;
  - excessive suppression with "Occurs Depending On"/ODO
  - extra comma, after excessive suppression
  

Local fix

• N/A
  

Problem summary

• ****************************************************************
  * USERS AFFECTED: Users of Enterprise COBOL V6.1 compiling     *
  *                 and running COBOL programs that contain      *
  *                 JSON GENERATE statements with the SUPPRESS   *
  *                 phrase.                                      *
  *                                                              *
  ****************************************************************
  * PROBLEM DESCRIPTION: Incorrect output at runtime.            *
  *                                                              *
  ****************************************************************
  * RECOMMENDATION: Apply the provided PTF.                      *
  *                                                              *
  ****************************************************************
  The compiler was not correctly flagging data items for
  suppression for items identified by the SUPPRESS phrase of the
  JSON GENERATE statement, causing elementary data items in some
  circumstances to be unsuppressed in the JSON text output at
  runtime.
  

Problem conclusion

• The compiler was changed to correctly suppress data items from
  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:

Modules/Macros

•    IGYCRCTL
  

Fix information

• Fixed component name

  ENT COBOL FOR Z

• Fixed component ID

  5655EC600

Applicable component levels

• R610 PSY UI48286

     UP17/06/30 P F706

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.