PI50268: RATIONAL DEVELOPER FOR SYSTEM Z (RDZ) COBOL PROGRAM CONTAINING COPYBOOK WITH SKIP1 PRIOR TO FD DEFINITION GIVES PARSER ERROR
Fixes are available
Rational Developer for System z Fix Pack 1 (184.108.40.206) for 9.1.1.
Rational Developer for System z Interim Fix 1 for 220.127.116.11
Rational Developer for System z Fix Pack 1 (18.104.22.168) for 9.1.1.
Rational Developer for System z Fix Pack 1 (22.214.171.124) for 9.1.1.
Rational Developer for System z Fix Pack 1 (126.96.36.199) for 9.1.1.
Rational Developer for System z Fix Pack 1 (188.8.131.52) for 9.1.1.
Rational Developer for System z Fix Pack 1 (184.108.40.206) for 9.1.1
Closed as program error.
Rational Developer for System z - RDz - v9.1.1 When you open a program using COBOL editor you will receive a ERROR_TOKEN error if copybook contains a SKIP1 prior to a File Description. For example, in the program you have the following lines: FD TEST-DATA-FILE COPY TEST03. And, in the copybook TEST03, you have the following: SKIP1 BLOCK CONTAINS 0 RECORDS RECORD CONTAINS 600 CHARACTERS LABEL RECORDS ARE STANDARD DATA RECORDS ARE DATA-SUMM-REC DATA-CTRL-REC. The copy statement line in the program will be flagged with an ERROR_TOKEN. If the SKIP1 is not present in the copybook prior ot the file definition description then the parser does not give an error.
Comment out the SKIP1 prior to the file definition description in the copybook.
COBOL Parser was not handling SKIP statements correctly.
COBOL Parser needs to handle SKIP statements (SKIP1, SKIP2, SKIP3) correctly so that parser error is not displayed. The problem listed in this APAR has been resolved with IBM Rational Developer for System z V220.127.116.11 Fix Pack which is available from the Recommended Fixes support download page: http://www-1.ibm.com/support/docview.wss?rs=2294&uid=swg27006335
Reported component name
RATL DEV FOR SY
Reported component ID
NoSpecatt / Xsystem
Last modified date
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
Fixed component name
RATL DEV FOR SY
Fixed component ID
Applicable component levels