在 COBOL 中显示 N 次段落

Display a Paragraph N times in COBOL

我正在尝试使用 OpenCOBOL v1.1.0 在线编译器调用一个段落 N 次,这就是我正在做的事情:

IDENTIFICATION DIVISION.
PROGRAM-ID. PerformNTimes.

    PROCEDURE DIVISION.
       PERFORM 3 TIMES
         DISPLAY 'IN A-PARA'
       END-PERFORM

       PERFORM B-PARA 3 TIMES.
       STOP RUN.

       B-PARA.
       DISPLAY 'IN B-PARA'

为什么不调用B-PARA?

如果您拥有自己的编译器,可能会方便得多。 OpenCOBOL 现在称为 GnuCOBOL,并且可以从 SourceForge.Net.

获得更多最新版本

您的示例可能无法编译。在 B-PARA 中的 DISPLAY 之后,您没有显示最终 full-stop/period。

在 GnuCOBOL 区域的讨论组中完全支持该产品并协助使用 COBOL:https://sourceforge.net/p/open-cobol/discussion/?source=navbar

终于解决了。关键是每一行都应该以 CRLF 结尾。在 B-PARA 中的 DISPLAY 之后添加一个句点,并以 CRLF 结束每一行。您可以参考 here 了解如何实现此目的。