Discussion :

[persam]

Bonjour,

Je programme en delphi sous delphi7(borland).

J'ai un petit problème de récupération d'id (autoincrémenté via un trigger
créé dans mon SGBD firebird 1.0.3)

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
code sql - autoincrémentation id
 
CREATE GENERATOR t_adresse_GenId^
 
CREATE TRIGGER trig_t_adresse_GenId FOR T_ADRESSE
ACTIVE BEFORE INSERT AS
BEGIN
	IF (NEW.t_adresse_id IS NULL) THEN
		NEW.t_adresse_id = GEN_ID(t_adresse_GenId,1);
END^

Je voudrais pouvoir récupérer l'id généré lors de l'insertion.
Est-on obliger de refaire une requete sql ou de passer par une procédure stockée? J'ai essayé après le ExecSql d'utiliser le champ GeneratorField de l'objet IBQuery1 mais je ne vois pas la propriété qui correspond à la valeur courante du générateur.

Code :

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

1
2
3
 
IBQuery1.SQL.Add(InsAdr);
IBQuery1.ExecSQL;

Sam

[qi130]

Ca, c'est dans la ..... Interbase !
http://interbase.developpez.com/faq/

[persam]

Sorry mais je vois pas de code delphi ds la faq interbase.

Tu parlais de cela : gen_id(GEN_MON_GENERATEUR,0) qd tu disais que la réponse était ds la faq. En dehors de code sql est ce possible de récupérer la valeur de l'id inséré?

[Cl@udius]

Salut,

Avec une requête mise à jour (un Insert dans ton cas), tu ne peux pas récupérer la valeur de l'autoincrément.
Il te faut une requête Select pour pouvoir renseigner la propriété GeneratorField et récupérer sa valeur.

Dans ton cas ne reste qu'une requête allant lire la valeur de l'incrément 'gen_id(GEN_MON_GENERATEUR,0)'.

@+ Claudius.

[persam]

Oki merci pour vos réponses.

Sam