機能
動的カーソル宣言またはALLOCATE CURSOR文で指定したカーソルを閉じます。
記述形式
一般規則
CLOSE文で指定するカーソルは、開かれた状態であることが必要です。閉じられた状態ならば、例外(不当カーソル状態)となります。
カーソルの名前を指定します。
動的カーソル宣言で定義したカーソルを閉じる場合は、カーソル名を指定します。
ALLOCATE CURSOR文で定義したカーソルを閉じる場合は、拡張カーソル名を指定し、拡張カーソル名の値にカーソルの名前を指定します。
拡張カーソル名は、文字列型の埋込み変数で指定します。拡張カーソル名の値に空白を含む場合は、前後の空白を取り除いた値がカーソルの名前になります。
カーソル名を指定した場合、カーソル名は、同一コンパイル単位に含まれる動的カーソル宣言で定義されていることが必要です。
カーソル名と拡張カーソル名の値が同じでも、異なるカーソルとして区別されます。
使用例
動的OPEN文によりオープンしたカーソルを、動的CLOSE文によりクローズします。なお、可変長文字型の展開規則は、“6.3 SQL埋込みCプログラム”を参照してください。
EXEC SQL BEGIN DECLARE SECTION; VARCHAR CMDAREA[100]; EXEC SQL END DECLARE SECTION; : EXEC SQL ALLOCATE DESCRIPTOR 'DESC1' WITH MAX 50; (1) EXEC SQL DECLARE CU1 CURSOR FOR CMD; (2) strcpy(CMDAREA.sqlvar,"SELECT COL1,COL2,COL3 FROM S1.TBL WHERE COL4 = 38");(3) CMDAREA.sqllen = strlen(CMDAREA.sqlvar); EXEC SQL PREPARE CMD FROM :CMDAREA; (4) EXEC SQL DESCRIBE OUTPUT CMD USING SQL DESCRIPTOR 'DESC1'; (5) : (SQL記述子域に必要な情報を設定) : EXEC SQL OPEN CU1; (6) EXEC SQL FETCH CU1 INTO SQL DESCRIPTOR 'DESC1'; (7) : EXEC SQL CLOSE CU1; (8)
(1) 記述子名DESC1のSQL記述子域を割り当てます。
(2) 動的カーソル宣言によりCU1のカーソルを宣言します。
(3) ホスト変数CMDAREAに動的SELECT文を設定します。
(4) ホスト変数CMDAREAが示すSQL文をSQL文識別子CMDに対応づけます。
(5) SQL文識別子CMDに対応する被準備文の選択リストの情報を記述子名DESC1のSQL記述子域に取り込みます。
(6) 動的OPEN文によりカーソルをオープンします。
(7) 動的FETCH文により記述子名DESC1のSQL記述子域に実行結果を取り込みます。
(8) 動的CLOSE文によりカーソルをクローズします。
拡張カーソル名を指定した場合の例を示します。なお、可変長文字型の展開規則は、“6.3 SQL埋込みCプログラム”を参照してください。
EXEC SQL BEGIN DECLARE SECTION; CHAR CURVAR[4]; CHAR CMDVAR[4]; VARCHAR CMDAREA[100]; EXEC SQL END DECLARE SECTION; : EXEC SQL ALLOCATE DESCRIPTOR 'DESC1' WITH MAX 50; (1) strcpy(CURVAR,"CU1"); (2) strcpy(CMDVAR,"CMD"); (3) strcpy(CMDAREA.sqlvar,"SELECT COL1,COL2,COL3 FROM S1.TBL WHERE COL4 = 38");(4) CMDAREA.sqllen = strlen(CMDAREA.sqlvar); EXEC SQL PREPARE :CMDVAR FROM :CMDAREA; (5) EXEC SQL ALLOCATE :CURVAR CURSOR FOR :CMDVAR; (6) EXEC SQL DESCRIBE OUTPUT :CMDVAR USING SQL DESCRIPTOR 'DESC1'; (7) : (SQL記述子域に必要な情報を設定) : EXEC SQL OPEN :CURVAR; (8) EXEC SQL FETCH :CURVAR INTO SQL DESCRIPTOR 'DESC1'; (9) : EXEC SQL CLOSE :CURVAR; (10)
(1) 記述子名DESC1のSQL記述子域を割り当てます。
(2) ホスト変数CURVARにカーソルの名前CU1を設定します。
(3) ホスト変数CMDVARに被準備文の名前CMDを設定します。
(4) ホスト変数CMDAREAに動的SELECT文を設定します。
(5) ホスト変数CMDAREAが示すSQL文を拡張SQL文識別子CMDVARの値CMDに対応づけます。
(6) 拡張カーソル名CURVARの値CU1と拡張SQL文識別子CMDVARの値CMDを対応づけます。
(7) 拡張SQL文識別子CMDVARの値CMDに対応する被準備文の選択リストの情報を記述子名DESC1のSQL記述子域に取り込みます。
(8) 動的OPEN文によりカーソルをオープンします。
(9) 動的FETCH文により記述子名DESC1のSQL記述子域に実行結果を取り込みます。
(10) 動的CLOSE文によりカーソルをクローズします。