ページの先頭行へ戻る
NetCOBOL for .NET V8.0 メッセージ集
FUJITSU Software

2.3.296 JMN2509I-S

条件文@1@が,無条件文しか指定できないところに指定されています.
@1@文を受け入れます.

引数の説明

@1@:

エラーを検出した文の動詞.

      000001 IDENTIFICATION DIVISION.
      000002 PROGRAM-ID.    P2509.
      000003 ENVIRONMENT    DIVISION.
      000004 DATA           DIVISION.
      000005 WORKING-STORAGE SECTION.
      000006 01 WDA         PIC X.
      000007 PROCEDURE      DIVISION.
      000008     PERFORM 10 TIMES 
      000009       IF WDA = SPACE THEN
      000010         DISPLAY "SPACE"
      000011     END-PERFORM.
      000012 END PROGRAM    P2509.
    

P2509.cob (9) : JMN2509I-S 条件文IFが,無条件文しか指定できないところに指定されています.IF文を受け入れます.

詳細な説明

COBOL言語において,無条件文とは次のいずれかです.

  • 無条件文として区別される文

  • 明示範囲符で閉じた条件文

明示範囲符とは,例えば,IF文に対するEND-IFです.一般に,この診断メッセージが出力されるのは,条件文内に明示範囲符で閉じられていない他の条件文が存在する場合です.

例題プログラムでは,うちPERFORM文の内部にEND-IFで閉じられていないIF文があることが,この診断メッセージが出力される原因です.

この診断メッセージが出力された場合は,条件文とその明示範囲符の対応関係を見直してください.