ページの先頭行へ戻る
NetCOBOL V11.1 メッセージ集
FUJITSU Software

2.3.171 JMN1280I-S

BEGIN DECLARE SECTION文の構文に誤りがあります.

例題

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

C1280.cob 5: JMN1280I-S BEGIN DECLARE SECTION文の構文に誤りがあります.