Oracle 重置sequence

最新推荐文章于 2025-02-18 20:03:05 发布

原创最新推荐文章于 2025-02-18 20:03:05 发布 · 199 阅读

0 ·

CC 4.0 BY-SA版权

文章标签：

#Oracle

Oracle 专栏收录该内容

84 篇文章

订阅专栏

本文介绍了使用PL/SQL在Oracle数据库中对序列进行基本操作，包括获取序列下一次值、修改序列增量以及异常处理机制。


DECLARE
    n    NUMBER(10 );
    tsql VARCHAR2(100 );
    p_seqName varchar2(20 );
BEGIN
    p_seqName := 'SEQ_RUN_ID';

    EXECUTE IMMEDIATE 'SELECT ' || p_seqName || '.NEXTVAL FROM dual ' INTO n;
    n    := - (n - 1);

    tsql := 'alter sequence '|| p_seqName ||' increment by ' || n;
    EXECUTE IMMEDIATE tsql;

    EXECUTE IMMEDIATE   'SELECT ' || p_seqName || '.NEXTVAL FROM dual ' INTO n;
    tsql := 'alter sequence '|| p_seqName ||' increment by  1' ;
    EXECUTE IMMEDIATE tsql;

    EXCEPTION
            WHEN OTHERS THEN
                 dbms_output.put_line( SQLERRM);
END;