oracle – 如何在动态SQL中更改序列?
发布时间:2021-03-31 01:53:17 所属栏目:百科 来源:网络整理
导读:我正在尝试创建一个脚本来将数据从一个数据库迁移到另一个数据库.我目前无法做的一件事是将序列的nextval设置为另一个DB中序列的nextval. 我从user_sequences中获得了值的差异,并生成了以下动态SQL语句: execute immediate 'alter sequence myseq increme
我正在尝试创建一个脚本来将数据从一个数据库迁移到另一个数据库.我目前无法做的一件事是将序列的nextval设置为另一个DB中序列的nextval. 我从user_sequences中获得了值的差异,并生成了以下动态SQL语句: execute immediate 'alter sequence myseq increment by 100'; execute immediate 'select myseq.nextval from dual'; execute immediate 'alter sequence myseq increment by 1'; commit; 但没有任何反应.我错过了什么?如果我在程序之外运行相同的语句,它们可以正常工作: alter sequence myseq increment by 100; select myseq.nextval from dual; alter sequence myseq increment by 1; commit; 编辑:向所有人道歉,不清楚.我实际上正在改变同一个DB中的序列.我只是从远程数据库中获取值.也许没必要提到远程数据库,因为它不会影响事物.我只提到它来解释我的目标是什么. 步骤1.我从远程DB获取序列的nextval. select (select last_number from dba_sequences@remoteDB where upper(sequence_name) = upper(v_sequence_name)) - (select last_number from user_sequences where upper(sequence_name) = upper(v_sequence_name)) increment_by from dual; 步骤2.我使用此值生成动态SQL语句: execute immediate 'alter sequence myseq increment by 100'; execute immediate 'select myseq.nextval from dual'; execute immediate 'alter sequence myseq increment by 1'; commit; 没有错误,但没有发生任何事情.当我用DBMS_OUTPUT.PUT_LINE编写SQL语句并在外面运行它们时它们工作了. 解决方法现在您已经在这里正确解释了您的要求是一些代码.我写了这个,所以它适用于你的架构中的任何序列.create or replace procedure resync_seq (p_seq_name in user_sequences.sequence_name%type) is local_val pls_integer; remote_val pls_integer; diff pls_integer; begin execute immediate 'select '|| p_seq_name ||'.nextval from dual' into local_val; select last_number into remote_val from user_sequences@remote_db where sequence_name = p_seq_name ; diff := remote_val - local_val; if diff > 0 then execute immediate 'alter sequence '|| p_seq_name ||' increment by ' ||to_char(diff); execute immediate 'select '|| p_seq_name ||'.nextval from dual' into local_val; execute immediate 'alter sequence '|| p_seq_name ||' increment by 1'; end if; end; 该过程不需要COMMIT,因为DDL语句发出隐式提交(实际上是两个). 您可以执行它并查看这样的同步值(在SQL * PLus中): exec resync_seq('MYSEQ') select myseq.currval from dual (编辑:淮北站长网) 【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容! |