Oracle批量清空所有表数据

　　--批量清空当前用户所有表的所有数据

　　--@author YangL

　　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;

　　/