Cobol 作用域终止符

Question

考虑以下代码。 B的结果是什么？我的问题是 NEXT-SENTENCE 语句会影响哪个终止符？

A = 1
B = 1
C = 1

IF A = B                                  
   IF A = C                                      
      NEXT SENTENCE                                   
   ELSE                                               
      PERFORM SOMETHING THRU SOMETHING-END  
      IF RETKD = 0                                  
         EXIT.                 

B = 2                       
EXIT.                                                 

Answer 1

它应该转到下一个句子，紧接在第一个 EXIT 之后的句点之后。

因此B应该设置为2。

COBOL 由句号终止的句子组成，每个句子可以包含多个语句。 NEXT SENTENCE 作用于句子(很有趣)。

您可能需要考虑的另一件事是使用 END-IF 使事情明确。