IBM Support

PI94451: REQUIRE PARENTHESIS AROUND SSRANGE SUB-OPTIONS THAT ARE BEING OVERRIDDEN BY THE COMPILER OPTION DEFAULT USERMOD

A fix is available

Subscribe

You can track all active APARs for this component.

 

APAR status

  • Closed as program error.

Error description

  • Add a syntax check to verify that the SSRANGE sub-options are
    surrounded by a set of parenthesis when assembling the compiler
    default options usermod, IGYCDOP.  When missing, the results
    are not as intended.
    
    For example, if SSRANGE=NOZLEN is coded, then the code
    incorrectly sets SSRANGE to NOSSRANGE with no invalid syntax
    error during the assembly.  (The lack of parenthesis changes
    the logic path.)  The output from the assembly of the usermod
    will say:
    IGY1023 (SSRANGE) SUBSCRIPT RANGE CHECKING WILL NOT BE PERFORMED
    
    Note also that when overriding any compiler option that has
    multiple suboptions, all sub-options must be listed in the
    override and not just some of the sub-options.
    SSRANGE=(NOZLEN) is not valid, but SSRANGE(NOZLEN,ABD) is valid.
    

Local fix

  • Add parenthesis to the SSRANGE option if missing in the default
    compiler options usermod.
    

Problem summary

  • ****************************************************************
    * USERS AFFECTED: Users of the Enterprise COBOL V6.2 compiler  *
    *                 who try to set the default compiler option   *
    *                 SSRANGE=NOZLEN in IGYCDOPT.                  *
    ****************************************************************
    * PROBLEM DESCRIPTION: Incorrect output: When the SSRANGE      *
    *                      syntax as described in the              *
    *                      Customization Guide is not followed,    *
    *                      the compiler incorrectly interprets     *
    *                      SSRANGE=NOZLEN as SSRANGE=NO.           *
    ****************************************************************
    * RECOMMENDATION: Apply the provided PTF.                      *
    ****************************************************************
    When SSRANGE=NOZLEN was specified in IGYCDOPT, the compiler
    incorrectly interpreted it as SSRANGE=NO.  This occurred
    because  other suboptions must be enclosed in parentheses.  If
    the user had specified SSRANGE=(NOZLEN), the compiler would
    have produced an error message because all suboptions are
    required, not just the one whose default value was to be
    overridden.
    

Problem conclusion

  • The compiler has been changed so that it checks for an exact
    match in the case of SSRANGE=NO.  Any characters beyond NO in
    the suboption value will now produce an error message.
    

Temporary fix

Comments

APAR Information

  • APAR number

    PI94451

  • Reported component name

    ENT COBOL FOR Z

  • Reported component ID

    5655EC600

  • Reported release

    620

  • Status

    CLOSED PER

  • PE

    NoPE

  • HIPER

    NoHIPER

  • Special Attention

    NoSpecatt / Xsystem

  • Submitted date

    2018-02-28

  • Closed date

    2018-03-15

  • Last modified date

    2018-04-04

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

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

    PI96234

Modules/Macros

  • IGY8RWTU IGYCASMB IGYCCBE  IGYCCCRT IGYCCICS IGYCCSRV IGYCDGEN
    IGYCDIAG IGYCDMAP IGYCEN$0 IGYCEN$1 IGYCEN$2 IGYCEN$3 IGYCEN$4
    IGYCEN$5 IGYCEN$8 IGYCEN$D IGYCEN$R IGYCFGEN IGYCFREE IGYCINIT
    IGYCJA$0 IGYCJA$1 IGYCJA$2 IGYCJA$3 IGYCJA$4 IGYCJA$5 IGYCJA$8
    IGYCJA$D IGYCJA$R IGYCLIBH IGYCLIBO IGYCLIBR IGYCLSTR IGYCLVL0
    IGYCLVL1 IGYCLVL2 IGYCLVL3 IGYCLVL8 IGYCMALL IGYCOPI  IGYCOSCN
    IGYCPGEN IGYCRCTL IGYCRDPR IGYCRDSC IGYCREAL IGYCRWT  IGYCSCAN
    IGYCSIMD IGYCUE$0 IGYCUE$1 IGYCUE$2 IGYCUE$3 IGYCUE$4 IGYCUE$5
    IGYCUE$8 IGYCUE$D IGYCUE$R IGYCXREF IGYDRV   IGYEQCWI IGYMSGE
    IGYMSGK  IGYMSGT  IGYQCBE  IGYWCL   IGYWCLG  IGYZQDRV IGYZQENU
    IGYZQJPN
    

Fix information

  • Fixed component name

    ENT COBOL FOR Z

  • Fixed component ID

    5655EC600

Applicable component levels

  • R620 PSY UI54510

       UP18/03/28 P F803

  • R621 PSY UI54511

       UP18/03/28 P F803

  • R622 PSY UI54512

       UP18/03/28 P F803

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":"620","Edition":"","Line of Business":{"code":"LOB35","label":"Mainframe SW"}}]

Document Information

Modified date:
12 December 2023