Cherche à remplacer un caractère # par NULL

Version imprimable

14/04/2006, 10h39
Djene

Cherche à remplacer un caractère # par NULL

Bonjour,

Quelqu'un pourrait-il me montrer comment mettre en place une procédure permettant de remplacer des caractères # par la valeur NULL. Plusieurs tables sont concernées et on ne sait pas dans quelles colonnes se trouvent les caractères #.

Merci par avance pour votre aide.

Djene
14/04/2006, 10h54
SheikYerbouti

Pour le remplacement en lui-même, utilisez l'instruction Replace()

Code:

col = Replace( col, '#', '' ) ;

Pour ce qui est de scruter toutes les colonnes d'une table, c'est une autre histoire. Il va vous faloir passer par du SQL synamique en bouclant sur les colonnes (USER_TAB_COLUMNS)

Quelque chose dans ce genre

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
DECLARE
  PC$TableName   VARCHAR2(30) := 'DEPT' ;
  CURSOR C_COLS IS SELECT column_name FROM USER_TAB_COLUMNS
  WHERE TABLE_NAME = PC$TableName 
  AND DATA_TYPE = 'VARCHAR2' ;
  LC$Req  VARCHAR2(256) := 'UPDATE ' || PC$TableName || ' SET ';
BEGIN
  FOR C IN C_COLS LOOP
     IF C_COLS%ROWCOUNT > 1 THEN
	   LC$Req := LC$Req || ',' ;
	 END IF ;
	 LC$Req := LC$Req || C.COLUMN_NAME || ' = Replace(' || C.COLUMN_NAME || ',''#'', '''' )' ;
  END LOOP ;
  EXECUTE IMMEDIATE LC$Req ;
END ;

14/04/2006, 11h14
Djene

Remplacer des # par NULL

Merci beaucoup pour votre réponse si rapide.
Simplement, plusieurs tables sont concernées (au moins 6) et elles ont plusieurs colonnes. Ma question est :comment balayer toutes ces tables pour le remplacement et surtout comment les inclure dans la solution de votre procédure ?

Désolée mais je ne m'y connais pas du tout. :oops:

Merci encore pour votre aide
14/04/2006, 11h33
orafrance

c'est ce que fait le code proposé que tu dois éventuellement un peu adapter :?

La même chose transforme en procedure qui prend un nom de table en paramètre:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
CREATE OR REPLACE PROCEDURE TMP_REPLACE( PC$TableName IN VARCHAR2 )
IS
  CURSOR C_COLS IS SELECT column_name FROM USER_TAB_COLUMNS
  WHERE TABLE_NAME = PC$TableName 
  AND DATA_TYPE = 'VARCHAR2' ;
  LC$Req  VARCHAR2(256) := 'UPDATE ' || PC$TableName || ' SET ';
BEGIN
  FOR C IN C_COLS LOOP
     IF C_COLS%ROWCOUNT > 1 THEN
	   LC$Req := LC$Req || ',' ;
	 END IF ;
	 LC$Req := LC$Req || C.COLUMN_NAME || ' = Replace(' || C.COLUMN_NAME || ',''#'', '''' )' ;
  END LOOP ;
  EXECUTE IMMEDIATE LC$Req ;
END ;

que vous pouvez appeler dans une boucle:

Code:

1
2
3
4
5
6
7
DECLARE
  CURSOR C_TAB IS SELECT TABLE_NAME FROM USER_TABLES ;
BEGIN
  FOR  C IN C_TAB LOOP
     tmp_replace( C.TABLE_NAME ) ;
  END LOOP ;
END;

:roi: ne s'agirait-il pas d'un formatage de sqlplus ?
Code:

1 2 3 4 5 6 SQL> col n for 999 SQL> select 1000 n from dual; N ---- ####
dans ce cas, il suffit de reformater les colones, par exemple avec clear col
Code:

1 2 3 4 5 6 7 SQL> clear col columns cleared SQL> select 1000 n from dual; N ---------- 1000