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

2.2.394 JMN1840I-S

翻訳オプションINITONLYが有効な場合,@1@のデータ部に埋込みSQL宣言節は宣言できません.
次の認識できるEND-EXEC,節または部まで無効になります.

引数の説明

@1@:

スタティック定義,オブジェクト定義

      000001 @OPTIONS INITONLY
      000002 IDENTIFICATION DIVISION.
      000003 CLASS-ID.      C1840.
      000004 STATIC.
      000005 DATA           DIVISION.
      000006 WORKING-STORAGE SECTION.
      000007     EXEC SQL BEGIN DECLARE SECTION END-EXEC.
      000008 01  LIST1.
      000009   02  DATA-NO PIC 9(4).
      000010 01  SQLSTATE  PIC X(5).
      000011     EXEC SQL END DECLARE SECTION END-EXEC.
      000012 END STATIC.
      000013 END CLASS     C1840.
    

C1840.cob (7) : JMN1840I-S 翻訳オプションINITONLYが有効な場合,スタティック定義のデータ部に埋込みSQL宣言節は宣言できません.次の認識できるEND-EXEC,節または部まで無効になります.

C1840.cob (11) : JMN1840I-S 翻訳オプションINITONLYが有効な場合,スタティック定義のデータ部に埋込みSQL宣言節は宣言できません.次の認識できるEND-EXEC,節または部まで無効になります.