Discussion :

[spg40]

Bonjour,

je tente de créer une fonction qui reçoit le nom d'une table et renvoit la liste concaténées des colonnes de la table.

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
 
CREATE OR REPLACE FUNCTION "ORA_MAP"."LISTE_COL_TABLE" (
 PC$TABLE IN VARCHAR2) RETURN VARCHAR2 
is
 
CURSOR C_WI IS
  SELECT COLUMN_ID
  FROM
     SYS.USER_TAB_COLUMNS
  WHERE
     TABLE_NAME = PC$TABLE 
  AND
     DATA_TYPE IN ('CHAR','VARCHAR2','NUMBER','DATE')
  ORDER BY COLUMN_ID
  ;
 
CWI VARCHAR2(30);
LC$SQLW VARCHAR2(500);
LN$I INTEGER;
 
begin
 
   --------------------------------------------------------------------
   -- Récupération de la liste des colonnes de la table sélectionnée --
   --------------------------------------------------------------------
 
   LN$I := 1 ;
   LC$SQLW := '';
 
	 OPEN C_WI;
	 LOOP
		 FETCH C_WI INTO CWI;
                               IF LN$I > 1 THEN
                                    LC$SQLW := LC$SQLW || ', ' ;
                               END IF ;
 
                              LC$SQLW := LC$SQLW || ''''|| CWI || ''''  ;
                              LN$I := LN$I + 1 ;
		 EXIT WHEN C_WI%NOTFOUND;
	 END LOOP;
	 CLOSE C_WI;
 
	 RETURN LC$SQLW;
 
end;

Cependant le curseur ne semble pas fonctionner. Il me renvoit une liste vide.

Si quelqu'un a une idée.

J'ai 2 serveurs Oracle : 1 de test et 1 de prod (distant). Le but est de faire une procédure qui mette à jour les données de la table Oracle distante avec les données de la table passée en paramètre pour les lignes sélectionnées : une sorte d'Update générique.

Par exemple, un appel du type :

Code :

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

execute ora_map.transfert_table('table1','where entityid in (1,2,3)');

1 . on récupère le nom des colonnes de table 'table1'
2 . on récupère les données de table1 qui vérifient la condition (sur le serveur local)
3 . on fait la MAJ des données de table1 sur le serveur distant. Si les enregistrements n'existent pas, il faut les créer.

Si quelqu'un a déjà fait ce type de chose.

Je penses que si j'arrive à faire fonctionner le premier point, je pourrai faire la suite.

D'avance merci pour vos réponses.

SPG40.

[McM]

Tu fetches du number dans du varchar2.
Utilises plutôt le

Code :

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

1
2
3
4
FOR rwi in C_WI
LOOP 
 LC$SQLW := rwi.column_id || .....;
END LOOP;

pas besoin de close, de %NOTFOUND, etc...

Ensuite c'est du débogage, mets des DBMS_OUTPUT et lance ta procédure, tu verras où ça passe et où ça passe pas.

[spg40]

Tu fetches du number dans du varchar2.
Utilises plutôt le

Code :

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

1
2
3
4
FOR rwi in C_WI
LOOP 
 LC$SQLW := rwi.column_id || .....;
END LOOP;

pas besoin de close, de %NOTFOUND, etc...

Ensuite c'est du débogage, mets des DBMS_OUTPUT et lance ta procédure, tu verras où ça passe et où ça passe pas.

OK.

C'est ce que j'ai fait, mais en fait il ne rentre pas dans ma boucle FOR.
Par contre, avec OPEN...FETCH...CLOSE, il rentre bien dans le FETCH. Une idée?

J'utilise du VARCHAR2 car je veux avoir les COLUMN_NAME à la fin (les COLUMN_ID, c'est pour tester).

SPG40.

[plaineR]

Dans la base le nom des tables est en majuscules

[spg40]

C'est ce que je lui passe comme paramètre. La requête de SELECT s'exécute correctement dans SQL*Plus Worksheet et j'ai bien mes noms de colonnes.

SPG40

[plaineR]

Il n'y a aucune raison que la requête marche sous SQL*Plus et pas en PL/SQL (hormis un éventuel problème de droits sur user_tables, mais tu aurais un message d'erreur). S'il ne rentre pas dans le for c'est que ta requête ne ramène aucune ligne.

Comme te l'as dit McM, c'est du debuggage mets des dbms_output pour voir ce qui ce passe.

[salim11]

salut,

Je l'ai executé et ca marche bien .

Est ce que ta fonction est déclarée public?

Peut etre tu l'executes dans un autre user qui contient pas ta table ?

[spg40]

OK.

J'ai compris. J'ai ma fonction dans un User générique (ORA_MAP) qui contient uniquement les fonctions et procédures communes à tous mes autres users. Je me loggais en tant que ORA_USER1 et j'appelais ma fonction (ORA_USER1 avait les droits EXECUTE sur ma fonction dans ORA_MAP), mais le pb c'est que le curseur cherchait dans la vue SYS.USER_TAB_COLUMNS de ORA_MAP et pas de ORA_USER1. Je fait donc ma recherche dans SYS.DBA_TAB_COLUMNS et là au miracle ça marche...

Merci pour vos réponses, elles m'ont bien aidé.

A+.

SPG40.