ALTER plusieurs tables avec curseur et boucle

Version imprimable

Bonjour,

Je voudrais deplacer un ensemble de table d'un tablespace sur un autre, ceci sur une base de données 9i.

Les tables ont été créées sur le tablespace SYS, alors qu'elles devraient etre sur le tablespace TBS_TOTO.
Par contre, bien qu'existant sur le tablespace sys, toutes les tables appartiennent au schéma TOTO.
J'ai écrit la requête suivante:
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 DECLARE TYPE r_curseur is REF CURSOR; c_tables r_curseur; ligne_tableau c_tables%TYPE; BEGIN OPEN c_tables FOR select TABLE_NAME from SYS.ALL_TABLES where owner = 'TOTO'; LOOP FETCH c_tables INTO ligne_tableau; EXIT WHEN c_tables%NOTFOUND; ALTER TABLE ligne_tableau.TABLE_NAME MOVE TABLESPACE TBS_TOTO; END LOOP; CLOSE c_tables; END;
mais je recois l'erreur suivante à l'execution:

Citation:

ORA-06550: Ligne 11, colonne 9 :
PLS-00103: Symbole "ALTER" rencontré à la place d'un des symboles suivants :

begin case declare end exit for goto if loop mod null pragma
raise return select update while with <an identifier>
<a double-quoted delimited-identifier> <a bind variable> <<
close current delete fetch lock insert open rollback
savepoint set sql execute commit forall merge
<a single-quoted SQL string> pipe
Symbole "lock inséré avant "ALTER" pour continuer.
ORA-06550: Ligne 11, co

05/05/2010, 16h00
Invité

utilise du sql dynamique pour faire ce alter (y a un très bon tuto sur ce site concernant le sujet )
05/05/2010, 16h00
McM

ALTER est un DDL => EXECUTE IMMEDIATE

Oui, c'est ce que j'ai essayé de faire juste apres avoir posté:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
DECLARE
TYPE r_curseur is REF CURSOR;
c_tables r_curseur; 
ligne_tableau c_tables%TYPE; 
BEGIN
    OPEN c_tables FOR select TABLE_NAME from SYS.ALL_TABLES where owner = 'TOTO'; 
    LOOP 
 
    FETCH c_tables INTO ligne_tableau;  
    EXIT WHEN c_tables%NOTFOUND;  
        EXECUTE IMMEDIATE 'ALTER TABLE '||ligne_tableau||' MOVE TABLESPACE TBS_TOTO';  
    END LOOP; 
    CLOSE c_tables; 
END;

mais bizarrement ca donne tjs la meme erreur

Le PL/SQL est certes une possibilité, mais la chose peut se faire simplement avec SQL*Plus.

Vous mettez tout ça dans un fichier mon_script.sql, vous l'exécutez par @le_chemin_qui_va_bien\mon_script.sql, et vous récupérez le résultat prêt à l'emploi.
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 set pagesize 0 set verify off set echo off set feedback off accept NOM_SCHEMA prompt "nom du proprietaire des tables a deplacer : " accept TBS_SOURCE prompt "nom du tablespace source : " default SYSTEM accept TBS_CIBLE prompt "nom du tablespace cible : " spool change_tbs.sql select 'alter table ' || table_name || ' move tablespace &TBS_CIBLE;' from dba_tables where owner='&NOM_SCHEMA' and tablespace_name='&TBS_SOURCE'; spool off ed change_tbs.sql

05/05/2010, 17h15
abdelhamidem

Citation:

Envoyé par Pomalaix

Le PL/SQL est certes une possibilité, mais la chose peut se faire simplement avec SQL*Plus.

...

spool off

ed change_tbs.sql[/code]

Merci, je pense que ca va résoudre mon problème... Mais je suis quand meme curieux de savoir ce qui clochait avec ma "solution".

A ce propos, le message d'erreur n'est pas le meme en fait:

Citation:

ORA-06550: Ligne 11, colonne 27 :
PLS-00306: numéro ou types d'arguments erronés dans appel à '||'
ORA-06550: Ligne 11, colonne 9 :
PL/SQL: Statement ignored

Comem ça, ça marchera

Code:

1
2
3
4
5
6
BEGIN
    FOR r IN (SELECT TABLE_NAME FROM SYS.ALL_TABLES WHERE owner = 'TOTO') 
    LOOP 
        EXECUTE IMMEDIATE 'ALTER TABLE '|| r.table_name ||' MOVE TABLESPACE TBS_TOTO';  
    END LOOP; 
END;

Citation:

Envoyé par abdelhamidem

Bonjour,

Je voudrais deplacer un ensemble de table d'un tablespace sur un autre, ceci sur une base de données 9i.

Les tables ont été créées sur le tablespace SYS, alors qu'elles devraient etre sur le tablespace TBS_TOTO.
Par contre, bien qu'existant sur le tablespace sys, toutes les tables appartiennent au schéma TOTO.
J'ai écrit la requête suivante:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
DECLARE
TYPE r_curseur is REF CURSOR;
c_tables r_curseur; 
ligne_tableau c_tables%TYPE; 
BEGIN
    OPEN c_tables FOR select TABLE_NAME from SYS.ALL_TABLES where owner = 'TOTO'; 
    LOOP 
 
    FETCH c_tables INTO ligne_tableau;  
    EXIT WHEN c_tables%NOTFOUND;  
        ALTER TABLE ligne_tableau.TABLE_NAME MOVE TABLESPACE TBS_TOTO;  
    END LOOP; 
    CLOSE c_tables; 
END;

mais je recois l'erreur suivante à l'execution:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
DECLARE
   CURSOR r_curseur
   IS
      SELECT table_name
        FROM SYS.all_tables
       WHERE owner = 'TOTO';
BEGIN
   FOR c_tables IN r_curseur
   LOOP
      EXECUTE IMMEDIATE (   'ALTER TABLE '
                         || ligne_tableau.table_name
                         || 'MOVE TABLESPACE TBS_TOTO'
                        );
   END LOOP;
END;