Effacer toutes les tables

**lenoil** · 29/08/2007, 10h48

salut à tous,

je viens de récupérer un dump à remonter sous mon schéma et j'aimerais supprimer tout le contenu (tables , triggers, vues, ...) de mon schéma avant d'effectuer mon dump

Existe t-il une commande style delete toutes les tables de mon schéma

Merci

**laurentschneider** · 29/08/2007, 10h52

non, mais tu peux faire

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
 
begin
  for f in (
    select object_type t, object_name n 
    from user_objects
    where object_type in 
      ('TABLE','VIEW','FUNCTION','PROCEDURE','TYPE','PACKAGE','SEQUENCE'))
  loop
    execute immediate 'drop '||f.t||' "'||f.n||'"'||
      case f.t when 'TABLE' then ' cascade constraints' end;
  end loop;
end;
/

mais attention c'est très dangereux, si tu fais ça en tant que SYS, c'est grave.... fais un backup avant au cas où tu te plantes de schéma !

**orafrance** · 29/08/2007, 11h09

sinon, tu droppes le shema que tu recrées ensuite

**lenoil** · 29/08/2007, 11h27

ouais ok c'est ce que je fais d'habitude
mais faudra que je recré les tables spaces

merci en tout cas pour vos réponses

**LBO72** · 29/08/2007, 11h34

Bonjour à tous,

laurentSchneider
mais attention c'est très dangereux, si tu fais ça en tant que SYS, c'est grave.... fais un backup avant au cas où tu te plantes de schéma !

Que veux-tu dire par un backup ?

Merci.
LBO72

**laurentschneider** · 29/08/2007, 12h00

http://fr.wikipedia.org/wiki/Backup

**LBO72** · 29/08/2007, 12h21

Laurent,

J'ai voulu utiliser ton script pour supprimer tous les objets de mon schèma, mais je veux, pour ne pas faire de bétise, sortir en spool le résultat et exécuter le script en sortie après un petit contrôl... sauf que je n'arrive pas à faire de spool.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
SET SERVEROUTPUT off;
set time on;
set timing on;

Declare
toto varchar2(500);
req  varchar2(500);
begin
	spool toto.lst;	
  for f in (
    select object_type t, object_name n 
    from dba_objects
--    where object_type in ('TABLE','VIEW','FUNCTION','PROCEDURE','TYPE','PACKAGE','SEQUENCE')
    where object_type in ('TABLE')
        and owner = '&Nom_du_Schèma' )
  loop
  	req := 'drop '||f.t||' '||f.n||' '||  case f.t when 'TABLE' then ' cascade constraints' end;
---    execute immediate req;      
    dbms_output.put_line(req);
  end loop;
  spool off;
end;
/

Merci.
LBO72

**laurentschneider** · 29/08/2007, 12h26

le spool doit figurer avant le bloc pl/sql mais c'est une très bonne idée de faire d'abord un spool pour être sûr!

**LBO72** · 29/08/2007, 12h42

Merci Laurent...
Et pour ceux que ça intéresse, voici le script qui sort d'abord le résultat dans le fichier supprimer_objets.sql :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
SET SERVEROUTPUT ON;
set time on;
set timing on;
spool supprimer_objets.sql ;	
Declare
req  varchar2(500);
	
begin
	dbms_output.enable(10000000);

  for f in (
    select object_type t, object_name n 
    from dba_objects
   where object_type in ('TABLE','VIEW','FUNCTION','PROCEDURE','TYPE','PACKAGE','SEQUENCE')
        and owner = '&Nom_du_Schèma' )
  loop
  	req := 'drop '||f.t||' '||f.n||' '||  case f.t when 'TABLE' then ' cascade constraints' end;
---    execute immediate req;
      
    dbms_output.put_line(req);
  end loop;
 
end; 
/
spool off;