IBM Support

PI68605: WITH ZONECHECK, A CHECK IS INCORRECTLY ALWAYS DONE ON THE FIRST TABLE ELEMENT IF REFERENCE MODIFICATION IS ALSO BEING USED

A fix is available

Subscribe

You can track all active APARs for this component.

 

APAR status

  • Closed as program error.

Error description

  • If a table element access is also reference modified, and the
    ZONECHECK option is in effect, the compiler incorrectly
    generates a numeric validation of the first table element, even
    if some other table element is being accessed.
    
    This can lead to both incorrectly positive and negative numeric
    test outcomes if only some table elements contain correct
    values.
    

Local fix

  • Correct the bad data.
    

Problem summary

  • ****************************************************************
    * USERS AFFECTED: Users of Enterprise COBOL 5.2 compiling and  *
    *                 running programs compiled with the ZONECHECK *
    *                 option and containing reference modified     *
    *                 zoned decimal data items.                    *
    *                                                              *
    ****************************************************************
    * PROBLEM DESCRIPTION: Incorrect output. Reference modified    *
    *                      zoned decimal data items were being     *
    *                      checked when they should not have       *
    *                      been. This could lead to incorrect      *
    *                      reports of invalid zoned decimal data   *
    *                      items.                                  *
    *                                                              *
    ****************************************************************
    * RECOMMENDATION: Apply the provided PTF.                      *
    *                                                              *
    ****************************************************************
    The compiler was generating code to check reference modified
    zoned decimal data items when the ZONECHECK compiler option is
    in effect. However, when reference modification is applied to
    a zoned decimal data item, the result is an alphanumeric value
    and such values should not be checked when ZONECHECK is in
    effect.
    

Problem conclusion

  • The compiler was updated to avoid generating code to perform
    ZONECHECK testing on reference modified zoned decimal data
    items.
    

Temporary fix

Comments

APAR Information

  • APAR number

    PI68605

  • Reported component name

    ENT COBOL FOR Z

  • Reported component ID

    5655W3200

  • Reported release

    520

  • Status

    CLOSED PER

  • PE

    NoPE

  • HIPER

    NoHIPER

  • Special Attention

    NoSpecatt / Xsystem

  • Submitted date

    2016-09-02

  • Closed date

    2016-09-27

  • Last modified date

    2016-11-25

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

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

    PI70270 128AC7Ÿ PI72824

Modules/Macros

  •    IGYCRCTL
    

Fix information

  • Fixed component name

    ENT COBOL FOR Z

  • Fixed component ID

    5655W3200

Applicable component levels

  • R520 PSY UI41146

       UP16/09/30 P F609

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"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"520","Edition":"","Line of Business":{"code":"LOB17","label":"Mainframe TPS"}},{"Business Unit":{"code":"BU054","label":"Systems w\/TPS"},"Product":{"code":"SG19M","label":"APARs - z\/OS environment"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"520","Edition":"","Line of Business":{"code":"","label":""}}]

Document Information

Modified date:
25 November 2016