oracle同步sequence

create or replace procedure p_update_sequence(                   i_sequence_name in varchar2,                   i_table_name in varchar2,                   i_id_column in varchar2            ) is    v_sql varchar2(2000);    v_max_id number;    v_diff number;  begin    v_sql := 'select max(' || i_id_column || ') from ' || i_table_name;    execute immediate v_sql into v_max_id;    v_sql := 'select ' || v_max_id || ' - ' || i_sequence_name || '.nextval from dual';    execute immediate v_sql into v_diff;    if v_diff <= 0 then      return;    end if;    v_sql := 'alter sequence ' || i_sequence_name || ' increment by ' || v_diff;    execute immediate v_sql;    v_sql := 'select ' || i_sequence_name || '.nextval from dual';    execute immediate v_sql into v_diff;    v_sql := 'alter sequence ' || i_sequence_name || ' increment by 1';    execute immediate v_sql;  end p_update_wf_sequence;