CREATE OR REPLACE PROCEDURE seq_reset AS
n NUMBER(10);
tsql VARCHAR2(100);
BEGIN
EXECUTE IMMEDIATE 'select SQD_LSH.nextval from dual'
INTO n;
n := - (n );
tsql := 'alter sequence SQD_LSH increment by ' || n;
EXECUTE IMMEDIATE tsql;
EXECUTE IMMEDIATE 'select SQD_LSH.nextval from dual'
INTO n;
tsql := 'alter sequence SQD_LSH increment by 1';
EXECUTE IMMEDIATE tsql;
n NUMBER(10);
tsql VARCHAR2(100);
BEGIN
EXECUTE IMMEDIATE 'select SQD_LSH.nextval from dual'
INTO n;
n := - (n );
tsql := 'alter sequence SQD_LSH increment by ' || n;
EXECUTE IMMEDIATE tsql;
EXECUTE IMMEDIATE 'select SQD_LSH.nextval from dual'
INTO n;
tsql := 'alter sequence SQD_LSH increment by 1';
EXECUTE IMMEDIATE tsql;
END seq_reset;
先得到sequence的当前值,然后设置其步长为这个值的相反数,在执行nextval相当于减去已经增长的部分,使sequence重新归零,最后恢复步长为1.
然后 创建一个 job 设置成每天运行这个 存储过程即可
本文介绍了一种在Oracle数据库中将序列(sequence)值重置为初始状态的方法。通过存储过程实现序列值的归零,并确保序列增量恢复正常。此外,还提供了一个每日任务计划方案,以定期执行该存储过程。

1990

被折叠的 条评论
为什么被折叠?



