[PL/SQL][Oracle9] Retour de curseur avec du Sql dynamique

Bonjour,

je dois créer une procédure stockée dynamique qui me retourne en paramètre de sortie un curseur.

J'ai d'abord fait un test sans Sql dynamique qui fonctionne très bien :

Code:

---

1 2 3 4 5 6 7 8 9 10 11

CREATE OR REPLACE PROCEDURE PS_GET_DETAILS_LOCALISATION (NOM_TABLE IN VARCHAR2, ID_TABLE IN VARCHAR2, io_cursor OUT LP_LOCALISATION.C_ST_LOCALISATION ) AS BEGIN OPEN io_cursor FOR SELECT ID, CODE, DESI FROM VW_LOCALISATION_UP WHERE ID = TO_NUMBER(ID_TABLE); END;

---

Maintenant je souhaite réaliser la même chose avec un nom de vue dynamique :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16

CREATE OR REPLACE PROCEDURE PS_GET_DETAILS_LOCALISATION (NOM_TABLE IN VARCHAR2, ID_TABLE IN VARCHAR2, io_cursor OUT LP_LOCALISATION.C_ST_LOCALISATION ) AS   vlStr VARCHAR2(500) ; BEGIN vlStr := ' OPEN io_cursor FOR ' ; vlStr := vlStr || ' SELECT ID, CODE, DESI ' ; vlStr := vlStr || ' FROM VW_LOCALISATION_' || NOM_TABLE ; vlStr := vlStr || ' WHERE ID = TO_NUMBER(' || ID_TABLE || ')' ;   ????????????????? END;

---

Que mettre à la place de ?????
J'ai essayé un execute immediate, DBMS_SQL.PARSE mais ça ne marche pas j'ai toujours une erreur au moment de l'exécution.
Merci par avance de votre aide.

Code:

---

execute immediate vlStr ;

---

non ?

ne met pas le "open cursor io_cursor for" dans ta chaine dynamique, il faut faire une open cursor normal mais qui se défini par une chaine dynamique

voir la doc oracle là

Remarque: Oracle demande à ce qu'une variable curseur soit déclarée en "in out" et non en "out", je vois pas la différence profonde mais soyons bête et discipliné au moins dans un 1ier temps ;)

Sorry :cry: mais malgré l'aide je ne m'en sors pas, je pense qu'il doit y avoir une grosse erreur de code mais je ne la vois pas :arf:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17

CREATE OR REPLACE PROCEDURE PS_GET_DETAILS_LOCALISATION (NOM_TABLE IN VARCHAR2, ID_TABLE IN VARCHAR2, io_cursor IN OUT LP_LOCALISATION.C_ST_LOCALISATION ) AS   vlStr VARCHAR2(500) ; BEGIN vlStr := 'SELECT ID, CODE, DESI ' ; vlStr := vlStr || ' FROM VW_LOCALISATION_' || NOM_TABLE ; vlStr := vlStr || ' WHERE ID = TO_NUMBER(' || ID_TABLE || ')' ;   OPEN io_cursor FOR execute immediate vlStr;   END;

---

Voici l'erreur de compil

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16

Avertissement : Procédure créée avec erreurs de compilation. Erreurs pour PROCEDURE PS_GET_DETAILS_LOCALISATION : LINE/COL ERROR -------- ----------------------------------------------------------------- 14/9 PLS-00103: Symbole "IMMEDIATE" rencontré à la place d'un des symboles suivants : . ( * @ % & = - + ; < / > at in is mod not rem <an exponent (**)> <> or != or ~= >= <= <> and or like between using ||   16/4 PLS-00103: Symbole "end-of-file" rencontré à la place d'un des symboles suivants : begin function package pragma procedure subtype type use <an identifier> <a double-quoted delimited-identifier> form current cursor

---

Ah ben non, tu as mélangé les 2 posts... :lol: et en toute modestie je pense seule ma solution fonctionne...

il faut faire tout simplement :

Code:

---

1 2 3 4 5 6

...   OPEN io_cursor FOR vlStr;   ...

---

tu a été voir sur le lien que je t'ai indiqué ?

http://download-uk.oracle.com/docs/c..._ora.htm#31684

Ben en fait j'avais fait pas mal d'essais dont la solution que tu me proposes

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17

CREATE OR REPLACE PROCEDURE PS_GET_DETAILS_LOCALISATION (NOM_TABLE IN VARCHAR2, ID_TABLE IN VARCHAR2, io_cursor IN OUT LP_LOCALISATION.C_ST_LOCALISATION ) AS   vlStr VARCHAR2(500) ; BEGIN vlStr := 'SELECT ID, CODE, DESI ' ; vlStr := vlStr || ' FROM VW_LOCALISATION_' || NOM_TABLE ; vlStr := vlStr || ' WHERE ID = TO_NUMBER(' || ID_TABLE || ')' ;   OPEN io_cursor FOR vlStr;   END;

---

mais elle ne marche pas non plus :pleure:

Code:

---

1 2 3 4 5 6 7 8

Erreurs pour PROCEDURE PS_GET_DETAILS_LOCALISATION :   LINE/COL ERROR -------- ----------------------------------------------------------------- 13/1 PL/SQL: Statement ignored 13/6 PLS-00455: impossible d'utiliser le curseur 'IO_CURSOR' dans une instruction SQL dynamique OPEN

---

Je m'arraches les cheveux avec ce problème depuis plusieurs jours et je n'arrive pas à trouver :traine:

J'ai lu le lien indiqué mais visiblement je n'arrive pas à recoller les morceaux

If faut utiliser une variable REF CURSOR pour ouvriri ce type de curseur dynamique.
C'est démontré dans la doc pointée par rémi4444

J'ai réussi à créer ma procédure de la façon suivante :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19

CREATE OR REPLACE PROCEDURE PS_GET_DETAILS_LOCALISATION (NOM_TABLE IN VARCHAR2, ID_TABLE IN VARCHAR2, IO_CURSOR IN OUT LP_LOCALISATION.C_ST_LOCALISATION ) AS   TYPE MonCur IS REF CURSOR; Cur MonCur;   vlStr VARCHAR2(500) ; BEGIN vlStr := 'SELECT ID, CODE, DESI ' ; vlStr := vlStr || ' FROM VW_LOCALISATION_' || NOM_TABLE ; vlStr := vlStr || ' WHERE ID = TO_NUMBER(' || ID_TABLE || ')' ;   OPEN Cur FOR vlStr;   END;

---

Maintenant la question qui se pose est comment faire pour récupérer le contenu du curseur Cur afin de le faire ressortir (IO_CURSOR IN OUT ) ?

Utilisez une variable de type SYS_REFCURSOR (au lieur de REF CURSOR). Elle peut être invoquée à l'extérieur de tout package.

:ave: Merci infiniment cela fonctionne parfaitement, je n'aurai jamais pu y arriver sans votre aide !

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16

CREATE OR REPLACE PROCEDURE PS_GET_DETAILS_LOCALISATION (NOM_TABLE IN VARCHAR2, ID_TABLE IN VARCHAR2, IO_CURSOR IN OUT SYS_REFCURSOR) AS   vlStr VARCHAR2(500) ; BEGIN vlStr := 'SELECT ID, CODE, DESI ' ; vlStr := vlStr || ' FROM VW_LOCALISATION_' || NOM_TABLE ; vlStr := vlStr || ' WHERE ID = TO_NUMBER(' || ID_TABLE || ')' ;   OPEN IO_CURSOR FOR vlStr;   END;

---

Bonjour,

mon soucis ce situe à la fin de la réponse.

en effet, de mon coté j'ai réussi à obtenir le même code.

Cependant impossible de trouver comment faire pour lire curseur sans connaitre le nom de la table.

en effet, la quantitée de champ, les champs et les table utilisent ne sont pas connu par la fonction.

si quelqu'un pouvait m'aider, merci....