Discussion :

[butch]

Bonjour. J'essais d'utiliser le composant TADOStoredProc pour executer des procedures stockées.tout se passe bien avec les procedures stockées qui ne renvoient pas de valeur, mais ça ne marche pas avec les ps qui renvoient une valeur.

Attention, je ne parle pas des procedures qui renvoient un dataset, mais des procedures qui renvoient un scalaire . (une fonction donc)

[ShaiLeTroll]

on a pas déjà évoqué cela ici

http://www.developpez.net/forums/sho...light=ExecProc

Essaye donc un bon Open !

[butch]

Bonjour. Non ,il ne s'agit pas du même pb. Dans le pb précédent, la procedure ne renvoyait ni scalaire , ni résultat set. Cette fois ci, il s'agit d'une autre procedure qui renvoie un integer. J'insiste, la procedure n'ouvre pas de curseur, mais renvoie un nombre

[ShaiLeTroll]

Donc je confirme dans le post que j'ai mentionné, j'évoque Parameters , qui devrait contenir les résultats non dataset ...

[butch]

effectivement , mais ça ne fonctionne pas.
Delphi retrouve tout seul ces paramètres.il reconnait qu'il y en a deux. (un en entrée et un pour la valeur de retour) mais lorsque j'essai de faire un open ou un execproc, j'ai un message du style "programme machin non trouvé avec les paramètres indiqués"

Lorsque delphi retrouve les paramètres, il met le second en output.j'ai essayé le type returnvalue, mais le resultat est le meme.

[Rayek]

Quel base de données utilises tu ?

[butch]

Pour l'instant je fais des tests avec une base de données DB2 sur as400
Dans quelques jours je devrais pouvoir faire des tests sur une base sql serveur.

[Rayek]

normalement tu as accès à tes valeurs de retour avec FieldByName ou je ne sais quel autre moyen (Ca fait un moment que je n'ai plus utilisé de procédure stockée, faut que cela revienne ^^)

Avec SQL Server je me souviens qu'avec la version 2000 il faut récupérer @Nom_du_param_de_retour et avec les versions supérieures @@Nom_du_param_de_retour.

Faut faire des tests

[butch]

Le problème c'est qu'une exception est levée lors du execproc, donc je ne peux pas accéder aux valeurs de retour ..

[Rayek]

Peux tu faire voir ton code complet de l'appel de la procédure stockée et aussi la procéduer stockée elle même.

[butch]

ci dessous une exemple simplifié :

Code :

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

1
2
3
4
5
6
7
CREATE FUNCTION ARNAUD/FUNC1 (X integer)      
         RETURNS integer             
         LANGUAGE SQL                
         CONTAINS SQL                
         NO EXTERNAL ACTION          
         DETERMINISTIC               
         RETURN     2*X

Ci dessous l'appel à la procédure stockée :

Code :

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

ADOStoredProc1.ExecProc

***********************
Un collègue vient de me proposer une solution.
En utilisant un composant tadoquery, je peux executer la requete suivante :

select arnaud.func1(2) from sysibm.sysdummy1

La table sysdummy est une table avec un enregistrement destinée à ce genre de requetes.
Mais cela fonction sur une base db2 ibm. Je devrais bientot devoir travailler sur une base sql server, et il semble qu'il n'y ait pas d'équivalent à la table sysdummy1. Je crois que je vais créer une nouvelle discussion pour cela.

[Rayek]

Et l'exception elle te dit quoi ? (oublie de demander au post précédent )

[butch]

Ci dessous le texte de l'exception

SQL0440 : Programme FUNC1 de ARNAUD non trouvé avec les paramètres indiqués.

Cause . . . . . : Une fonction ou une procédure portant le nom indiqué et les associée aux arguments compatibles n'a pas été trouvée.Que faire . . . : Indiquez le nombre et le type correct de paramètres dans l'instruction CALL ou l'appel de fonction. Renouvelez ensuite votre demande.

la procedure stockée (qui est en fait une fonction) prend un entier en entrée et renvoie un entier. J'ai essayé toutes les solutions possibles lors de la définition des paramètres dans le composant TADOStoredProc et à chaque fois la meme erreur.
solutions essayées :
_2 paramètres , le second en outpu
_2parmaètres, le second en returnvalue
_ 1parmamètre (celui d'entrée)