NetCOBOL V11.1 メッセージ集

2.3.255 JMN1466I-S

BEGIN DECLARE SECTION文が，節内で重複しています．

例題

[C1466.cob]
000001 IDENTIFICATION  DIVISION.
000002 PROGRAM-ID.     C1466.
000003 DATA            DIVISION.
000004 WORKING-STORAGE SECTION.
000005     EXEC AQL BEGIN DECLARE SECTION END-EXEC.
000006 01 HNO          PIC S9(4) BINARY.
000007 01 HCTG         PIC X(2).
000008 01 HNAME        PIC X(50).
000009     EXEC AQL BEGIN DECLARE SECTION END-EXEC.
000010 END PROGRAM     C1466.

C1466.cob 9: JMN1466I-S BEGIN DECLARE SECTION文が，節内で重複しています．