【转】Oracle重置序列(不删除重建方式)

Oracle中通常将自增sequence重置为初始1时,都是删除再重建,这种方式有不少弊端,依赖它的函数和存储过程将失效,须要从新编译。不过还有种巧妙的方式,不用删除,利用步长参数,先查出sequence的nextval,记住,把递增改成负的这个值(反过来走),而后再改回来。html

假设须要修改的序列名:seq_namesql

一、select seq_name.nextval from dual;  //假设获得结果5656函数

二、alter sequence seq_name increment by -5655  //注意是-(n-1)spa

三、select seq_name.nextval from dual;  //再查一遍,走一下,重置为1了code

四、alter sequence seq_name increment by 1;  //还原htm

能够写个存储过程,如下是完整的存储过程,而后调用传参便可:blog

 1 create or replace procedure seq_reset(v_seqname varchar2)
 2 as cur_seq number(28);
 3    tsql varchar2(200);
 4 begin
 5    execute immediate 'select ' || v_seqname || '.nextval from dual' into cur_seq;
 6    cur_seq:=-(cur_seq-1);
 7    tsql:='alter sequence ' || v_seqname || ' increment by ' || cur_seq;
 8    execute immediate tsql;
 9    execute immediate 'select ' || v_seqname || '.nextval from dual' into cur_seq;
10    tsql:='alter sequence ' || v_seqname || ' increment by 1';
11    execute immediate tsql;
12 end seq_reset;
13 /

 

 

 

须要调用时,执行(如sequence名称为SEQ_QT_PRCS_ID):rem

1 BEGIN
2     seq_reset('SEQ_QT_PRCS_ID');
3 END;
4 /

 

 

 

转载自《Oracle重置序列(不删除重建方式)》get

相关文章
相关标签/搜索