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

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，節または部まで無効になります．