Discussion :

[BraDim]

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 :

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

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 :

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

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

[elsuket]

Bonjour,

C'est normal puisque vous utilisez :

Code :

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

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

@++

[BraDim]

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

Code :

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

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 :

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

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

Ou :

Code :

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

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...

[elsuket]

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 :

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

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().

@++