cobol - 解释段落中句号/句号/点的使用

Question

我在业务中使用 COBOL，最初是在一个网站上使用 perform - thru ... 学习的。

现在我换了工作，本地的编程标准不同，所以我需要习惯 PERFORM without THRU。

我对段落中句号/句号/点的使用也有疑问。

您可以使用句号来结束段落中的句子。我这么说是因为我在段落以第一个点结尾的地方读到，而在其他地方我看到句号/句号/点的使用与此不同。

我在下面写了两个结构，我认为它们应该是相等的。是这样吗？

结构A:

       PERFORM 100-WRITING.
       PERFORM 200-FINISH.



100-WRITING.
*-----------
   DISPLAY "HI MY NAME IS FELIPE".
   DISPLAY "THE WORLD IS GREAT".
   DISPLAY "I DONT SPEAK ENGLISH".
200-FINISH.
*----------
   DISPLAY "BYE BYE BABY".
   DISPLAY "ESTO ES TODO".

结构B:

       PERFORM 100-WRITING.
       PERFORM 200-FINISH.



100-WRITING.
*-----------
   DISPLAY "HI MY NAME IS FELIPE"
   DISPLAY "THE WORLD IS GREAT"
   DISPLAY "I DONT SPEAK ENGLISH".
200-FINISH.
*----------
   DISPLAY "BYE BYE BABY"
   DISPLAY "ESTO ES TODO".

Answer 1

您是对的，您显示的代码是等效的。

段落或章节必须以句号/句号/点结束。这意味着段落或部分中的最后一个内容(注释或空行除外)必须是句号/句号/点。

这并不意味着句号/句点/点实际上结束一个段落或部分。你是对的，段落中的句号/句号/点结束一个句子。段落或部分必须仅包含句子。因此，段落或部分必须以句号/句号/点结尾，因为句子必须以 1 结尾。

   PERFORM 100-WRITING
   PERFORM 200-FINISH
   .

100-WRITING.
*-----------
   DISPLAY "HI MY NAME IS FELIPE"
   DISPLAY "THE WORLD IS GREAT"
   DISPLAY "I DONT SPEAK ENGLISH"
   .
200-FINISH.
*----------
   DISPLAY "BYE BYE BABY"
   DISPLAY "ESTO ES TODO"
   . 

自 1985 年 COBOL 标准以来，句子在 COBOL 中的 PROCEDURE DIVISION 中不再真正重要，因此如果编码器使它们变得重要，则只是额外的工作。

我发现像上面这样重写更方便。不要将句号/句号/点附加到任何东西上。只需将其放在自己的一行中即可。那么这意味着您可以在段落/部分中的任何行上移动，而不必担心句号/句点/点是否位于正确的位置，因为它实际上并未附加到任何东西，所以它永远不会移动，直到您在下一段/部分需要它。

但是，您的网站编码标准可能不允许您这样做。你总是可以尝试让它们变得更好:-)