强制获取序列下一个值/当前值(oracle函数)

-- 创建获取序列下一个值的函数
create or replace function get_seq_next (seq_name in varchar2) return number
is
seq_val number ;
begin
execute immediate 'select '|| seq_name|| '.nextval from dual' into seq_val ;
return seq_val ;
end get_seq_next;
-- 创建获取序列下一个值的函数(得先获取下一个值后才干使用)
create or replace function get_seq_curr (seq_name in varchar2) return number
is
seq_val number ;
begin
execute immediate 'select '|| seq_name|| '.currval from dual' into seq_val ;
return seq_val ;
end get_seq_curr;