0

我需要解析一些遗留的 COBOL-85 文件,这些文件显示出一些比预期的 80 个字符短的行。下面是一个例子。

   WORKING-STORAGE SECTION.                                         00000000<-- line ends here
   01  VAR1                          PIC S9.                        00000000<-- line ends here
  * COMMENT 1                                                       00000000<-- line ends here
       COPY SQLCA.                             00000000<-- line ends here
  * COMMENT 1                                                       00000000<-- line ends here
       COPY COPY1.                             00000000<-- line ends here
       COPY COPY2.                             00000000<-- line ends here
  * COMMENT 1                                                       00000000<-- line ends here
  * COMMENT 2                                                       00000000<-- line ends here
   05  FILLER                        PIC X(10).                             <-- line ends here
   05  VAR2.                                                        00000000<-- line ends here
       10  VAR3                      PIC  X(8).                     00000000<-- line ends here

这是一种特殊的格式/方言吗?一些文件将 IBM-4381 作为 SOURCE-COMPUTER,而另一些文件则使用 IBM-3090。

顺便说一句,我尝试专门处理 59 字符行的情况,但同一程序中的其他源文件不同,末尾没有注释区域或空格,长度 <= 80 字符。因此,在这些文件中,一行可以有 59 个字符,但不能作为特殊行进行解析,希望在末尾有注释区域。

4

0 回答 0