Oracle批量清空所有表数据

xinge

--批量清空当前用户所有表的所有数据
　
　　declare
　　v_sql varchar2(2000);
　　CURSOR cur is
　　select table_name from user_tables order by table_name;
　　begin
　　for rows in cur loop
　　v_sql := 'TRUNCATE TABLE ' || rows.table_name;
　　dbms_output.put_line(v_sql);
　　execute immediate v_sql;
　　end loop;
　　end;
　　/