PI73551: For items in a group after a variable length group, the SYSADATA"Parent displacement" field is zero.

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• For items in a group after a variable length group, the SYSADATA
  field described as
  
      Parent displacement: Byte offset from immediate parent of
      the item being defined.
  
  is zero, even though this is a well defined and static value.
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: Users of Enterprise COBOL V5.2 compiling     *
  *                 with the ADATA compiler option and using     *
  *                 the Symbol record of the SYSADATA output     *
  *                 file.                                        *
  *                                                              *
  ****************************************************************
  * PROBLEM DESCRIPTION: Incorrect compiler output: SYSADATA     *
  *                      symbol record field not set: The        *
  *                      parent displacement field in a          *
  *                      SYSADATA symbol record is not set for   *
  *                      a variably-located data item.  The      *
  *                      field is always zero.                   *
  *                                                              *
  ****************************************************************
  * RECOMMENDATION: Apply the provided PTF.                      *
  *                                                              *
  ****************************************************************
  The parent displacement in a SYSADATA symbol record of a
  variably-located data item was always set to zero.
  

Problem conclusion

• The compiler was changed to set correctly the parent
  displacement of a variably-located data item in the SYSADATA
  symbol record.
  

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:

  PI76173

Modules/Macros

•    IGYCRCTL
  

Fix information

• Fixed component name

  ENT COBOL FOR Z

• Fixed component ID

  5655W3200

Applicable component levels

• R520 PSY UI44042

     UP17/01/27 P F701

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.