埋め込みの説明
@1@ : OCCURS句の最小値
例題
[SP8994.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. SP8994. 000003 DATA DIVISION. 000004 WORKING-STORAGE SECTION. 000005 EXEC SQL BEGIN DECLARE SECTION END-EXEC. 000006 01 STOCK-TABLE. 000007 02 PRDCTINF OCCURS 2 PIC X(1). 000008 02 PRDCTNUM OCCURS 3 PIC S9(4) COMP-5. 000009 02 PRDCTNAM OCCURS 4 PIC X(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 PROCEDURE DIVISION. 000015 EXEC SQL 000016 SELECT PINF,PNO,PNAME INTO :PRDCTINF, :PRDCTNUM, :PRDCTNAM 000017 FROM STOCK WHERE PNAME = 'TIRE' 000018 END-EXEC 000019 .
SP8994.cob 16: JMN2754I-I ODBC-8994W 各SQL文変数に指定されたOCCURS句の反復回数が異なっています.最小値“2”を有効にします.
詳細な説明
1つのSQL文中で使用される複数行指定ホスト変数および表指定ホスト変数の従属項目に指定された反復回数は、すべて同じでなければなりません.同じでない場合、最小の値を反復回数とみなします.