埋め込みSQL宣言節の始まりを示します。埋め込みSQL宣言節には,SQL中で使用する埋め込み変数および標識変数を指定します。
BEGIN DECLARE SECTION |
SQL中で使用する埋め込み変数を宣言します。
EXEC SQL
BEGIN DECLARE SECTION
END-EXEC.
77 XSCODE PIC X(4).
77 XSNAME PIC X(16).
77 XCOL PIC X(2).
77 XTANKA PIC S9(9) COMP.
77 XZSURYO PIC S9(9) COMP.
EXEC SQL
END DECLARE SECTION
END-EXEC.