Oracle序列更新

Oracle 数据库的时候，有时候会选择使用自增序列作为主键。但是在开发过程中往往会遇到一些不规范的操作，导致表的主键值不是使用序列插入的。这样在数据移植的时候就会出现各种各样的问题。当然数据库主键不使用序列是一种很好的方式，但是维护的是老代码，所以并不能去修改它。于是写一个脚本将当前表的序列更新为主键最大值 + 1。

DECLARE
vnumber NUMBER;
nnumber NUMBER;
BEGIN
    SELECT ((SELECT max(ana_id) FROM ANA_QUALITYSPEC_MON) -
    ANAQUALITYSPECMONSEQ.nextval)
    INTO vnumber

    FROM dual;
    IF vnumber > 0 THEN
        EXECUTE IMMEDIATE 'ALTER SEQUENCE ANAQUALITYSPECMONSEQ INCREMENT BY ' ||
        vnumber;
        SELECT ANAQUALITYSPECMONSEQ.nextval INTO nnumber FROM dual;
        EXECUTE IMMEDIATE 'ALTER SEQUENCE ANAQUALITYSPECMONSEQ INCREMENT BY 1 cache 20';
    END IF;
END;