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

2.8.48 ODBC-8994W

各SQL文変数に指定されたOCCURS句の反復回数が異なっています.最小値“@1@”を有効にします.

引数の説明

@1@:

OCCURS句の最小値

      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”を有効にします.

詳細な説明

各項目で異なるOCCURS反復回数を持つ集団項目のホスト変数を各基本項目(複数行指定)で参照することはできません.