PI55476: PERFORMING A READ AND MOVE OF A VARIABLE LENGTH FILE PRODUCES DIFFERENT RESULTS IN ENTERPRISE COBOL V5 THAN V4

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• When a COBOL V5 program READs in a short record of a variable
  length file, a subsequent MOVE of this record will generate an
  MVCL instruction to move the maximum length. Due to the layout
  of the buffers, the MVCL may fail if there could be destructive
  overlap. This may cause different output than previous versions
  of Enterprise COBOL.
  

Local fix

• Recode application program to MOVE only the number of bytes in
  the record that was read by using reference modification.
  

Problem summary

• ****************************************************************
  * USERS AFFECTED: Users of Enterprise COBOL 5.2 compiling and  *
  *                 running programs that copy data from a       *
  *                 variable length file record to some other    *
  *                 file record using the maximum length of the  *
  *                 source record for the copy operation instead *
  *                 of the actual length of the source record.   *
  *                                                              *
  ****************************************************************
  * PROBLEM DESCRIPTION: Incorrect output: The target file       *
  *                      record may contain incorrect data after *
  *                      the copy operation.                     *
  *                                                              *
  ****************************************************************
  * RECOMMENDATION: Apply provided service.                      *
  *                                                              *
  ****************************************************************
  The COBOL compiler was not taking into account the fact that, in
  certain scenarios, an attempt to copy the maximum number of
  bytes from a variable length file record into some other file
  record can result in an overlapping move which requires special
  handling.
  

Problem conclusion

• The COBOL compiler was updated to take into account the
  possibility of an overlapping move when copying data between
  file records.
  

Temporary fix

Comments

APAR Information

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

  PI51764

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

  128AC7Ÿ

Modules/Macros

• IGYCCBE
  

Fix information

• Fixed component name

  ENT COBOL FOR Z

• Fixed component ID

  5655W3200

Applicable component levels

• R520 PSY UI34689

     UP16/01/28 P F601

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.