IBM Support

PH30117: RBD 9.6 THROWS A COBOL COMPILE ERROR WHERE A VARIABLE IS DECLARED WITH THE "CONST" EGL KEYWORD

Subscribe to this APAR

By subscribing, you receive periodic emails alerting you to the status of the APAR, along with a link to the fix after it becomes available. You can track this item individually or track all items by product.

Notify me when this APAR changes.

Notify me when an APAR for this component changes.

 

APAR status

  • Closed as program error.

Error description

  • The applicable program just contains very simple CONST
    definition ie:
    const JaNein char(1)[2] =["J", "N"];
    const ResStati_PLUS num(3)[1] =[10];
    
    
    The related COBOL output will then include various compile
    errors ie;
    1598  IGYDS0001-W   A blank was missing before character "]" in
    column 49.  A blank was assumed.
    1598  IGYDS1089-S   ""N"" was invalid.  Scanning was resumed at
    the next area "A" item, level-number, or the start of the next
    1598  IGYDS0027-S   Non-COBOL character(s) were found starting
    with "]" in column 49.  The characters were discarded.
    
    
    NB: the exact same code compiles fine with the v9.5.x stream
    

Local fix

Problem summary

  • ****************************************************************
    * USERS AFFECTED:                                              *
    * EGL users implementing COBOL application                     *
    ****************************************************************
    * PROBLEM DESCRIPTION:                                         *
    * Seen in EGL programs incorporating variables with CONST      *
    * definitions                                                  *
    ****************************************************************
    * RECOMMENDATION:                                              *
    ****************************************************************
    

Problem conclusion

  • The issue is fixed in 9.6.0.1
    

Temporary fix

Comments

APAR Information

  • APAR number

    PH30117

  • Reported component name

    RATL BUS DEV

  • Reported component ID

    5724S5000

  • Reported release

    960

  • Status

    CLOSED PER

  • PE

    NoPE

  • HIPER

    NoHIPER

  • Special Attention

    NoSpecatt / Xsystem

  • Submitted date

    2020-10-01

  • Closed date

    2021-07-21

  • Last modified date

    2021-07-21

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

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

Fix information

  • Fixed component name

    RATL BUS DEV

  • Fixed component ID

    5724S5000

Applicable component levels

[{"Line of Business":{"code":"LOB35","label":"Mainframe SW"},"Business Unit":{"code":"BU058","label":"IBM Infrastructure w\/TPS"},"Product":{"code":"SSMQ79","label":"Rational Business Developer"},"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"960"}]

Document Information

Modified date:
22 July 2021