oracle sequenceÖµÖØÖûØ1

declare 
  n   number(10); 
  tsql   varchar2(100); 
  begin 
  select   test_seq.nextval   into   n   from   dual; 
  n:=-(n-1); 
  tsql:='alter   sequence   test_seq   increment   by'||   n; 
  execute   immediate   tsql; 
  select   test_seq.nextval   into   n   from   dual; 
  tsql:='alter   sequence   test_seq   increment   by   1'; 
  execute   immediate   tsql; 
  end;