A fix is available
APAR status
Closed as program error.
Error description
Rational Developer for System z (RDz) Some valid COBOL statements that will pass the compiler are flagged as errors and block functions in the editor such as the F3. The following statements will generate errors in the RDz editor but not in the COBOL compiler. Recreation Steps: Add these lines to the PrintApp.cbl from the COBOL Workstation example: If In-name = ('T ' OR ' T') OR ('P ' OR ' P') OR SPACE NEXT SENTENCE ELSE MOVE LENGTH In-name TO In-Len. These 3 warnings are issued: for the ('P ' OR ' P') OR: '?' expected instead of this input for the SPACE I get: 'Positive' expected after this token for the MOVE I get: 'OF' expected after this token
Local fix
Problem summary
Abbreviated combined relation conditions where the first relation condition used an abbreviated form in parentheses are not being parsed successfully by the real-time syntax checking parser. For example, "IF VAR = ('T ' OR ' T') OR ('P ' OR ' P') OR SPACE" was not accepted, but " IF VAR = SPACE OR ('T ' OR ' T') OR ('P ' OR ' P')" was accepted. Both compile successfully. In addition, for the LENGTH OF special register, the OF is required according to the COBOL Language Reference, but accepted by the compiler even if omitted.
Problem conclusion
Added a parsing rule for real-time syntax checking, which accepts abbreviated combined relation conditions where the first relation condition uses an abbreviated form in parentheses. In addition, the OF while in the LENGTH OF special register is now treated as optional. The problem listed in this APAR has been resolved with IBM Rational Developer for System z V8.5.1.1 Fix Pack which is available from the Recommended Fixes support download page: http://www-1.ibm.com/support/docview.wss?rs=2294&uid=swg27006335
Temporary fix
Comments
APAR Information
APAR number
PM71902
Reported component name
RATL DEV FOR SY
Reported component ID
5724T0700
Reported release
803
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt
Submitted date
2012-08-30
Closed date
2013-03-21
Last modified date
2013-03-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 DEV FOR SY
Fixed component ID
5724T0700
Applicable component levels
R850 PSY
UP
[{"Business Unit":{"code":"BU058","label":"IBM Infrastructure w\/TPS"},"Product":{"code":"SSTRMM","label":"IBM Developer for z\/OS"},"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"803","Line of Business":{"code":"LOB35","label":"Mainframe SW"}}]
Document Information
Modified date:
29 October 2021