GOTO dans une procédure stockée

A ma grande fierté jusqu'à présent je n'avais pas utilisé de GOTO dans mes procédures.
A ma grande honte :oops:, j'essaye d'utiliser ce fameux GOTO et là, je sèche :aie: je ne sais pas l'utiliser ; j'essaye sans succès quelque chose du genre

Code:

---

1 2 3 4 5 6 7 8 9 10 11

CREATE PROCEDURE MONTEST AS DECLARE VARIABLE MODE INTEGER; BEGIN ......... IF (MODE=1) THEN GOTO FIN; ......... FIN: ........ END

---

Bon, aujourd'hui c'est pas la grande forme , ôtez-moi d'un doute , GOTO existe bien :(
Pourriez vous me donner un exemple .

Merci .

Citation:

---

GOTO

Firebird has no GOTO statement. However, this usually turns for the better. GOTO statements are usually used in MS SQL because errors do not roll back transactions by default (the @@ERROR variable must be examined after every statement); GOTO is used to group error handling statements. In Firebird, there is a better error-handling mechanism: the WHEN...DO statements.

---

http://www.firebirdsql.org/manual/mi...ql-syntax.html

Désolé !

Y a pas de quoi. :D

Cependant il me semblait que c'etait devenu obsolète avec les nouvelles versions. J'en voudrait pour preuve que Goto est devenu un mot réservé et que LEAVE par exemple utilise bien des labels .

Va falloir que j'approfondisse un jour avec , donc pas aujourd'hui ;)

Citation:

---

Envoyé par SergioMaster

...et que LEAVE par exemple utilise bien des labels .

---

A part que LEAVE s'utilise dans une boucle de type WHILE, FOR SELECT, FOR EXECUTE STATEMENT et non avec un IF comme dans ton exemple.

@+

Goto c'est le mal ! :mouarf: firebird c'est le bien :king:

Soit tu fais avec ton if

Code:

---

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

CREATE PROCEDURE MONTEST AS DECLARE VARIABLE MODE INTEGER; BEGIN ......... IF (MODE<>1) THEN begin ......... end FIN: ........ END

---

Soit tu décomposes en 2 PS :

Code:

---

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

CREATE PROCEDURE MONTEST(Mode integer) as begin IF (MODE=1) THEN exit; ......... end   CREATE PROCEDURE Appel_MONTEST AS DECLARE VARIABLE MODE INTEGER; BEGIN ......... execute procedure MONTEST(:Mode); FIN: ........ END

---

Pour revenir au Goto il existe bien mais uniquement pour le EmbededSQL il me semble. Donc pas dans les PS.

Et ce n'est pas un Goto comme tu le souhaites puisque c'est un goto lié au test de la variable de retour SQLCODE.

Code:

---

1 2	WHENEVER {NOT FOUND | SQLERROR | SQLWARNING} {GOTO label | CONTINUE};

---

exemple tiré du langage de référence d'interbase 6 :

Code:

---

1 2 3 4 5 6

EXEC SQL WHENEVER SQLERROR GOTO Error; /* Trap all errors. */ EXEC SQL WHENEVER NOT FOUND GOTO AllDone; /* Trap SQLCODE = 100 */ EXEC SQL WHENEVER SQLWARNING CONTINUE; /* Ignore all warnings. */

---

:hola::hola::hola: toutes mes excuses .
Faut dire que ce matin ce n'était pas la forme olympique .
De toute façon je vais contourner le problème à ma manière et sans goto , de toute façon je l'aime pas :lol:

BON, je me suis passé des gotos et autres.

un seul point à éclaircir .

Je fais à l'intérieur de cette procédure plusieurs UPDATES , je voudrait être sur qu'en cas d'erreurs sur l'un d'eux , aucunes mises à jour ne soit effectuées . C'est bien le cas non ? un procédure=une transaction , si je ne fais aucun commit à l'intérieur , aucune validation ne sera effectuée ?

En fait j'essaye de transformer de mySQL à firebird l'excellent papier de SQLPro sur les arborescences ici . ça marche, y a encore du boulot d'optimisation de code mais ça fonctionne :yaisse2:

ce n'est pas trop dur, je l'avais fait à une époque

ceci dit, avec la possibilité maintenant de faire des requêtes recursives, une partie de tout cela n'est plus forcément très utile

Citation:

---

Envoyé par makowski

ce n'est pas trop dur, je l'avais fait à une époque

---

exact

Citation:

---

Envoyé par makowski

ceci dit, avec la possibilité maintenant de faire des requêtes recursives, une partie de tout cela n'est plus forcément très utile

---

j'ai hâte d'en savoir plus ;)

d'en savoir plus ?

cherche CTE sql, lis les notes de version, ...

ou achète ce numéro de Linux magazine :
http://ed-diamond.com/feuille_lmag111/index.html
http://ed-diamond.com/produit.php?produit=604

Citation:

---

Envoyé par makowski

d'en savoir plus ?
cherche CTE sql, lis les notes de version, ...

---

en cours d'épluchage ;)

Citation:

---

Envoyé par makowski

ce numéro de Linux magazine

---

merci pour la reférence