oracle如何清空一个用户下的所有表中的数据？

-- 大概 这个样子，如果没有 FK 的话，一下子就都删掉了。
begin
for  x  in  ( select  table_name  from  user_tables) loop
execute  immediate  'delete '  || x.table_name ;
end  loop ;
end  ;