NetCOBOL for .NET V7.0 メッセージ集

2.3.294 JMN2507I-S

IF DB-EXCEPTION文は，データベース操作文またはIF DB-EXCEPTION文の後しか指定できません．

例

      000001 IDENTIFICATION DIVISION.
      000002 PROGRAM-ID.    P2507.
      000003 ENVIRONMENT    DIVISION.
      000004 DATA           DIVISION.
      000005 WORKING-STORAGE SECTION.
      000006 PROCEDURE      DIVISION.
      000007     IF DB-EXCEPTION IS 10
      000008       GO TO END-PROC.
      000009 END-PROC.
      000010 END PROGRAM    P2507.
    

P2507.cob (7) : JMN2507I-S IF DB-EXCEPTION文は，データベース操作文またはIF DB-EXCEPTION文の後しか指定できません．