Supprimer tous les objets d'un utilisateur - Historique des versions

Frank le 9 décembre 2010 à 15:54

2010-12-09T15:54:21Z

2010-12-09T15:52:47Z

2010-12-09T15:52:26Z

2010-12-09T15:50:01Z

2010-12-09T14:41:39Z

2010-12-09T14:37:13Z

2010-12-09T14:35:15Z

2010-12-09T11:20:29Z

2010-12-09T11:06:04Z

2010-12-09T10:59:13Z

@@ Ligne 1 : / Ligne 1 : @@
 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 sous SQLPLUS (testé sur une 10g) :
   set serveroutput on
@@ Ligne 25 : / Ligne 16 : @@
      execute immediate 'drop '||x.object_type||' '||u||'.'||x.object_name;
    end loop;
   end;

@@ Ligne 7 : / Ligne 7 : @@
   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 sous SQLPLUS (testé sur une 10g) :
   set serveroutput on
   declare

@@ Ligne 3 : / Ligne 3 : @@
     for x in (select table_name from dba_tables where owner='ADM')
     loop
-       execute immediate 'drop table ADM.'||x.table_name||' cascade constraints';
+       execute immediate 'GRANT SELECT ON ' || x.table_name || ' TO USER_RO';
     end loop;
   end;

@@ Ligne 7 : / Ligne 7 : @@
   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 :
+'''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 sous SQLPLUS (testé sur une 10g) :
   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)
+  for x in (select object_name,object_type from dba_objects where owner=u and object_type not in ('LOB','PACKAGE BODY') and object_name not like 'BIN$%')
-   loop
+  loop
-     execute immediate 'drop sequence '||u||'.'||x.sequence_name;
+    dbms_output.put_line ('Dropping '||x.object_type||' '||x.object_name);
-   end loop;
+    execute immediate 'drop '||x.object_type||' '||u||'.'||x.object_name;
-   for x in (select procedure_name,object_type from dba_procedures where owner=u)
+  end loop;
   end;

@@ Ligne 19 : / Ligne 19 : @@
       execute immediate 'drop sequence '||u||'.'||x.sequence_name;
     end loop;
-    for x in (select procedure_name,procedure_type from dba_procedures where owner=u)
+    for x in (select procedure_name,object_type from dba_procedures where owner=u)
     loop
-      execute immediate 'drop '||procedure_type||' '||u||'.'||x.table_name;
+      execute immediate 'drop '||object_type||' '||u||'.'||x.procedure_name;
     end loop;
   end;

← Version précédente		Version du 9 décembre 2010 à 14:35
Ligne 7 :		Ligne 7 :
	end;		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).	+	'''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) := 'RH';
		+	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='ADM')
		+	loop
		+	execute immediate 'drop '\|\|procedure_type\|\|' '\|\|u\|\|'.'\|\|x.table_name;
		+	end loop;
		+	end;

← Version précédente		Version du 9 décembre 2010 à 11:20
Ligne 7 :		Ligne 7 :
	end;		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, entre autres).	+	'''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).

← Version précédente		Version du 9 décembre 2010 à 11:06
Ligne 6 :		Ligne 6 :
	end loop;		end loop;
	end;		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, entre autres).

← Version précédente	Version du 9 décembre 2010 à 10:59
(Aucune différence)