SQL> create sequence seq_1 increment by 1 start with 1 maxvalue 999999999; 序列已創建。 SQL> create or replace procedure seq_reset(v_seqname varchar2) as 2 n number(10); 3 tsql varchar2(100); 4 begin 5 execute immediate 'select '||v_seqname||'.nextval from dual' into n; 6 n:=-(n-1); 7 tsql:='alter sequence '||v_seqname||' increment by '|| n; 8 execute immediate tsql; 9 execute immediate 'select '||v_seqname||'.nextval from dual' into n; 10 tsql:='alter sequence '||v_seqname||' increment by 1'; 11 execute immediate tsql; 12 end seq_reset; 13 / 過程已創建。 SQL> select seq_1.nextval from dual; NEXTVAL --------- 2 SQL> / NEXTVAL --------- 3 SQL> / NEXTVAL --------- 4 SQL> / NEXTVAL --------- 5 SQL> exec seq_reset('seq_1'); PL/SQL 過程已成功完成。 SQL> select seq_1.currval from dual; CURRVAL --------- 1 SQL>
這樣可以通過隨時調用此過程,來達到序列重置的目的。 此存儲過程寫的比較倉促,還可以進一步完善,在此就不再進一步講述 Oracle重置序列(不刪除重建方式) Oracle中一般將自增sequence重置為初始1時,都是刪除再重建,這種方式有很多弊端,依賴它的函數和存儲過程將失效,需要重新編譯。 不過還有種巧妙的方式,不用刪除,利用步長參數,先查出sequence的nextval,記住,把遞增改為負的這個值(反過來走),然后再改回來。 假設需要修改的序列名:seq_name 1、select seq_name.nextval from dual; //假設得到結果5656 2、alter sequence seq_name increment by -5655; //注意是-(n-1) 3、select seq_name.nextval from dual;//再查一遍,走一下,重置為1了 4、alter sequence seq_name increment by 1;//還原 可以寫個存儲過程,以下是完整的存儲過程,然后調用傳參即可:
復制代碼 代碼如下:
create or replace procedure seq_reset(v_seqname varchar2) as n number(10); tsql varchar2(100); begin execute immediate 'select '||v_seqname||'.nextval from dual' into n; n:=-(n-1); 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 1'; execute immediate tsql; end seq_reset;