Cobol scoped终结者

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明确的东西.