Discussion :

[Just-Soft]

Salut

voilà, dans ma bd FireBird, j'ai créé un déclencheur dont je veux l'exploiter sous delphi lors d'insertion d'un nouvel enregistrement, ce déclencheur fait un petit calcul pour générer un code dont il doit être attribuer au nouvel enregistrement. mais comme je l'ai jamais fais auparavant je ne sais pas la démarche à suivre malgré que j'ai fais une petite recherche sur le net sauf que j'ai pas aboutit.

je me retourne vers vous pour m'éclaircir. merci par avance.

[SergioMaster]

bonjour,
Sous Delphi , rien , c'est le moteur de Firebird (ou d'une autre SGBDR) qui fait le travail . Un trigger , contrairement a une procedure n'a pas besoin d'être 'lancé'.

Récupérer la valeur sous delphi , là par contre , c'est une autre paire de manches !!
soit tes composants permettent les Querys INSERT récupérant des valeurs (fib 2.5) et alors tant mieux (très peu le permette)
soit ce n'est pas le cas alors une relecture de l'enregistrement est nécessaire

[Just-Soft]

bonjour,
Sous Delphi , rien , c'est le moteur de Firebird (ou d'une autre SGBDR) qui fait le travail . Un trigger , contrairement a une procedure n'a pas besoin d'être 'lancé'.

Récupérer la valeur sous delphi , là par contre , c'est une autre paire de manches !!
soit tes composants permettent les Querys INSERT récupérant des valeurs (fib 2.5) et alors tant mieux (très peu le permette)
soit ce n'est pas le cas alors une relecture de l'enregistrement est nécessaire

oui c'est ce que je voulais dire récupérer la valeur du trigger pour pouvoir l'utiliser, donc si j'ai bien compris faudrait que le composant lui même le permette ! ok, je vais essayer avec les composants fib pourvu que je trouve la version qui marche avec delphi 2009.

par contre j'ai pas bien saisis ta dernière phrase

soit ce n'est pas le cas alors une relecture de l'enregistrement est nécessaire

que veux-tu dire par relecture de l'enregistrement ? mon schéma est le suivant, lors d'un ajout je dois récupérer le code généré par le trigger donc l'enregistrement n'a pas encore été créé alors comment le relire sauf si tu parles d'autre chose

merci par avance.

[makowski]

avec n'importe quel bon composant un INSERT ... RETURNING et c'est réglé

[Just-Soft]

avec n'importe quel bon composant un INSERT ... RETURNING et c'est réglé

alors là j'ai rien pigé
d'abord le insert pour aboutir a besoin du code généré par le trigger dont je ne sais comment l'exécuter sous delphi donc je me demande qu'est ce qui est réglé ? sauf si tu permets de me simplifier les choses avec un bout de code ou un descriptif du comment.

merci par avance.

[Cl@udius]

d'abord le insert pour aboutir a besoin du code généré par le trigger ...

Non c'est là ton erreur de raisonnement.
Lorsque tu fais un insert via une requête INSERT INTO ou via un DataSet (Insert/Append puis Post), le trigger Avant Insertion de ta table va se déclencher (tout seul comme un grand) et alimenter le code dont tu as besoin.

Si tu passes par une requête INSERT INTO .. RETURNING, comme le suggère Philippe, (voir notes de version ici), tu peux lui demander de te renvoyer la valeur du code. (pas Philippe, l'Insert)

@+ Claudius.

[SergioMaster]

avec n'importe quel bon composant un INSERT ... RETURNING et c'est réglé

Voilà le hic , les 'bons' composants ne sont pas légion

que veux-tu dire par relecture de l'enregistrement ? mon schéma est le suivant, lors d'un ajout je dois récupérer le code généré par le trigger donc l'enregistrement n'a pas encore été créé

je n'avais pas suivi le raisonnement jusqu'au bout

[Délire non vérifié]
Ceci dit , si c'est une seule valeur ca peut peut être se contourner en utilisant une 'variable' de Firebird et une interrogation sur RDB$DATABASE
[/Délire matinal] je préfére quand même les 'bons' composants

[dehorter olivier]

bonjour

pourquoi ne pas utiliser dans le trigger un POST_EVENT

qui pourrait ensuite etre recupere l'info par un composant 'alert' ou event selon les distributeurs ?

a+

[Just-Soft]

@SergioMaster : comment utilise-t-on une variable FireBird sous Delphi car je l'ai jamais fais auparavant ? un tuto peut-être que tu peux me filer.

@dehorter Olivier : un petit exemple si possible ou un tuto qui pourra me guider.

d'avance merci.

[makowski]

@SergioMaster : comment utilise-t-on une variable FireBird sous Delphi car je l'ai jamais fais auparavant ? un tuto peut-être que tu peux me filer.

@dehorter Olivier : un petit exemple si possible ou un tuto qui pourra me guider.

d'avance merci.

aucune de ces deux "solutions" ne sont bonnes
la bonne c'est vraiment tout simplement d'utiliser

Code :

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

INSERT ... RETURNING

http://www.developpez.net/forums/d98...-returning-id/
http://www.firebirdfaq.org/faq243/

[Just-Soft]

ok ok, je viens de voir la doc, l'exemple qu'ils donnent est le suivant :

INSERT INTO T1 (F1, F2)
VALUES (:F1, :F2)
RETURNING F1, F2 INTO :V1, :V2;

je veux être sûr d'une seule chose, si le trigger se déclenche tout seul et qu'il alimente le insert j'ai pas besoin d'un returning car ce qui m'intéresse c'est que le champ en question soit renseigné.

autre chose, que dois-je mettre dans la partie value du champ en question puisque c'est le trigger qui s'en occupe sachant que ce champ est "not null".

merci encore.

[makowski]

mais dans ce cas tu n'as même pas besoin de returning
et ce n'est absolument pas une question pour le forum Delphi
c'est quoi le code de ton trigger ?

[Just-Soft]

mais dans ce cas tu n'as même pas besoin de returning
et ce n'est absolument pas une question pour le forum Delphi
c'est quoi le code de ton trigger ?

Re,

merci mais je crois que je me suis mal expliqué !
je développe avec Delphi (donc je suis dans le bon forum ) ma bd est FireBird, j'ai créé un trigger sa fonction étant de générer un code celui-ci doit être utilisé lors d'insertion d'un nouvel enregistrement. en lisant les différentes contributions j'ai compris que le trigger se déclenche tout seul en réponse à un append de la table en question. j'ai fais des essais en renseignant les différents champs de ma table sauf celui qui doit être renseigné par le trigger mais ça n'a pas marché ! je ne sais pas où est le problème c'est pourquoi j'ai pensé tout naturellement que j'ai loupé quelque chose entre Delphi - FireBird.

merci de m'orienter d'avantage.

[Cl@udius]

... ma bd est FireBird, j'ai créé un trigger sa fonction étant de générer un code ...

Montre-nous le code de ton trigger, pour vérifier que celui-ci fait bien ce que tu attends.

@+

[Just-Soft]

c'est un bout de code assez simple

Code :

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

1
2
3
4
5
6
7
CREATE OR ALTER trigger tb_courrier_bi0 for tb_courrier
active before insert position 0
AS
begin
  IF ( NEW.CODE_COURRIER IS NULL ) THEN
    NEW.CODE_COURRIER = GEN_ID(GEN_TB_COURRIER_ID,1);
end

[ouiouioui]

et le générateur "GEN_TB_COURRIER_ID" existe bien ?

[Just-Soft]

et le générateur "GEN_TB_COURRIER_ID" existe bien ?

oui, il est bien là.

[Just-Soft]

j'ai tenté d'appeler le trigger dans la clause insert comme suit mais ça n'a pas marché

Code :

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

1
2
3
4
insert into tb_courrier (code_courrier, code_type, code_famille, date_arrivee, ref, objet, mots_cles, piece_jointe,
specifite, date_enregistrement, num_enregistrement, chemin_dur)
values (tb_courrier_bi0, 1, 1, '01/01/2010', '36/ona/dg/2010', 'A/S du recrutement', 'recrutement', '', 'instruction',
'03/01/2010', '3/2010', 'c:\courrier\intruction_du_01_01_2010.doc');

ça peut paraitre idiot mais ma connexion est tellement faible que j'ai pas pu récupérer un tuto ou une astuce sur le net donc je vous demande de m'éclairer sur comment faire l'appel du trigger à l'intérieur du insert.

merci encore.

[Just-Soft]

hihi, j'étais tellement bête sur ce coup là que j'ai pas compris qu'il fallait nullement renseigner le champs code_courrier ni le mettre dans la clause insert into ...

merci à vous tous, je continue à avancer, c'est une belle aventure FireBird, Delphi et application réseau