在 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 了解如何实现此目的。
我正在尝试使用 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 了解如何实现此目的。