NetCOBOL for .NET V7.0 メッセージ集

2.3.580 JMN2968I-S

SQLINFOAに従属するSQLERRDと，SQLCAに従属するSQLERRDを同時に定義してはいけません．

例

      000001 IDENTIFICATION DIVISION.
      000002 PROGRAM-ID.    P2968.
      000003 ENVIRONMENT    DIVISION.
      000004 DATA           DIVISION.
      000005 WORKING-STORAGE  SECTION.
      000006     EXEC SQL BEGIN  DECLARE SECTION END-EXEC.
      000007  01  SQLSTATE PIC X(5).
      000008  01  SQLCA.
      000009    02 SQLERRD PIC S9(9) BINARY OCCURS 6 TIMES.
      000010  01  SQLINFOA.
      000011    02 SQLERRD PIC S9(9) BINARY OCCURS 6 TIMES.
      000012  77  HVAR3  PIC S9(9) BINARY.
      000013     EXEC SQL  END  DECLARE SECTION END-EXEC.
      000014 PROCEDURE  DIVISION.
      000015     EXEC  SQL
      000016        SELECT CL1 INTO :HVAR3  FROM  TBL
      000017     END-EXEC.
      000018 END PROGRAM P2968.
    

P2968.cob (16) : JMN2968I-S SQLINFOAに従属するSQLERRDと，SQLCAに従属するSQLERRDを同時に定義してはいけません．

詳細な説明

SQLERRDは，以下の2つの情報を格納するための領域です．

• ストアドプロシージャの戻り値(配列の1番目の要素であるSQLERRD(1)を参照します)

• 複数行処理が行われた場合の処理行数(配列の3番目の要素であるSQLERRD(3)を参照します)