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

2.3.478 JMN2826I-S

@1@は英数字項目でなければなりません.

引数の説明

@1@:

SQLMSG.

      000001 IDENTIFICATION DIVISION.
      000002 PROGRAM-ID.    P2826.
      000003 ENVIRONMENT    DIVISION.
      000004 DATA           DIVISION.
      000005 WORKING-STORAGE SECTION.
      000006     EXEC SQL BEGIN  DECLARE SECTION END-EXEC.
      000007  01 HVAR1      PIC S9(9) BINARY.
      000008  01 SQLSTATE   PIC X(5).
      000009  01 SQLMSG.
      000010    02          PIC S9(4).
      000011    02          PIC X(50).
      000012     EXEC SQL  END  DECLARE SECTION END-EXEC.
      000013 PROCEDURE      DIVISION.
      000014     EXEC SQL WHENEVER SQLERROR CONTINUE END-EXEC
      000015     EXEC SQL
      000016       SELECT CL1 FROM T1
      000017         INTO :HVAR1
      000018     END-EXEC
      000019 END PROGRAM    P2826.
    

P2826.cob (9) : JMN2826I-S SQLMSGは英数字項目でなければなりません.

詳細な説明

SQL文の実行によって例外事象が発生した場合,例外事象の内容を示すメッセージが応用プログラムに通知されます.SQLMSGは,このメッセージを格納するための領域です.

SQLMSGは,レベル番号01または77の英数字項目として,定義しなければなりません.