IBM Support

PH40813: MISSING WARNING MESSAGES WHEN JSON ASSIGNMENTS DO NOT FIT INTO DESTINATION TARGETS

A fix is available

Subscribe

You can track all active APARs for this component.

 

APAR status

  • Closed as program error.

Error description

  • Missing warning messages when JSON assignments do not fit into
    destination targets
    

Local fix

Problem summary

  • ****************************************************************
    * USERS AFFECTED: Users of Enterprise COBOL V6 and later       *
    *                 releases running program using JSON PARSE    *
    *                 that parse JSON documents into fixed         *
    *                 character-length UTF-8 data items.           *
    ****************************************************************
    * PROBLEM DESCRIPTION: No warning messages are generated from  *
    *                      JSON PARSE when parsing JSON documents  *
    *                      into fixed character-length UTF-8 data  *
    *                      items where the data in the source      *
    *                      JSON document is larger than its        *
    *                      target destination in the fixed         *
    *                      character-length UTF-8 data item.       *
    ****************************************************************
    * RECOMMENDATION: Install provided PTF.                        *
    ****************************************************************
    There was a logic error in the runtime routine for JSON PARSE
    when a fixed character-length UTF-8 data item was declared with
    a size larger than the size of its target data from a JSON
    document when received from JSON PARSE. A warning message
    informing about the loss of significance was missing.
    
    COB0601T/K COB0602T/K COB0603T/K
    

Problem conclusion

  • The logic in the runtime routine for JSON PARSE has been
    corrected to detect the loss of significance when parsing JSON
    documents and assigning values from JSON PARSE into fixed
    character-length UTF-8 data items.
    

Temporary fix

Comments

APAR Information

  • APAR number

    PH40813

  • 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

    2021-09-22

  • Closed date

    2021-10-27

  • Last modified date

    2021-11-01

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

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

    UI77778 UI77779 UI77780

Modules/Macros

  • IGZCER4  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 UI77778

       UP21/10/30 P F110

  • R7C0 PSY UI77779

       UP21/10/30 P F110

  • R7D0 PSY UI77780

       UP21/10/30 P F110

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