重置oracle序列從指定數字開始
代碼如下:
declare
n number();
v_startnum number():=;從多少開始
v_step number():=;步進
tsql varchar();
v_seqname varchar():=MIP_JF_SEQUENCE;序列名
begin
execute immediate select ||v_seqname||nextval from dual into n;
n:=v_startnumnv_step;從開始
tsql:=alter sequence ||v_seqname|| increment by || n;
execute immediate tsql;
execute immediate select ||v_seqname||nextval from dual into n;
tsql:=alter sequence ||v_seqname|| increment by ||v_step;
execute immediate tsql;
end;
不通過刪除重建方式 重置序列值得簡單方式 一般來講序列在實際開發過程中是經常用到的一種對象通過它來生成主鍵是非常方便的但是有些時候我們需要將其重新置零通常采用的方式就是刪除後重新創建
下面我們來看一下另外一種方式
代碼如下:
SQL> create sequence seq_ increment by start with maxvalue ;
序列已創建
SQL> create or replace procedure seq_reset(v_seqname varchar) as
n number();
tsql varchar();
begin
execute immediate select ||v_seqname||nextval from dual into n;
n:=(n);
tsql:=alter sequence ||v_seqname|| increment by || n;
execute immediate tsql;
execute immediate select ||v_seqname||nextval from dual into n;
tsql:=alter sequence ||v_seqname|| increment by ;
execute immediate tsql;
end seq_reset;
/
過程已創建
SQL> select seq_nextval from dual;
NEXTVAL
SQL> /
NEXTVAL
SQL> /
NEXTVAL
SQL> /
NEXTVAL
SQL> exec seq_reset(seq_);
PL/SQL 過程已成功完成
SQL> select seq_currval from dual;
CURRVAL
SQL>
這樣可以通過隨時調用此過程來達到序列重置的目的
此存儲過程寫的比較倉促還可以進一步完善在此就不再進一步講述
Oracle重置序列(不刪除重建方式)
Oracle中一般將自增sequence重置為初始時都是刪除再重建這種方式有很多弊端依賴它的函數和存儲過程將失效需要重新編譯
不過還有種巧妙的方式不用刪除利用步長參數先查出sequence的nextval記住把遞增改為負的這個值（反過來走）然後再改回來
假設需要修改的序列名seq_name
select seq_namenextval from dual; //假設得到結果
alter sequence seq_name increment by ; //注意是(n)
select seq_namenextval from dual;//再查一遍走一下重置為了
alter sequence seq_name increment by ;//還原
可以寫個存儲過程以下是完整的存儲過程然後調用傳參即可:
代碼如下:
create or replace procedure seq_reset(v_seqname varchar) as n number();
tsql varchar();
begin
execute immediate select ||v_seqname||nextval from dual into n;
n:=(n);
tsql:=alter sequence ||v_seqname|| increment by || n;
execute immediate tsql;
execute immediate select ||v_seqname||nextval from dual into n;
tsql:=alter sequence ||v_seqname|| increment by ;
execute immediate tsql;
end seq_reset;
From:http://tw.wingwit.com/Article/program/Oracle/201311/19001.html
