[Firebird] Procedure stockee via delphi

Bonjour a tous,


je suis pas tres content du titre :calim2:


je "pilote" Firebird 2.1 depuis Delphi7 en utilisant les composants UIB.

J'ai une PS du type :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

FOR select * from Table DO Begin IF qq THEN Begin UPDATE OR INSERT INTO Table1 ( Table1.Champ1, Table1.Champ2) VALUES (Table.Champs1, une_valeur); END Suspend; END

---

Le pb ne porte pas sur la PS (l'execution via IBExpert fonctionne parfaitement), non son execution via les UIBs

Normalement l'appel de la procedure se fait via :

Code:

---

Query_Firebird.BuildStoredProc('PS_RECUP_DATA', False);

---

et

Code:

---

Query_Firebird.Execute;

---

Or lorsque je veux lire les infos qui sorte avec le SUSPEND dans les variables de sortie, la premiere ligne est parfaitement lu, mais a la suivant (Query_Firebird.Next) je recois un message d'erreur :

Citation:

---

Request synchronisation error
unsucceful execution caused by system error that does not preclude successful execution of subsequent statements
error code 44

---

J'ai essaye en mettant true au lieu de false (Query_Firebird.BuildStoredProc('PS_RECUP_DATA', True) et en laissant
Query_Firebird.Execute en lieu et place de Query_Firebird.Open;

Dans ce cas je recupere les infos mais la mise a jour des tables ne s'effectue pas.

Le parametres de tansaction sont a :

Code:

---

Trans_Firebird.Options := [tpConsistency, tpWait, tpWrite];

---

Je pense que le pb est a ce niveau, mais je ne vois pas quoi faire

a+

olivier

Je ne comprend pas exactement l'ensemble de la procédure , QQ correspond au paramètre ?

De toute façon , en tout état de cause , ta procédure renvoyant des informations il faut bien faire un Open et non un Exécute
et ceci sur un

Code:

---

SELECT * FROM PS_RECUP_DATA(False)

---

Bonjour SergioMaster,


Je suis bien d'accord. Mais en faisant l' "open" ca ne marche pas.

La fonction de la PS est de m'envoyer des informations et dans ce cas mettre a jour la table des "Envoi d'information'.

si je prend l'exemple d'un publipostage. La PS selectionne les clients et ajoute l'infos de cette envoi dans la table des 'envoi aux clients'.
La PS a donc 2 fonctions, l'une de selection de infos (client) et l'autre d'ecriture dans une table.
Evidemment, je peux le faire en 2 etapes (2 PS), mais je trouvais plus elegant de le faire en 1 seule.

j'espere etre clair :oops:
a+

olivier

Salut,

Je n'ai pas encore eu le temps de voir FB2 mais avec FB1.5 dès qu'il y a retour de plus d'une lignes (dans ton cas), il faut utiliser un query mais pas une procédure stocké pour récupéré les valeurs comme SergioMaster l'as indiqué.

Code:

---

1 2	select * from TA_PROCEDURE_STOCKE(Param1,...,paramx)

---

Oups j'avais pas compris ca ! :traine:


J'ai mis cette PS dans une query

Code:

---

1 2 3 4 5

Query.SQL.Text := 'SELECT * FROM Ps_Bla_Bla(:param1, :Param2)'; Query.Params.ByNameAsString['param1'] := 'Bla'; Query.Params.ByNameAsString['param2'] := 'BlaBla'; Query.Open(True);

---

et ca marche, bien sur

merci a tous les 2

et maintenant :sm:

:sm::scarymov::scarymov: ça t'apprendra a bien lire :lol: