Discussion :

[Mihalis]

Bonjour, voila je voudrais faire une insertion dans une table mssql j'ai une clé primaire que j'ai défini comme identité avec 1,1 comme début compteur et incrémentaion mais lorsque le veux insérer une valeur dans un autre champ, il me dit que la clé primaire doit avoir une valeur, comment faire pour l'autoincrémenter ??puisque je ne peux pas non plus l'insérer moi meme ??lorsque j'ajoute directement ds sql server l'autoincrémentation fonctionne dois je faire qq chose ds delphi pour lui dire que la clé primaire est gérée par la bdd ??
merci de votre aide

[Mihalis]

est-ce que je n'ai pas été assez clair ou alors personne n'a deja eu le cas ?

[Lucien]

Je ne connais pas MySql,
mais il doit exister l'équivalent d'un trigger qui jouera le rôle d'incrémentation à l'insert

[Mihalis]

Je ne connais pas MySql,
mais il doit exister l'équivalent d'un trigger qui jouera le rôle d'incrémentation à l'insert

bien en fait (c'est sql server) je ne pense pas que ce soit la base de données qui foire mais plutot delphi vs sqlserver pcq qd j'insère a partir de l'interface sqlserver y'a pas de problème il génère automatiquement les clés primaires comme il le doit mais lorsque j'insère une ligne a partir de delphi il me dit qu'il faut obligatoirement une valeur(normal vu que c'est une clé priamaire) mais delphi ne l'entend pas de cette oreille apparemment..

[Lucien]

Indique la commande Delphi que tu utilises, cela pourra peut-être éveiller une idée

[Mihalis]

Indique la commande Delphi que tu utilises, cela pourra peut-être éveiller une idée

Code :

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

1
2
3
table_timesheet.Append;
table_timesheet.fieldbyname('temps').asinteger:=temps;
table_timesheet.post;

[Lucien]

J'ai eu un problème similaire avec Delphi et FB. D connaissant l'existence de cette clé l'exige: il m'a fallu utiliser une procédure stockée qui me renvoie la PK
que j'affectais à ce moment là sans difficulté...

Essaie de vérifier cette idée, à défaut de mieux pour l'instant.

[Mihalis]

le problème c'est que je ne peux pas la mettre moi meme, ou alors je dois gérer toutes mes clés moi memes...

[Lucien]

Serait-il possible alors de faire disparaître la Pk du regard de D, dans la déclaration de la table, sans mettre la panique partout ?

[Mihalis]

non, pas trop, j'utilisais une version antérieure de delphi avant et je n'ai jamais eu ce problème la, il y a peut etre besoin d'une commande pour lui dire que le champ qui ne peut etre null est généré par la table non ?

[Lucien]

J'ai introduit ce code dans un déclencheur FB que j'appelle "BEFORE_INSER_GRD",
et dans D6 j'affecte la valeur null à la clé primaire

Code :

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

1
2
  if (new.grd_id is null) then
  new.grd_id=gen_id(gen_grd_id,1);

A essayer...

[Lucien]

Une autre solution, une commande sql, à partir d'un TsqlQuery en utilisant le générateur de la base FB, pour moi, "Gen_id(gen_adr_id,1)":

Code :

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

1
2
3
4
5
6
 'INSERT INTO T_ADRESSE_ADR (ADR_ID, ADR_DEFAUT,ADR_IND_ID, ADR_LIEU_DIT, ADR_RUE, '
            +' ADR_BP, ADR_CP, ADR_BUREAU, ADR_CEDEX, '
            +' ADR_CONTACT_NOM, ADR_CONTACT_PRENOM )'
            +' VALUES (GEN_ID(GEN_ADR_ID,1), :ADR_DEFAUT, :ADR_IND_ID, :ADR_LIEU_DIT,  :ADR_RUE,  '
            +' :ADR_BP, :ADR_CP,:ADR_BUREAU, :ADR_CEDEX,  '
            +' :ADR_CONTACT_NOM,  :ADR_CONTACT_PRENOM )';

Tout part de D6, à condition d'avoir accès à une fonction d'incrémentation et d'un générateur que tu auras créé dans ta table.

[Mihalis]

je vais essayer par des commandes sql avant, ca passera peut etre mieux meme si c'est un peu plus lourd a gérer

[Lucien]

Je l'ai pensé au début et finalement, j'en suis satisfait, d'autant qu'il est possible de remplacer toute la commande par une constante apte à rendre le code plus lisible! Pour l'exemple ci-dessus, j'ai déclaré la constante

Code :

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

 Insertion_adr='...'

puis dans la procedure d'envoi

Code :

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

sql.add(Insertion_adr)

Bon courage !

[Mihalis]

merci encore pr ton soutien, mais il existerait un moyen de faire prendre en compte un autoincrémenté de sql server, je vais recréer un autre poste avec un titre plus explicite

[Lucien]

Si tu trouvais quelque chose d'autre, je suis preneur, quitte à l'adapter si possible...
Merci

[Rayek]

Pourrais tu nous indiquer la structure de la table ?

[Mihalis]

Pourrais tu nous indiquer la structure de la table ?

j'ai uen clé primaire (int auto inc) puis j'ai différentes clés externes mais elles, peuvent etre null

[Rayek]

Et si tu fait une requete insert directement dans sql serveur ?

genre :

Code :

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

1
2
3
 
insert into [LA TABLE] (temps)
values('test')

Si cela te sort l'erreur c'est que tu as un champs obligatoire en plus à indiquer

[Zatoobux]

Delphi via le BDE ne reconnait pas les auto-increment de SQL-SERVER.

Si vous avez créé la table à la conception il faut ouvrir l'inspecteur de champs pour cette table et remplacer le champ (qui est indiqué comme entier) par un champ autoincrement.

a+