A fix is available
APAR status
Closed as program error.
Error description
Code containing non ODO table element subscripted using all constant subscripts is compiled with SSRANGE. The compiler diagnoses out of range subscripts at compile time and is also generating code to do the checking at runtime. This leads to an increase in Region requirements during compile.
Local fix
Use NOSSRANGE.
Problem summary
**************************************************************** * USERS AFFECTED: Users of Enterprise COBOL release 5.1 using: * * 1. The SSRANGE compiler option. * * 2. A SORT statement that refers to an SD * * file that has a variable-length record * * and has the same record area as an FD * * file and the program is compiled with * * the DATA(24) compiler option. * * * **************************************************************** * PROBLEM DESCRIPTION: 1. When compiling with the SSRANGE * * compiler option the compiler * * diagnoses literal subscript that are * * out of range, but also generates * * code to do the same check at run * * time. * * 2. When compiling using DATA(24) * * option, a SORT statement that has a * * variable-length record and has the * * same record area as an FD, returns * * a sorted record that has an extra * * two characters at the beginning of * * the record. * * * **************************************************************** * RECOMMENDATION: Apply the provided PTF. * * * **************************************************************** 1. When a table reference has literal subscripts, the compiler should do the SSRANGE check at compile time only and should not generate any code to do the check at run time. 2. When compiling a program with DATA(24) option, the compiler initialized incorrectly the base locator of the same record area of a variable-length SD file and an FD file.
Problem conclusion
1. The compiler was modified to eliminate the generation of the SSRANGE run-time check code for literal subscripts of tables that are defined without OCCURS DEPENDING ON. 2. The compiler was modified to initialize correctly the base locator of the same record area of the SD and the FD when compiling with DATA(24).
Temporary fix
Comments
APAR Information
APAR number
PI26944
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
2014-10-02
Closed date
2014-11-17
Last modified date
2015-01-02
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
Modules/Macros
IGYPSBSC IGYPSRVE IGYPTMGT
Fix information
Fixed component name
ENT COBOL FOR Z
Fixed component ID
5655W3200
Applicable component levels
R510 PSY UI23730
UP14/12/13 P F412
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"},"Platform":[{"code":"PF025","label":"Platform Independent"}],"Line of Business":{"code":"LOB17","label":"Mainframe TPS"}}]
Document Information
Modified date:
30 April 2020