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

Obtain the fix for this APAR.

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 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.