A fix is available
APAR status
Closed as new function.
Error description
Enhancements to the SSRANGE option to allow zero-length ref mod. The new sub-options for SSRANGE are ZLEN and NOZLEN: SSRANGE(ZLEN | NOZLEN) where: ZLEN - Zero-length reference modifications are allowed and not reported NOZLEN - Zero-length reference modifications are not allowed and are reported default: NOZLEN
Local fix
N/A
Problem summary
**************************************************************** * USERS AFFECTED: Users of Enterprise COBOL V5.2 who would * * like to use the SSRANGE compiler option but * * are prevented from doing so because they * * have programs that have reference * * modifications that have a length * * specification of zero. * * * **************************************************************** * PROBLEM DESCRIPTION: New Function: Customers need SSRANGE * * to not trigger an error for a zero * * length reference modification. This * * APAR adds a new suboption to the * * SSRANGE compiler option to allow zero * * length reference modification. * * * **************************************************************** * RECOMMENDATION: Apply the provided PTF and use the new * * compiler suboption SSRANGE(ZLEN). * **************************************************************** Many COBOL users who are aware that they use zero length reference modifications, would still like to use the SSRANGE compiler option to generate code that checks whether subscripts or indexes try to reference areas outside the region of their associated tables.
Problem conclusion
Temporary fix
Comments
The compiler is changed to add two new suboptions to the SSRANGE compiler option: SSRANGE(NOZLEN)|SSRANGE(ZLEN). +--------------------------------------------------------------+ | Start of changes for: | | Enterprise COBOL for z/OS Programming Guide, SC14-7382-01 | Chapter 17: Compiler options Update the SSRANGE compiler option information to include the new suboptions ZLEN and NOZLEN. SSRANGE(NOZLEN|ZLEN) Use SSRANGE to generate code that checks for out-of-range storage references. The suboptions affect checking of reference modification length specifications: ZLEN - Check that reference modification lengths are greater than or equal to zero. In other words, allow a zero length. NOZLEN - Check that reference modification lengths are greater than or equal to one. In other words, do not allow a zero length. SSRANGE option syntax (for Programming Guide) .-NOSSRANGE---------------------. | | >>-+-------------------------------+----------------->< | | '-SSRANGE--+------------------+-' | .--NOZLEN--. | '-(-+---ZLEN---+-)-' Performance considerations: None | End of changes for: | | Enterprise COBOL for z/OS Programming Guide, SC14-7382-01 | +--------------------------------------------------------------+ +--------------------------------------------------------------+ | Start of changes for: | | Enterprise COBOL for z/OS Customization Guide, SC14-7380-01 | Chapter 2: Enterprise COBOL compiler options Update the SSRANGE compiler option to add the two new suboptions: SSRANGE(NOZLEN)|SSRANGE(ZLEN). Use the same descriptions as the Programming Guide except for different syntax: SSRANGE option syntax (for Customization Guide) .----NO----. >>-SSRANGE=--+---+--+--NOZLEN--+-->> '-*-' '---ZLEN---' Default: SSRANGE=NO Abbreviations: NONE | End of changes for: | | Enterprise COBOL for z/OS Customization Guide, SC14-7380-01 | +--------------------------------------------------------------+
APAR Information
APAR number
PI53044
Reported component name
ENT COBOL FOR Z
Reported component ID
5655W3200
Reported release
520
Status
CLOSED UR1
PE
NoPE
HIPER
NoHIPER
Special Attention
YesSpecatt / New Function / Xsystem
Submitted date
2015-11-25
Closed date
2016-01-22
Last modified date
2016-02-01
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
Modules/Macros
IGYCDOPT IGYCOPI
SC14738201 | SC14738001 |
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.
[{"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":"520","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":"520","Edition":"","Line of Business":{"code":"","label":""}}]
Document Information
Modified date:
01 February 2016