oracle 重置序列从指定数字开始的方法详解

重置oracle序列从指定数字开始

代码如下：

declare 
n number(10); 
v_startnum number(10):=10000001;--从多少开始 
v_step number(10):=1;--步进 
tsql varchar2(200); 
v_seqname varchar2(200):='MIP_JF_SEQUENCE';--序列名 
begin 
execute immediate 'select '||v_seqname||'.nextval from dual' into n; 
n:=v_startnum-n-v_step;--从10000001开始 
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_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;