PI28000: RATIONAL DEVELOPER FOR SYSTEM Z (RDZ): PL/I PARSER SETS AN ERRORWHEN A BEGIN-END CLAUSE IS NESTED INTO A WHEN OR OTHERWISE BLOCK

Rational Developer for z Systems 9.5
Rational Developer for z Systems Interim Fix 1 for 9.5
Rational Developer for z Systems Refresh Pack 9.5.1
Rational Developer for z Systems Refresh Pack 9.5.1 - Host Options and Utilities
Rational Developer for z Systems Interim Fix 1 for 9.5.1
9.5: PTF UI34563 for Rational Developer for z Systems Host Options
Rational Developer for z Systems Interim Fix 2 for 9.5.1
Rational Developer for System z Fix Pack 1 (9.5.1.1) for 9.5.1.
Rational Developer for z Systems Interim Fix 1 for 9.5.1.1
Rational Developer for z Systems Interim Fix 2 for 9.5.1.1
Rational Developer for z Systems Interim Fix 4 for 9.5.1.1
Rational Developer for System z Fix Pack 2 (9.5.1.1) for 9.5.1.
Rational Developer for System z Fix Pack 3 (9.5.1.1) for 9.5.1.
Rational Developer for System z Fix Pack 4 (9.5.1.4) for 9.5.1.
Rational Developer for System z Fix Pack 5 (9.5.1.5) for 9.5.1.
Rational Developer for System z Fix Pack 5 (9.5.1.6) for 9.5.1.
Rational Developer for z Systems Fix Pack 7 (9.5.1.7) for 9.5.1.
Rational Developer for z Systems Fix Pack 8 (9.5.1.8) for 9.5.1.
Rational Developer for z Systems Fix Pack 9 (9.5.1.9) for 9.5.1.
Rational Developer for z Systems Fix Pack 10 (9.5.1.10) for 9.5.1.
Rational Developer for z Systems Fix Pack 11 (9.5.1.11) for 9.5.1.
Rational Developer for z Systems Fix Pack 12 (9.5.1.12) for 9.5.1.

APAR status

• Closed as fixed if next.

Error description

• Rational Developer for System z - RDz - V9.1.0
  
  PL/I parser sets an error when a BEGIN-END clause is nested
  into a WHEN or OTHERWISE block inside a SELECT clause.
  
  Re-creation steps:
  
  For instance, use the following code:
  
  1  DEST201: PROC () ;
  2    EXODUS:
  3     PUT SKIP;
  4     T1: PROC;
  5         DCL TEST CHAR(2);
  6         SELECT (TEST);
  7             WHEN ('00') DO;
  8             END;
  9           OTHERWISE  DO;
  10                TEST        = '00';
  11                BEGIN;
  12                 GOTO EXODUS;
  13                END;
  14            END;
  15    END T1;
  16 END DEST201;
  
  When opening  the file, a warning sign appears in front of
  line number 10.
  

Local fix

Problem summary

• Modified PL/I parser to handle end statements that close
  multiple blocks of code.
  
  This APAR is being closed FIN with concurrence from the
  submitting customer. This means that a fix to this APAR is
  expected to be delivered from IBM in a release which is being
  developed at the time that the APAR was closed. The latest
  release of the product to exit development at the time this
  APAR was closed was: Rational Developer for z Systems V9.5.
  

Problem conclusion

Temporary fix

Comments

APAR Information

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

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

Fix information

Applicable component levels

• R950 PSY

     UP