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

2.9.42 ODBC-8766E

SQL文変数“@1@”の従属項目に誤った指定があります.

埋め込みの説明

@1@ : ホスト変数名

例題

[SP8766.cob]
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID.    SP8766.
000003 DATA           DIVISION.
000004 WORKING-STORAGE SECTION.
000005     EXEC SQL BEGIN DECLARE SECTION END-EXEC.
000006 01 STOCK-TABLE1.
000007   02 PRDCTNUM1   PIC S9(4) COMP-5.
000008   02 PRDCTNAM1.
000009     03 PRDCTNML1 PIC S9(4) BINARY.
000010     03 PRDCTNMS1 PIC N(8).
000011 01 STOCK-TABLE2.
000012   02 PRDCTNUM2   PIC S9(4) COMP-5.
000013   02 PRDCTNAM2   OCCURS 3 PIC X(10).
000014 01 STOCK-TABLE3.
000015   02 PRDCTNAM3   OCCURS 3 PIC X(10).
000016   02 PRDCTNUM3   PIC S9(4) COMP-5.
000017 01 STOCK-TABLE4.
000018   02 PRDCTNUM4   OCCURS 2 PIC S9(4) COMP-5.
000019   02 PRDCTNAM4   OCCURS 4 PIC X(10).
000020 01 SQLSTATE     PIC X(5).
000021 01 SQLMSG       PIC X(128).
000022 01 VAR-IND1     PIC S9(4) COMP-5.
000023     EXEC SQL END DECLARE SECTION END-EXEC.
000024 PROCEDURE DIVISION.
000025     EXEC SQL
000026       SELECT PNO INTO :STOCK-TABLE1 FROM STOCK WHERE PNAME = 'TIRE'
000027     END-EXEC
000028     EXEC SQL
000029       SELECT PNO INTO :STOCK-TABLE2 FROM STOCK WHERE PNAME = 'WHEEL'
000030     END-EXEC
000031     EXEC SQL
000032       SELECT PNO INTO :STOCK-TABLE3 FROM STOCK WHERE PNAME = 'SHIFT'
000033     END-EXEC
000034     EXEC SQL
000035       SELECT PNO INTO :STOCK-TABLE4 FROM STOCK WHERE PNAME = 'ENGIN'
000036     END-EXEC
000037     .

SP8766.cob 26: JMN2633I-S SQL文に誤りがあります.ODBC-8766E SQL文変数“STOCK-TABLE1”の従属項目に誤った指定があります.

SP8766.cob 29: JMN2633I-S SQL文に誤りがあります.ODBC-8766E SQL文変数“STOCK-TABLE2”の従属項目に誤った指定があります.

SP8766.cob 32: JMN2633I-S SQL文に誤りがあります.ODBC-8766E SQL文変数“STOCK-TABLE3”の従属項目に誤った指定があります.

SP8766.cob 35: JMN2633I-S SQL文に誤りがあります.ODBC-8766E SQL文変数“STOCK-TABLE4”の従属項目に誤った指定があります.

詳細な説明

該当する行のSQL文中で形式の誤った以下のホスト変数が参照されています.

  • 集団項目がある複数列指定ホスト変数

  • 複数列指定と複数行指定が混在したホスト変数

  • 反復回数が異なる表指定ホスト変数