PH24466: JSON PARSE FOR NULL FOR A GROUP TERMINATES WITH IGZ0339W

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• JSON PARSE for null for a group terminates with IGZ0339W
  

Local fix

• N/A
  

Problem summary

• ****************************************************************
  * USERS AFFECTED: Users of Enterprise COBOL V6.2 and later     *
  *                 releases running programs that parse JSON    *
  *                 'null' value into a COBOL group item using   *
  *                 JSON PARSE statements.                       *
  ****************************************************************
  * PROBLEM DESCRIPTION: When JSON 'null' value is parsed into   *
  *                      a COBOL group item, JSON-CODE special   *
  *                      register is set to 104, indicating an   *
  *                      exception has occurred during JSON      *
  *                      PARSE.                                  *
  *                                                              *
  *                      Additional information could be         *
  *                      obtained when the WITH DETAIL phrase    *
  *                      in JSON PARSE is used. When it is used  *
  *                      the following warning message is        *
  *                      emitted:                                *
  *                                                              *
  *                      IGZ0339W During execution of the JSON   *
  *                      PARSE statement on ... was found to be  *
  *                      incompatible with the matching data     *
  *                      item.                                   *
  ****************************************************************
  * RECOMMENDATION: Apply the provided PTF.                      *
  ****************************************************************
  JSON PARSE statement incorrectly disallows parsing a JSON
  'null' value into a COBOL group item, resulting in
  JSON-CODE of 104 and IGZ0339W warning message.
  
  COB0602T/K COB0603T/K
  

Problem conclusion

• The COBOL Runtime JSON PARSE routine has been modified as
  follows:
  
  When JSON 'null' value is parsed into a COBOL group item,
  no assignment would be made to any of the subordinate items of
  that group. For example,
  
  
  json-texts: {"fred":{"f1":null, "f2":"Z"}}
  
  01 fred.
    03 f1.
      05 fn1 pic x value "W".
    03 f2 pic x value "Y".
  
  JSON PARSE json-texts INTO fred WITH DETAIL
  No value is assigned to the group item 'f1' and
  its subordinate 'fn1', while 'Z' is assigned to the data
  item 'f2'. JSON-CODE is set to 0 if the WITH DETAIL phrase is
  not used.
  
  If the WITH DETAIL phrase is used, the following informational
  messages is emitted and the JSON-STATUS special register is set
  to 33:
  
  IGZ0326I ...data item F1 was not changed because the value of
  the JSON name/value pair at offset 14 was the special value
  null.
  
  IGZ0321I ...no JSON name/value pair matched data item FN1,
  which was thus not modified.
  

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

• IGZCEV4  IGZCMGEN IGZCMGUE IGZLLIBV IGZXAPI  IGZXCDA  IGZXD24
  IGZXDMR  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

• R7A0 PSY UI69401

     UP20/05/27 P F005

• R7B0 PSY UI69403

     UP20/05/27 P F005

• R7C0 PSY UI69405

     UP20/05/27 P F005

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.