NetCOBOL V11.1 メッセージ集

2.4.296 JMN2507I-S

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

例題

[P2507.cob]
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文の後しか指定できません．