set serveroutput on;

spool c:\sequence_code.txt;

 

declare

  v_sequence varchar2(4000);

  v_nextval number(38,0);

begin

  for i in (select sequence_name from user_sequences) loop

   select dbms_metadata.get_ddl('SEQUENCE',i.sequence_name,user) into v_sequence from dual;

   execute immediate 'select '||i.sequence_name||'.'||'nextval from dual' into v_nextval;

   v_sequence := substr(v_sequence,1,instr(v_sequence,'START WITH',1,1)+length('START WITH'))||' '||to_char(v_nextval)||' '||

                 substr(v_sequence,instr(v_sequence,'CACHE'))||';';

   dbms_output.put_line(v_sequence);

  end loop;

end;

/

spool off;