cobol - 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文で動作します (面白いことに)。

考慮すべきもう 1 つのことは、 を使用END-IFして物事を明示的にすることです。