Discussion :

[tamise]

Bonjour,

Je dois effectuer une procédure qui regarde si la colonne existe dans la table.
- si oui : il ne fait rien.
- si non : il lance un script qui ajoute la colonne à la table (ALTER ...).

Et je dois lancer cette procédure sous SQLPlus.

J'ai tenter de créer, mais il ne fonctionne pas correctement quand je passe sous sqlplus.

En espérant que vous puissiez m'aider.

Merci d'avance.

[mnitu]

Montrez-nous ce que vous avez essayé.

[Proxy]

Vous pouvez essayer quelque chose comme ceci :

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
DECLARE
	v_count   NUMBER;
BEGIN
	SELECT	 COUNT ( * )
	  INTO	 v_count
	  FROM	 user_tab_columns
	 WHERE	 table_name = 'MATABLE' AND column_name = 'MACOLONNE';
 
	IF v_count = 0
	THEN
		ALTER TABLE...;
	ELSE
		DBMS_OUTPUT.put_line ('Colonne existe déja');
	END IF;
END;

[Baldrick]

Vous pouvez essayer quelque chose comme ceci :

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
DECLARE
	v_count   NUMBER;
BEGIN
	SELECT	 COUNT ( * )
	  INTO	 v_count
	  FROM	 user_tab_columns
	 WHERE	 table_name = 'MATABLE' AND column_name = 'MACOLONNE';
 
	IF v_count = 0
	THEN
		ALTER TABLE...;
	ELSE
		DBMS_OUTPUT.put_line ('Colonne existe déja');
	END IF;
END;

C'est bon, à un (gros) détail près : l'ordre ALTER TABLE, à l'instar de tous les ordres DDL, n'est pas utilisable tel quel en PL/SQL. Il faut l'appeler en utilisant le SQL dynamique. Pour cela, la manière la plus simple est d'utiliser l'instruction EXECUTE IMMEDIATE suivi d'une chaîne de caractère qui contient l'ordre à exécuter.

La procédure demandée peut donc s'écrire ainsi :

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
 
CREATE OR REPLACE PROCEDURE PR_ADD_COL(v_table_name in varchar2, v_col_name in varchar2, v_type in varchar2, v_type_size in number default null)
IS
   v_count   NUMBER;
   v_order   varchar2(255);
BEGIN
   SELECT	 COUNT ( * )
   INTO	 v_count
   FROM	 user_tab_columns
   WHERE	 table_name = upper(v_table_name) AND column_name = upper(v_col_name);
 
  IF v_count = 0 THEN
      v_order := 'ALTER TABLE ' || v_table_name || ' ADD ' || v_col_name || ' ' || v_type;
      IF v_type_size is not null then
          v_order := v_order || '(' || v_type_size || ')';
      END IF;
      DBMS_OUTPUT.put_line ('Exécution :' || v_order);
      EXECUTE IMMEDIATE v_order;
  ELSE
      DBMS_OUTPUT.put_line ('Colonne existe déja');
  END IF;
END;
/
 
execute pr_add_col('MA_TABLE', 'MA_COLONNE', 'char', 1);

[FSiebert]

Bonjour,

Code :

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

WHERE	 table_name = upper(v_table_name) AND column_name = upper(v_col_name);

Votre procédure ne prend pas en charge d'éventuelles tables ou colonnes créées avec leur nom entre guillemets (conservation de la casse, des espaces, etc.).

Je ne recommande pas cette pratique mais il faut garder cette particularité en tête.

[Baldrick]

Pour ce qui est de ne pas conseiller cette pratique, vous prêchez un converti. Chez moi, c'est en contravention avec les règles de nommage.

Mais c'est effectivement une piste d'amélioration pour tamise; à voir s'il doit traiter ce cas de figure. Et ce n'est pas la seule possibilité d'amélioration : si je devais critiquer le code que j'ai fourni, c'est le fait qu'on ne teste pas que la table à modifier existe bien qui me titille le plus...