NetCOBOL V11.1 メッセージ集

2.3.172 JMN1281I-S

END DECLARE SECTION文の構文に誤りがあります．

例題

[C1281.cob]
000001 IDENTIFICATION  DIVISION.
000002 PROGRAM-ID.     C1281.
000003 DATA            DIVISION.
000004 WORKING-STORAGE SECTION.
000005     EXEC SQL BEGIN DECLARE SECTION END-EXEC.
000006 01 HOSTV1.
000007   02 HNUM       PIC S9(4) BINARY.
000008   02 HNAME      PIC X(30).
000009     EXEC SQL END DECLARE END-EXEC.
000010 END PROGRAM     C1281.

C1281.cob 9: JMN1281I-S END DECLARE SECTION文の構文に誤りがあります．