Discussion :

[arnaud.mille]

Bonjour a tous,

Dans un projet professionnel, je veux donner en tant que paramètre à une procédure stockée Oracle, une liste d'instructions SQL contenant SELECT pour les exécuter et obtenir les résultats.

Exemple de paramètre :

Code :

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

1
2
3
4
5
6
declare csSelect varchar(4000);
 begin
 csSelect := 'SELECT * FROM JOURNAL';
 if 'A' != '%' then
    csSelect := csSelect || 'WHERE JOURNAL.NOM LIKE ''A%'' ';
 end if;

Je besoin de ce pour Oracle et SQL Server. J'ai trouvé pour le serveur sql mais pas pour Oracle.

[al1_24]

C'est sans doute la commande EXECUTE IMMEDIATE que tu cherches...

[arnaud.mille]

Alors j'ai bien essayé d'utilisé

Code :

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

execute immediate

mais je n'arrive pas a retourner les résultats du select

[McM]

Sans indice supplémentaire, voici le tuto de EXECUTE IMMEDIATE.

[arnaud.mille]

j'ai bien compris l'utilisation execute immediate, cela dis, je n'ai pas les données sélectionnées pour autant

[arnaud.mille]

Pour être plus précis, mon application web est capable d'appeler une proc ou fonction ou tout autre chose de la base de données avec des paramètres.
Je souhaite donc écrire une proc ou fonction ou autre chose qui me permettra de passer un paramètre qui contient de code sql comme celui ci

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
 
string sql = "declare csSelectCosmos varchar(4000); "
+ " begin "
+ " csSelectCosmos:= '"
+ " SELECT USR.NOM AS USR,  JOURNAL.DT_MODIFICATION,  JOURNAL.MODIFICATION, PERSONNEL.NOM, PERSONNEL.PRENOM, JOURNAL.TYPE "
+ " FROM "
+ " JOURNAL INNER JOIN "
+ " PERSONNEL ON JOURNAL.NO_PERSONNEL = PERSONNEL.NO_PERSONNEL INNER JOIN "
+ " USR ON JOURNAL.NO_USR = USR.NO_USR "
+ " '; "
+ "  "
+ " IF '%' != '%' then "
+ " csSelectCosmos := csSelectCosmos || ' WHERE JOURNAL.TYPE LIKE ''P%'' '; "
+ " end if; "
+ "  "
+ " csSelectCosmos:= csSelectCosmos || ' ORDER BY JOURNAL.DT_MODIFICATION DESC'; "
+ "  "
+ " execute immediate csSelectCosmos; "
+ " end; ";

et donc de me retourner les données.
A savoir que le contenu de la requête est complétement dynamique, nombre de champs, liaison entre les tables

Sous sqlserver un simple execute m'a donné le résultat assez facilement mais sous oracle, je ne suis vraiment pas a l'aise et évidemment si je n'avais pas déjà cherché des heures, je ne poserais pas la question.
J'ai essayé des choses avec execute immediate ou encore dbms_sql.desc_table.

[McM]

Comment veux-tu récupérer les données ?
Un select en PL/SQL doit forcément avoir un INTO, que ce soit dans des variables (1 seule ligne) ou une collection (plusieurs lignes)

Ta procédure ou fonction doit avoir un retour (RETURN pour une fonction, paramètre OUT pour une procédure).
Tu peux aussi utiliser DBMS_OUPUT.

Dans tous les cas, la procédure doit connaitre la définition des colonnes du Select.

[arnaud.mille]

Ok comme je ne peux pas connaître la définition des colonnes du select , je change mon fusil d'épaule...

J'ai une procédure déclarée comme suit :

Code :

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

1
2
3
4
5
6
CREATE OR REPLACE PROCEDURE ReportEngineExecute2 (csStatement in varchar2, csSelect out varchar2)
  IS
  BEGIN
    execute immediate csStatement using out csSelect;
  END;
/

et un appel comme celui-ci

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
 
set serveroutput on;
 
declare 
csSelect varchar2(4000);
csSelectFinal varchar2(4000);
 
begin 
csSelect:=
 
'declare vch varchar2(500); begin :
vch :=''SELECT USR.NOM AS USR,  JOURNAL.DT_MODIFICATION,  JOURNAL.MODIFICATION, PERSONNEL.NOM, PERSONNEL.PRENOM, JOURNAL.TYPE'';
 
IF ''P'' != ''%'' then 
vch := vch || '' WHERE JOURNAL.TYPE LIKE ''''P%'''' ''; 
end if; 
 
vch := vch || '' ORDER BY JOURNAL.DT_MODIFICATION DESC'';
 
end;' 
;
 
 
ReportEngineExecute2(csSelect,csSelectFinal);
dbms_output.put_line(csSelectFinal);
 
end;

pourquoi le résultat obtenu vaut

Code :

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

 SELECT USR.NOM AS USR,  JOURNAL.DT_MODIFICATION,  JOURNAL.MODIFICATION, PERSONNEL.NOM, PERSONNEL.PRENOM, JOURNAL.TYPE

et non

Code :

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

 SELECT USR.NOM AS USR,  JOURNAL.DT_MODIFICATION,  JOURNAL.MODIFICATION, PERSONNEL.NOM, PERSONNEL.PRENOM, JOURNAL.TYPE WHERE JOURNAL.TYPE LIKE 'P%' ORDER BY JOURNAL.DT_MODIFICATION DESC

[McM]

Ton code est faux (sort en erreur à cause du : après le begin

Si tu fais

Code :

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

1
2
declare vch varchar2(500); begin 
:vch :=''SELECT USR.NOM AS USR,  JOURNAL.DT_MODIFICATION,  JOURNAL.MODIFICATION, PERSONNEL.NOM, PERSONNEL.PRENOM, JOURNAL.TYPE'';

Alors avec un

Code :

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

execute immediate csStatement using out csSelect

, csSelect va recevoir :vch
Attention :vch n'est pas vch
Dans un execute immediate, le nom des bind variables n'a aucun importance, Oracle les remplacera par :1, :2, :3 suivant l'ordre d'apparition (même si elles ont le même nom).

Donc pour que ton code marche, il faut affecter la bind variable à la fin.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
DECLARE 
  csSelect varchar2(4000);
  csSelectFinal varchar2(4000);
BEGIN 
csSelect:= 'declare vch varchar2(500);
begin 
vch :=''SELECT USR.NOM AS USR,  JOURNAL.DT_MODIFICATION,  JOURNAL.MODIFICATION, PERSONNEL.NOM, PERSONNEL.PRENOM, JOURNAL.TYPE'';
 IF ''P'' != ''%'' then vch := vch || '' WHERE JOURNAL.TYPE LIKE ''''P%''''''; end if; 
 :retour := vch || '' ORDER BY JOURNAL.DT_MODIFICATION DESC'';
end;' ;
 ReportEngineExecute2(csSelect,csSelectFinal);
 dbms_output.put_line(csSelectFinal);
END;

[arnaud.mille]

Je te remercie, çà marche parfaitement