Discussion :

[JP.NUAGE]

Bonjour à tous

Me revoilà avec mon pb d'enregistrement introuvable. C'est un peu fort de café.

Dans mon appli, j'ai trois unités totalement distinctes (aucune n'appelle l'un des autres). Dans chacune j'appelle une table. Cette table est déclarée (SQLConnection, DataSetConnection, etc) dans une Datacom.

Dans chaque unité j'ai le code suivant

Code :

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

1
2
3
4
5
6
7
8
If MaBse.Locate('CODE',xCode,[]) then
     begin
         MaBase.Edit;
         MaBase.FieldValues['CHAMP1'] := 1234;
         MaBase.FieldValues['CHAMP2'] := 'cccc';
         MaBase.Post;
         MaBase.ApplyUpdates(0);
     end;

Dans les trois unités, je suis sur le bon enregistrement (bien sûr, j'ai vérifié.)

Dans 2 unités cela fonctionne (depuis 3 ans !) sans le moindre soucis et dans le troisième que je viens de rajouter, j'ai le message

Enregistrement non trouvé. Aucune clé spécifiée

Et là je ne pige pas, mais pas du tout.

Bien sûr je vais faire une 'pirouette' par une requête mais pourquoi ai-je ce message ?

[Rayek]

est ce normal dans le if, car tu as mis comme nom de table MaBse et pas MaBase

[ShaiLeTroll]

Essaye de voir si dans les trois unités, MaBase te renvoi le même contenu pour IndexDefs ?

Si tu utilise un TSQLTable, vérifie si IndexName, IndexFields, ... n'ont pas été modifié par l'IDE (c'est toujours un piège les propriétés publiées ...)

Sinon, un TSQLQuery

Code :

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

1
2
3
4
UPDATE TableName
SET CHAMP1 = :paramChamp1
SET CHAMP2 = :paramChamp2
WHERE CODE = :paramCode

Surtout que TSQLTable finira surement par généré un SQL, ... en plus c'est plus facilement maintenable et traçable ...