NetCOBOL V11.0 メッセージ集

2.3.388 JMN1690I-S

@1@は@2@以外には指定できません． 次の認識できるEND-EXEC，節または部まで無効になります．

埋め込みの説明

@1@ : DCSQL
@2@ : プログラム定義

例題

[C1690.cob]
000001 IDENTIFICATION DIVISION.
000002 CLASS-ID.      C1690.
000003 ENVIRONMENT      DIVISION.
000004 FACTORY.
000005 DATA             DIVISION.
000006 WORKING-STORAGE SECTION.
000007        EXEC DCSQL BEGIN DECLARE SECTION END-EXEC.
000008   01  SQLSTATE PIC X(5).
000009        EXEC DCSQL END DECLARE SECTION END-EXEC.
000010 PROCEDURE        DIVISION.
000011 END FACTORY.
000012 END CLASS C1690.

C1690.cob 7: JMN1690I-S DCSQL機能はプログラム定義以外には指定できません．次の認識できるEND-EXEC，節または部まで無効になります．

C1690.cob 9: JMN1690I-S DCSQL機能はプログラム定義以外には指定できません．次の認識できるEND-EXEC，節または部まで無効になります．