execution partielle d'un script PL/SQL

**dyvim** · 25/10/2005, 16h25

version d'Oracle 9.2...

bonjour,
le script suivant est censé vérifier l'existence d'une table dans mon schema et si elle n'existe pas la créer mais aussi supprimer une autre table en basculant ses données dans la nouvelle... Il doit aussi aller modifier des references à l'ancienne table dans deux tables de reference...

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
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
DECLARE
  I NUMBER;
BEGIN
 
  SELECT COUNT(*)
  INTO I
  FROM USER_TABLES
  WHERE TABLE_NAME = 'PRP_GMSTLXUSG002TLX002_____DH';
 
  IF I=0
  THEN
 
    EXECUTE IMMEDIATE 
	'CREATE TABLE PRP_GMSTLXUSG002TLX002_____DH '||
	'( ORIGINATING_FILE          VARCHAR2(249 BYTE)  NOT NULL ,'||
    '  REFERENCE_NUMBER          NUMBER(38)          NOT NULL ,'||
    '  ORIGINATOR_ADDRESS        VARCHAR2(249 BYTE),'||
    '  NCC                       VARCHAR2(249 BYTE),'||
    '  DOUBLE_SIGNATURE          VARCHAR2(249 BYTE),'||
    '  DESTINATION_ADDRESS       VARCHAR2(249 BYTE),'||
    '  DESTINATION_IATA_COUNTRY  VARCHAR2(249 BYTE),'||
    '  DESTINATION_IATA_CENTER   VARCHAR2(249 BYTE),'||
    '  TELEX_DIAL_CODE           NUMBER(38),'||
    '  NUMBER_OF_MESSAGES        VARCHAR2(249 BYTE),'||
    '  CHARGEABLE_TRAFIC         NUMBER(38),'||
    '  DURATION                  NUMBER(38),'||
    '  FIRST_DAY_OF_ACTIVITY     VARCHAR2(249 BYTE),'||
    '  LAST_DAY_OF_ACTIVITY      VARCHAR2(249 BYTE),'||
    '  STATUS                    NUMBER(38)          NOT NULL ,'||
    '  AVAILABLE                 VARCHAR2(249 BYTE),'||
    '  CHG_WHO                   VARCHAR2(249 BYTE),'||
    '  FREE_COMMENT              VARCHAR2(249 BYTE),'||
    '  ERROR_CODE                VARCHAR2(249 BYTE),'||
    '  CHG_DATETIME              DATE'||
    ')';
 
    EXECUTE IMMEDIATE 
	'CREATE UNIQUE INDEX PK_GMSTLXUSG002TLX002_____DH ON PRP_GMSTLXUSG002TLX002_____DH '||
    '(ORIGINATING_FILE, REFERENCE_NUMBER, STATUS)'||
    'TABLESPACE TS_SVCCONFIG_IDX';
 
 
    EXECUTE IMMEDIATE 
	'ALTER TABLE PRP_GMSTLXUSG002TLX002_____DH ADD ('||
    'CONSTRAINT PK_GMSTLXUSG002TLX002_____DH '||
    'PRIMARY KEY (ORIGINATING_FILE, REFERENCE_NUMBER, STATUS)'||
    'USING INDEX  TABLESPACE TS_SVCCONFIG_IDX )';
 
	INSERT INTO PRP_GMSTLXUSG002TLX002_____DH
	SELECT * 
	FROM PRP_GMSTLXAPI002TLX002_____DH;
 
	EXECUTE IMMEDIATE 'drop table PRP_GMSTLXAPI002TLX002_____DH';
 
	UPDATE PRP_FIELD_DESCRIPTION
	SET PD_TABLE_NAME = 'PRP_GMSTLXUSG002TLX002_____DH'
	WHERE PD_TABLE_NAME = 'PRP_GMSTLXAPI002TLX002_____DH';
 
	UPDATE PRP_METATABLE
	SET PM_TABLE_NAME = 'PRP_GMSTLXUSG002TLX002_____DH'
	WHERE PM_TABLE_NAME = 'PRP_GMSTLXAPI002TLX002_____DH';
 
	COMMIT;	   
  END IF;
END;

mon problème est le suivant:
-le script crée bien la nouvelle table
-mais il ne supprime pas l'ancienne table...
-il ne modifie pas les tables de reference non plus...
-sans pour autant me renvoyer d'erreur me disant qu'il n'a pas pu le faire
(d'ailleurs à première vue le script marche parfaitement)

Si quelqu'un a des idées sur ce qui pourrait bien clocher...

**orafrance** · 25/10/2005, 16h29

manquerait pas un commit par hasard ? Et c'est pas plus simple un bête script SQL ?

**Jaouad** · 25/10/2005, 16h29

une 8.2 , Oracle crée des releases que pour vous alors

est ce que si tu passes les requêtes une a une elle fonctionne ?

**orafrance** · 25/10/2005, 16h30

Envoyé par dyvim

-mais il ne supprime pas l'ancienne table...

sans DROP ça parait logique

**Jaouad** · 25/10/2005, 16h31

Envoyé par Fred_D

Envoyé par dyvim

-mais il ne supprime pas l'ancienne table...

sans DROP ça parait logique

tu es fatigué toi

Code :

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

EXECUTE IMMEDIATE 'drop table PRP_GMSTLXAPI002TLX002_____DH';

**orafrance** · 25/10/2005, 16h45

même en cherchant je le voyais toujours pas

Désolé

Faudrait essayer en SQL simple et en ajoutant des messages de trace

**dyvim** · 25/10/2005, 16h46

Je viens de me rendre compte que j'avais l'instruction RENAME...
pour faire presque tout ce que je veux...

par contre je ne sais pas si elle garantit l'integrité des données et la conservatiuon des index, contraintes, triggers...

**Jaouad** · 25/10/2005, 16h46

non cela pose probléme pour les triggers , index clé étrangére ... enfin toutes réfèrences

**dyvim** · 25/10/2005, 16h50

Aucun moyen d'eviter de refaire les triggers,... ???

Par exemple avec une option CASCADED ???

**dyvim** · 25/10/2005, 16h53

Envoyé par Fred_D

manquerait pas un commit par hasard ?

Non j'ai déjà essayé d'en rajouter un ca ne change rien... (ah et puis il y en a un à la fin car je ne vous ai mis qu'un bout du script..

Envoyé par Fred_D

Et c'est pas plus simple un bête script SQL ?

et comment je check si ma table existe en SQL simple ???

**Jaouad** · 25/10/2005, 16h55

cette option n'existe pas

Pour tester si une table existe un requête sur user_tables fonctionne trés bien

ce probléme a été posé recemment

**dyvim** · 25/10/2005, 16h56

Envoyé par Jaouad

une 8.2 , Oracle crée des releases que pour vous alors

Oh je me suis encore gouré.... 9.2 sorry....

est ce que si tu passes les requêtes une a une elle fonctionne ?

oui.. sans problème... chacune des modifs est correcte en soi...

**dyvim** · 25/10/2005, 17h01

Envoyé par Jaouad

cette option n'existe pas

C'est bien dommage...

Pour tester si une table existe un requête sur user_tables fonctionne trés bien ...
ce probléme a été posé recemment

Oui ca je sais faire... La remarque etait plutôt : et comment je fais un test conditionnel en SQL simple...

**Jaouad** · 25/10/2005, 17h01

et si tu met chaque execute immediate dans un script pl/sql

et que tu les laisse séquentiellement

est ce que cela marche aussi ?

Je dit ca au cas ou tu aurais uniquement tester les ordres SQL ?

**dyvim** · 25/10/2005, 17h10

En fait il se produit de temps en temps une erreur qui bloque alors tout le script... (je ne l'ai pas quand j'execute le script comme un script de patch sur le serveur unix /Oracle mais elle se produit sous TOAD si je teste le code)
Au moment de l'INSERT il lui arrive de dire que la table n'existe pas et donc de bloquer à ce moment là...

**Jaouad** · 25/10/2005, 17h12

Est ce que sous SqlPlus tu peux essayer cela

Code :

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

1
2
3
4
begin
EXECUTE IMMEDIATE 'drop table PRP_GMSTLXAPI002TLX002_____DH'; 
    end ; 
/

assure toi que le table existe :

**dyvim** · 25/10/2005, 17h17

Est ce que RENAME fonctionne pour autre chose que des TABLEs et des VIEWs ???
A ma connaissance (cours de l'année passée) je ne peux pas renommer ainsi des contraintes et des indexes...

Par contre j'ai jeté un oeil et à priori le fait de renommer une table lui conserve ses contraintes et ses indexes (même si le nom n'est plus très adéquat)

**dyvim** · 25/10/2005, 17h22

Envoyé par Jaouad

Est ce que sous SqlPlus tu peux essayer cela

Code :

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

1
2
3
4
begin
EXECUTE IMMEDIATE 'drop table PRP_GMSTLXAPI002TLX002_____DH'; 
    end ; 
/

assure toi que le table existe :

C'est quelque chose que j'ai déjà fait...
PL/SQL procedure successfully executed....

**Jaouad** · 26/10/2005, 10h12

Envoyé par dyvim

Est ce que RENAME fonctionne pour autre chose que des TABLEs et des VIEWs ???
A ma connaissance (cours de l'année passée) je ne peux pas renommer ainsi des contraintes et des indexes...

Par contre j'ai jeté un oeil et à priori le fait de renommer une table lui conserve ses contraintes et ses indexes (même si le nom n'est plus très adéquat)

Mais il me semble que les index sont invalidés donc inutilisable ...