Discussion :

[mls]

Bonjour,

J'ai un projet Delphi où j'insère un enregistrement dans une table ayant au auto increment en clé primaire.
J'aimerai récupérer cette valeur de l'auto increment lorsque je viens de l'ajouter dans la table.

Avec l'outil IBExpert, pas de problème, cela fonctionne :

Code :

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

INSERT INTO ma table (ch1, ch2, ...) VALUES (val1, val2, ....) RETURNING ch1;

Cette syntaxe me permet de récupérer la valeur de l'auto increment venant d'être inséré (ici "ch1").


Avec Delphi, voici le code que j'utilise (avec un TSimpleDataSet nommé DT) :

Code :

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

1
2
3
4
5
...
DT.DataSet.CommandText := 'INSERT INTO ma_table (ch1, ch2, ...) VALUES (:val1, :val2, ....) RETURNING ch1';
...
DT.Execute;
...

L'insertion fonctionne parfaitement mais comment récupérer la valeur de l'auto increment venant d'être inséré dans "ch1" ?

Merci beaucoup d'avance...

[Just-Soft]

Salut;

je crois que tu peux la retrouver dans l'évènement beforeinsert ou beforepost.
mais j'ai une remarque à faire, en général on n'utilise pas un champ auto incrément comme clé primaire c'est très difficile à maintenir surtout si tu fais des suppressions que ce champ est utilisé dans des relations maitre détail.

[Andry]

Salut;
mais j'ai une remarque à faire, en général on n'utilise pas un champ auto incrément comme clé primaire c'est très difficile à maintenir surtout si tu fais des suppressions que ce champ est utilisé dans des relations maitre détail.

Et pourquoi donc est ce si difficile à maintenir ?
La gestion des relations maitre/détail doit être mis au niveau de la base de donnée.
mls >>>
Le truc que je fais tous les jours c'est de récupérer la valeur du générateur avant l'insertion, et d'utiliser cette valeur dans les insertions.

A+

[Just-Soft]

Et pourquoi donc est ce si difficile à maintenir ?

j'expose le problème de suppression qui entraine un décalage et pour y remédier on fait un compactage ou un ordonnancement, comment tu fais si tu as une relation maître/détail basé sur ce champ sachant que tu restructure ta base de données après les suppressions ?

[Andry]

j'expose le problème de suppression qui entraine un décalage et pour y remédier on fait un compactage ou un ordonnancement, comment tu fais si tu as une relation maître/détail basé sur ce champ sachant que tu restructure ta base de données après les suppressions ?

Généralement, ma clé primaire est juste un nombre sans signification particulier au niveau de ma table; dans la relation maitre/détail, la suppression est géré en cascade grâce à la contrainte imposé.

Ceci dis, chacun à ses méthodes .

[Just-Soft]

Généralement, ma clé primaire est juste un nombre sans signification particulier au niveau de ma table; dans la relation maitre/détail, la suppression est géré en cascade grâce à la contrainte imposé.

Ceci dis, chacun à ses méthodes .

c'est pour cela que je dis qu'il faut éviter

[Cl@udius]

Salut

L'insertion fonctionne parfaitement mais comment récupérer la valeur de l'auto increment venant d'être inséré dans "ch1" ?

Tu dois considérer cette valeur retournée comme un champ.

Code :

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

1
2
3
4
5
...
DT.DataSet.CommandText := 'INSERT INTO ma_table (ch1, ch2, ...) VALUES (:val1, :val2, ....) RETURNING ch1';
...
DT.Execute;
ID := DT.FieldByName('ch1').AsInteger;

@+ Claudius

[mls]

Salut



Tu dois considérer cette valeur retournée comme un champ.

Code :

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

1
2
3
4
5
...
DT.DataSet.CommandText := 'INSERT INTO ma_table (ch1, ch2, ...) VALUES (:val1, :val2, ....) RETURNING ch1';
...
DT.Execute;
ID := DT.FieldByName('ch1').AsInteger;

@+ Claudius

En fait, j'y avais déjà pensé mais cela ne fonctionne pas. Une exception est générée comme quoi le champ "ch1" n'existe pas...