Supprimer tous les objets d'un utilisateur

On peut forcer l'exécution de DDL (exemple : ajout de droits, suppression de tables, etc..) multiple par ce genre de code :

begin
  for x in (select table_name from dba_tables where owner='ADM')
  loop
     execute immediate 'drop table ADM.'||x.table_name||' cascade constraints';
  end loop;
end;

Note : pour vider complètement le schéma d'un utilisateur (avant réimport par exemple) il convient de vérifier quels types d'objets lui appartiennent (des séquences, des fonctions, entre autres). On peut alors construire quelque chose comme ça :

declare
  u VARCHAR(5) := 'ADM';
begin
  for x in (select table_name from dba_tables where owner=u)
  loop
    execute immediate 'drop table '||u||'.'||x.table_name||' cascade constraints';
  end loop;
  for x in (select sequence_name from dba_sequences where sequence_owner=u)
  loop
    execute immediate 'drop sequence '||u||'.'||x.sequence_name;
  end loop;
  for x in (select procedure_name,procedure_type from dba_procedures where owner=u)
  loop
    execute immediate 'drop '||procedure_type||' '||u||'.'||x.table_name;
  end loop;
end;