Récupération d'un champ auto-incrémenté (PostgreSql)

Bonjour à toutes et tous...
Nouveau sous Lazarus, j'ai un petit problème à vous soumettre :
J'ai une table dont la clef primaire est de type INTEGER auto-incrémenté.
Je souhaite récupérer la valeur de la clef primaire après insertion d'un nouvel enregistrement.
Voici mon code SQL :

Code:

---

1 2 3 4 5 6

insert into topics (id, code, label, parent_topic, description) values (DEFAULT, :pcode, :plabel, :pparent_topic, :pdescription) returning id

---

Et le code Pascal :

Code:

---

1 2 3 4 5 6 7 8 9 10

with zqAddTopic do begin paramByName('pcode').asString := Code; paramByName('plabel').asString := Lbl; paramByName('pparent_topic').asInteger := ParentTopic; paramByName('pdescription').asString := Description; ExecSQL; result := fieldByname('id').asInteger; end;

---

Ce code fonctionne mais... id vaut toujours 0 alors que les lignes sont bien créées et que le compteur est bien incrémenté...
J'ai également tenté un

Code:

---

returning id into pid

---

voire même

Code:

---

returning id into :pid

---

en tentant de récupérer la valeur du paramètre...
Sans succès...
Quelqu'un a-t-il une piste à suggérer ?

versions: Lazarus v 0.9.31 et Zeos Lib 6.51

Merci d'avance,

Michel

Bonjour

Avec Zeos cela ne marche effectivement pas, et tu en apprendras plus avec cette discussion en anglais. C'est un problème indépendant de Lazarus.

Il parait qu'on peut utiliser les séquences PostgreSql mais la syntaxe varie selon les versions et elle est différente d'autres SGBD. J'y ai renconcé pour rester plus portable.

Sinon il suffit de rechercher la valeur max du champ autoincrémenté juste après l'insertion, à l'intérieur d'une transaction bien entendu.

PS : essaie de passer en Zeos 6.6.6 qui est stable depuis plus d'un an.

bonjour

effectivement ça ne marche pas avec une requete. La solution que j'ai trouvé qq part sur le net

Code:

---

1 2 3 4 5 6

matable.Insert //mise à jour des champs matable.FieldByName('code').AsInteger = code; matable.FieldByName('label').AsString = label; matable.Post lastInsrtId = matable.FieldByName('id').AsInteger;

---

lastInserId contient le dernier id ajouté
cordialement
Claude

Tintinux, Pomalo

L'utilisation d'un ZTable me semble tout-à-fait appropriée dans le cas présent.
Et pour d'autre cas plus complexes, j'utiliserai la transaction.

Merci pour votre aide active,

Michel

Hello :lol:

Pour récupérer le dernier identifiant d'un Insert , la réponse se trouve ici dans la doc de PostGreSql.

Il faut lire le résultat de la requete Insert en lui précisant le nom de la rubrique à renvoyer. (Utiliser RETURNING)

Citation:

---

INSERT INTO distributors (did, dname) VALUES (DEFAULT, 'XYZ Widgets')
RETURNING did;

---

Cordialement,
Chris

Bonjour Chris,

Mais est-il envisageable de récupérer cette valeur avec le Zquery.ExecSQL nécessaire à l'exécution de la requête SQL d'insertion ? Je me suis longtemps enquiquiné avec ce problème... Je pensais qu'avec un ExecSQL, on ne pouvait "récupérer" autre chose qu'un try..except..end;. Si tel n'est pas le cas, hum....

Cordialement. Gilles

Citation:

---

Envoyé par chris37

Pour récupérer le dernier identifiant d'un Insert , [...] Il faut lire le résultat de la requete Insert.

---

Ce serait certainement plus efficace mais, comme Selzig, je n'ai jamais réussi à récupérer le paramètre en retour d'une telle requête.

Comment fais-tu exactement ?

Hum, je n'ai pas de serveur PostgreSql sous la main et je viens de relire le fil de discussion et effectivement, c'est curieux...

Que dit le code de zeos lors du execsql, Affecte t'il les variables ?

Citation:

---

Envoyé par chris37

je n'ai pas de serveur PostgreSql sous la main

---

Moi non plus, mais à la prochaine occasion j'essaierai à nouveau.