删除一个用户下的所有表数据

DECLARE
  TYPE table_name_type is TABLE of VARCHAR2(50);
  v_table_name table_name_type;
BEGIN
  SELECT table_name BULK COLLECT INTO v_table_name FROM user_tables;
  FOR i IN 1 .. v_table_name.count LOOP
    EXECUTE IMMEDIATE 'truncate table '||v_table_name(i);
    COMMIT;
  END LOOP;
END;
/