Discussion :

[Cpas2latarte]

Bonjour

J’ai une application Delphi (6) fonctionnant sur une base Oracle ou SQL-Server.
Je dois lancer une procédure stockée qui réalise un traitement dans la base et renvoi un code de retour sous la forme d’une variable « OUT ».
Je dois ensuite, dans mon programme exploiter cette valeur de retour.
Récupérer cette valeur est aisé pour Sql-Serveur, car un simple select de cette variable suffit.
Mon problème est que, pour oracle je n’ai pas la moindre idée de comment faire.
J’ai pensé à faire, une fonction qui lance la procédure et renvoi le code retour, Mais cela me semble un peu lourd.
Quelqu’un aurait ‘il une piste

Merci

[McM]

Code :

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

1
2
3
4
5
DECLARE
v_retour NUMBER;
BEGIN
 MA_PROC('VAR ENTREEE', v_retour);
END;

[Cpas2latarte]

la syntaxe pour lancer la procédure ne me pose pas de problème
Ce que je voudrais en fait c'est récupérer cette variable dans mon application.
Pour Sql-server, je fait quelquechose du genre :

Code :

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

1
2
3
 
Execute MA_PROC 'VAR ENTREEE', v_retour
Select v_retour as valeur_retour

cela me renvoi un jeu de resultat de 1 ligne contenant le champ "valeur_retour"
En oracle j'aimerai faire la même chose. La seule maniere que j'ai trouvé est :

1. lancer une requette qui execute la proc et stock la valeur dans une table "temporaire"
2. lancer une seconde requête qui récupère cette valeur à partir de la table "temporaire"

Mais je trouve cette manière de faire un peu lourde. Je voudrais savoir s'l y a une maniere plus simple voir plus propre.

[plaineR]

Tu peux faire quelque chose de similaire sous Oracle :

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
SQL> create procedure p1 (v_res out varchar2) is
  2  begin
  3    v_res := 'RESULTAT';
  4  end;
  5  /
Procedure created.
 
SQL> variable result varchar2(30);
 
SQL> exec p1 (:result);
PL/SQL procedure successfully completed.
 
SQL> select :result from dual;
:RESULT
--------------------------------
RESULTAT

Mais je n'ai peut-être pas compris comment tu exécutais ta requête sous SQL Server...

[Cpas2latarte]

Effectivement, cette synthaxe fonntionne, mais malheuresusement, elle ne semble fontionner que dans l'environnement SQL-Plus.
Impossible de la faire fonctionner dans le contexte de mon application Delphi (requête au traver de la librairie SQLExpress).
Je pense que je vais rester a mon idée première, c'est a dire que je vais passer par une table "temporaire"

Merci de vos réponses

[plaineR]

Cela semble être davantage un problème delphi que Oracle, peut-être auras-tu une réponse dans le forum delphi.