NetCOBOL V11.0 メッセージ集

2.4.454 JMN2753I-S

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

埋め込みの説明

@1@ : SQL．

例題

[P2753.cob]
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.
000014 END PROGRAM P2753.

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

詳細な説明

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