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

2.3.450 JMN2753I-S

埋込み@1@文は'END-EXEC'で終らなければなりません.
'EXEC @1@'に続く埋込み@1@文はすべて無効になります

引数の説明

@1@:

SQL.

      000001 IDENTIFICATION DIVISION.
      000002 PROGRAM-ID.    P2753.
      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  77  HVAR1  PIC S9(9) BINARY.
      000009     EXEC SQL  END  DECLARE SECTION END-EXEC.
      000010 PROCEDURE  DIVISION.
      000011     EXEC  SQL
      000012        SELECT CL1 INTO :HVAR1  FROM  TBL
      000013     STOP RUN.
    

P2753.cob (11) : JMN2753I-S 埋込みSQL文は'END-EXEC'で終らなければなりません.'EXEC SQL'に続く埋込みSQL文は,すべて無効になります.

詳細な説明

埋込みSQL文は,SQL先頭子("EXEC SQL")とSQL終了子("END-EXEC")で囲んで記述しなければなりません.