IBM Support

PH31492: IDZ COBOL EDITOR EVALUATE WHEN STATEMENT WITH PARENTHESIS MARKS NEXT LINE AS UNREACHABLE CODE

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

  • IBM Developer for Z/OS - IDz - v14.2.3
    
    Using IDz COBOL Editor, if the user opens a program containing
    an EVALUATE WHEN statement with parentheses around a constant
    value, the next line of code might be marked with a warning
    saying "Unreachable code".
    
    For example, on the following piece of code:
           PROCEDURE DIVISION USING TEST20C-COMM.
               evaluate (FunctionCode in test20c-comm)
                 when ('2')
                   perform InitializeProgram
                 when other
                   perform InitializeProgram
               end-evaluate
    
    The next line after "when ('2')" would be marked with the
    Unreachable code warning.
    

Local fix

  • The program can be compiled without problems, despite the
    COBOL Editor warning.
    Remove the parenthesis and the warning will go away.
    

Problem summary

  • See error description.
    

Problem conclusion

  • This issue has been resolved.
    

Temporary fix

Comments

APAR Information

  • APAR number

    PH31492

  • Reported component name

    DEV FOR Z/OS

  • Reported component ID

    5724T0700

  • Reported release

    E20

  • Status

    CLOSED PER

  • PE

    NoPE

  • HIPER

    NoHIPER

  • Special Attention

    NoSpecatt / Xsystem

  • Submitted date

    2020-11-10

  • Closed date

    2021-04-22

  • Last modified date

    2021-04-22

  • 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

    DEV FOR Z/OS

  • Fixed component ID

    5724T0700

Applicable component levels

[{"Line of Business":{"code":"LOB17","label":"Mainframe TPS"},"Business Unit":{"code":"BU054","label":"Systems w\/TPS"},"Product":{"code":"SSQ2R2","label":"Rational Developer for z Systems"},"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"E20"}]

Document Information

Modified date:
23 April 2021