clé auto incrémentée

Bonjour,

Je développe sous Delphi 7 avec les composants dbExpress pour accèder à une base de données SQL Server.
J'ai créé une table où j'ai paramétré avec le SQL Server Management la clé primaire en tant que Compteur et Identité avec comme paramètre :
début compteur = 1
Incrément Compteur = 1

Je pensais que cette manipulation servait à ce que ce champ soit en clé auto incrémentée. Mais lorsque je fais le bout de code suivant :

Code:

---

1 2 3 4 5 6 7

SQLDataSetRequete_.CommandText:='SET IDENTITY_INSERT MATABLE ON'; SQLDataSetRequete_.ExecSQL(true); clientDataSetMATABLE.AppendRecord([10 000,champ2]); clientDataSetMATABLE.ApplyUpdates(-1); SQLDataSetRequete_.CommandText:='SET IDENTITY_INSERT MATABLE OFF'; SQLDataSetRequete_.ExecSQL(true);

---

le nouvel enregistrement a 10 000 comme valeur de clé primaire. Je pensais que lors de l'envoi de cette valeur, elle était ensuite recalculée par SQL SERVER et réaffectée à la valeur max de la clé primaire +1, par exemple 296 si la dernière valeur était 295.

Mon souci est que j'avais créé une fonction qui, au lieu de mettre 10 000, récupérait la valeur Max de cette clé par requête, comme ci dessous. J'ai une quizaine de logiciels qui lancent ce code en même temps et je n'ai pas de retours comme quoi il y aurait des erreurs sauf que tous les enregistrements ne sont pas créés et je me demande si cette manière de gérer les clés ne pouvait pas provoquer des conflits de clés...

Code:

---

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

SQLDataSetRequete_.CommandText:='SET IDENTITY_INSERT MATABLE ON'; SQLDataSetRequete_.ExecSQL(true); clientDataSetMATABLE.AppendRecord([ObtenirDernierID(MATABLE),champ2]); clientDataSetMATABLE.ApplyUpdates(-1); SQLDataSetRequete_.CommandText:='SET IDENTITY_INSERT MATABLE OFF'; SQLDataSetRequete_.ExecSQL(true);     function ObtenirDernierID(table: string): LongWord; begin SQLDataSetObtenirID.Close; ClientDataSetObtenirID.Close; SQLDataSetObtenirID.CommandType := ctQuery; SQLDataSetObtenirID.CommandText := 'SELECT MAX(ID'+Table+') MaValeur FROM '+Table; ClientDataSetObtenirID.Open; ObtenirDernierID:=ClientDataSetObtenirID.Fieldbyname('MaValeur').AsInteger; end;

---

Quelqu'un peut il me dire déjà si mon code est correct ou si je gère mal les clé auto incrémentées et ensuite s'il y a une aute méthode pour les gérer?

Merci d'avance

Bonjour,

C'est normal puisque vous utilisez :

Code:

---

SET IDENTITY_INSERT MATABLE ON

---

qui permet de spécifier la valeur de la colonne d'identité.
Par défaut celui-ci est à OFF, donc ne le spécifiez pas ;)

@++ ;)

Ma réponse va sans doute vous paraître idiote mais si je ne mets pas :

Code:

---

1 2	SET IDENTITY_INSERT MATABLE ON

---

et que je ne mets rien dans le premier champ, celui de la clé comme ci dessous :

Code:

---

1 2 3

clientDataSetMATABLE.AppendRecord([nil,champ2]); clientDataSetMATABLE.ApplyUpdates(-1);

---

Ou :

Code:

---

1 2 3

clientDataSetMATABLE.AppendRecord([Null,champ2]); clientDataSetMATABLE.ApplyUpdates(-1);

---

j'ai un message d'erreur :

Field Value Required.

ce serait donc mon appendrecord que je ne fais pas bien ou alors je dois utiliser autre chose? Ce code fonctionnait très bien sur Interbase et sous MySQL mais c'est depuis que j'ai migré sous SQL Server...

Lorsque vous spécifiez SET IDENTITY_INSERT MATABLE ON, vous pouvez insérer la valeur que vous souhaitez dans la colonne qui a la propriété de compteur.

Donc si vous voulez faire un INSERT en laissant à SQL Server le soin de calculer la valeur de ce compteur pour une nouvelle insertion, insérez directement les valeurs des autres colonnes.

Code:

---

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

CREATE TABLE TEST ( ID INT NOT NULL IDENTITY CONSTRAINT PK_TEST PRIMARY KEY, nomTest VARCHAR(50) NOT NULL, dateTest DATETIME NOT NULL ) GO   INSERT INTO dbo.TEST (nomTest, dateTest) VALUES ('NouveauTest', '17/03/2009 00:00:00.000')   -- On peut aussi écrire : INSERT INTO dbo.TEST VALUES ('NouveauTest', '17/03/2009 00:00:00.000')

---

Pour récupérer la valeur du compteur pour la ligne que vous venez d"insérer, utilisez la fonction SCOPE_IDENTITY().

@++ ;)