一个语句创建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;