カーソルをクローズします。

CLOSE cursor-name

CLOSE 文は、オープンしている カーソル をクローズします。これは現在の結果セットをリリースし、現在カーソルがある行によって設定されたカーソル・ロックを解放します。CLOSE は、再度オープンするときのためにアクセス可能なデータ構造を解放しますが、フェッチや位置付け更新はカーソルが再開するまで許可されません。CLOSE はオープンしたカーソルで発行される必要があります。したがって、宣言されたばかりのカーソルや、クローズされたカーソル上では発行できません。

SQL 文として、埋め込み SQL からのみサポートされていることに注意してください。同様の操作は、ODBC でも ODBC API を使用してサポートされます。

以下は、埋め込み SQL 内で EmpCursor という名前のカーソルをオープンして、クローズする例です。

&sql(DECLARE EmpCursor CURSOR FOR SELECT NameId,ForeName,SurName 
    INTO :nameid,:fname,:sname FROM Person)
&sql(OPEN EmpCursor)
For  &sql(FETCH EmpCursor) quit:SQLCODE  write !,nameid," ",fname," ",sname
&sql(CLOSE EmpCursor)

カーソル DECLARE FETCH OPEN