例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. SP8433.
000003 DATA DIVISION.
000004 WORKING-STORAGE SECTION.
000005 EXEC SQL BEGIN DECLARE SECTION END-EXEC.
000006 01 STOCK-TABLE1.
000007 02 PRDCTNUM PIC S9(4) COMP-5 OCCURS 3.
000008 01 STOCK-TABLE2.
000009 02 PRDCTNAM PIC N(10).
000010 01 SQLSTATE PIC X(5).
000011 01 SQLMSG PIC X(128).
000012 01 VAR-IND1 PIC S9(4) COMP-5.
000013 EXEC SQL END DECLARE SECTION END-EXEC.
000014 01 CNT PIC S9(4) COMP-5.
000015 PROCEDURE DIVISION.
000016 EXEC SQL
000017 SELECT PNO, PNAME INTO :STOCK-TABLE1, :STOCK-TABLE2
000018 FROM STOCK WHERE PRDCTNAM = 'TIRE'
000019 END-EXEC
000020 .
SP8433.cob (17) : JMN2633I-S SQL文に誤りがあります．ODBC-8434E 複数に指定されたホスト変数の指定形体が異なります．
詳細な説明
SQL文中に複数指定されたホスト変数の指定形体が統一されていません．ホスト変数の指定形体を統一してください．