DECLARE
V_VAL_BEGIN NUMBER :=500-1;
V_SEQ_CURRVAL NUMBER ;
begin
for r in (select *
from dba_sequences t
where t.sequence_owner in('XXX')
ORDER BY T.sequence_owner,T.sequence_name)
loop
EXECUTE IMMEDIATE 'SELECT '||R.sequence_owner||'.'||R.SEQUENCE_NAME||'.NEXTVAL FROM DUAL ' INTO V_SEQ_CURRVAL;
DBMS_OUTPUT.put_line('alter sequence '||R.sequence_owner||'.'||R.SEQUENCE_NAME||' increment by '||to_char(V_VAL_BEGIN-V_SEQ_CURRVAL)||' ;');
DBMS_OUTPUT.put_line('select '||R.sequence_owner||'.'||R.SEQUENCE_NAME||'.nextval from dual;');
DBMS_OUTPUT.put_line('alter sequence '||R.sequence_owner||'.'||R.SEQUENCE_NAME||' increment by 1 cache 20 ;');
end loop;
V_VAL_BEGIN NUMBER :=500-1;
V_SEQ_CURRVAL NUMBER ;
begin
for r in (select *
from dba_sequences t
where t.sequence_owner in('XXX')
ORDER BY T.sequence_owner,T.sequence_name)
loop
EXECUTE IMMEDIATE 'SELECT '||R.sequence_owner||'.'||R.SEQUENCE_NAME||'.NEXTVAL FROM DUAL ' INTO V_SEQ_CURRVAL;
DBMS_OUTPUT.put_line('alter sequence '||R.sequence_owner||'.'||R.SEQUENCE_NAME||' increment by '||to_char(V_VAL_BEGIN-V_SEQ_CURRVAL)||' ;');
DBMS_OUTPUT.put_line('select '||R.sequence_owner||'.'||R.SEQUENCE_NAME||'.nextval from dual;');
DBMS_OUTPUT.put_line('alter sequence '||R.sequence_owner||'.'||R.SEQUENCE_NAME||' increment by 1 cache 20 ;');
end loop;
来自 “ ITPUB博客 ” ，链接：https://blog.itpub.net/24558043/viewspace-676586/ ，如需转载，请注明出处，否则将追究法律责任。
上一篇：
PL/SQL编程之道之CASE使用(8)
下一篇：
查看某个用户下所有表的记录数——精准版
请登录后发表评论
登录
全部评论
