引数の説明
ホスト変数名 |
例
000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. SP8725. 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 .
SP8725.cob (26) : JMN2633I-S SQL文に誤りがあります.ODBC-8766E SQL文変数“STOCK-TABLE1”の従属項目に誤った指定があります.
SP8725.cob (29) : JMN2633I-S SQL文に誤りがあります.ODBC-8766E SQL文変数“STOCK-TABLE2”の従属項目に誤った指定があります.
SP8725.cob (32) : JMN2633I-S SQL文に誤りがあります.ODBC-8766E SQL文変数“STOCK-TABLE3”の従属項目に誤った指定があります.
SP8725.cob (35) : JMN2633I-S SQL文に誤りがあります.ODBC-8766E SQL文変数“STOCK-TABLE4”の従属項目に誤った指定があります.
詳細な説明
該当する行のSQL文中で形式の誤った以下のホスト変数が参照されています.
集団項目がある複数列指定ホスト変数
複数列指定と複数行指定が混在したホスト変数
反復回数が異なる複数列複数行指定ホスト変数