A fix is available
APAR status
Closed as program error.
Error description
The programmer is taking the address of an 01 record and passing it down to a callee; and, the callee is trying to access the memory beyond the end of it. - Unfortunately they are relying on two things: 1)The memory layout is unchanged between 01 records; 2)The memory of the 2nd 01 records (i.e. TABLE-2) is initialized even though it was never reference in the caller program.
Local fix
Problem summary
**************************************************************** * USERS AFFECTED: Users of Enterprise COBOL V5 compiling * * programs that have unreferenced data items * * with VALUE clauses and using the OPT(0) * * compiler option. * * * **************************************************************** * PROBLEM DESCRIPTION: The VALUE clause is not executed for * * unreferenced programs, even though * * OPT(0) and NOSTGOPT are specified. * * This is different from COBOL V4. * * * **************************************************************** * RECOMMENDATION: Change your programs to not assume data * * or value for unreferenced data items, but * * until that is done, you can apply the * * provided PTF and always compile with OPT(0) * * and NOSTGOPT * * * **************************************************************** The compiler was not generating information about unreferenced data items even with NOSTGOPT and OPT(0). This resulted in no VALUE clause code being generated.
Problem conclusion
The compiler front end was changed to generate information about data items even when unreferenced when compiling with NOSTGOPT and OPT(0). This results in code for the VALUE clauses getting generated and then executed.
Temporary fix
Comments
APAR Information
APAR number
PI21182
Reported component name
ENT COBOL FOR Z
Reported component ID
5655W3200
Reported release
510
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt
Submitted date
2014-07-01
Closed date
2014-07-21
Last modified date
2015-06-03
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
Modules/Macros
IGYWCNTL
Fix information
Fixed component name
ENT COBOL FOR Z
Fixed component ID
5655W3200
Applicable component levels
R510 PSY UI19849
UP14/07/25 P F407
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:
03 June 2015