A fix is available
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.1 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 the provided PTF. * * * **************************************************************** 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 number
PI51764
Reported component name
ENT COBOL FOR Z
Reported component ID
5655W3200
Reported release
510
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2015-11-02
Closed date
2015-12-09
Last modified date
2016-01-15
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
Modules/Macros
IGYPSRVE
Fix information
Fixed component name
ENT COBOL FOR Z
Fixed component ID
5655W3200
Applicable component levels
R510 PSY UI33661
UP15/12/16 P F512
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":"5.1","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":"5.1","Edition":"","Line of Business":{"code":"","label":""}}]
Document Information
Modified date:
15 January 2016