順序を取得する(Oracle)
ORACLEの順序は Accessなどのオートナンバーみたいなものです。順序をつくるとそこから次々と新しい番号を取得することができます。これを Delphiから利用するのも簡単です。 TQueryの SQLに以下のような SQLを記述するだけです。
| ■ 順序取得のSQLの例 |
SELECT SequenceName.NEXTVAL FROM dual |
この SQLは新しく発行された数値が返ってきます。
それは Fields[0].AsInteger で参照可能です。
| ■ 順序取得のQueryの使用例 |
with Query1 do begin
Open; // SELECT SequenceName.NEXTVAL FROM dual
Result := Fields[0].AsInteger;
Close;
end;
|
| ■ 順序作成のSQLの構文と例 |
CREATE SEQUENCE SEQUENCE名 START WITH 初期値 INCREMENT BY 増分値 MAXVALUE 最大値 CACHE メモリ上にキャッシュする数; CREATE SEQUENCE SEQ_HOGEHOGE START WITH 1 INCREMENT BY 1 MAXVALUE 9999 CACHE 20; |