一个语句创建Oracle所有表的序列

 -- 动态创建序列
 declare
   cursor c_job is
     select TABLE_NAME from user_tables;
 
   c_row c_job%rowtype;
   v_sql varchar2(200);
 begin
   for c_row in c_job loop
     begin
       v_sql := 'create sequence SEQ_' || c_row.TABLE_NAME;
       dbms_output.put_line(v_sql);
       execute immediate v_sql;
     end;
   end loop;
 
 end;