Discussion :

[souminet]

Bonjour;
JE voudrais au niveau de ma procédure d'ajout de nouvel enregistrement éviter le fameux: "Violation de clé" quand l'utilisateur procède à la saisie d'un N d'Appel d'offre déja existant!!
J'utilise ce qui suit:
Un TDBEdit pour la saisie du numero d'appel d'offres
Et les 2 méthode:

Code :

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

1
2
DAtaModule3.TabApp.Append;
DAtaModule3.TabApp.Post;

Pour ce qui est du cas d'une validation sans avoir préalablement saisi de num d'appel d'offres, j'ai procéder au traitement adéquat :
if DBAppel.text<> '' then ...

Merci de vos réponses...

[Kaféine]

tu peux catcher l'exception

Code :

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

1
2
3
4
5
6
7
8
9
10
 
 
try
 Post
except
 on E: Exception do
 begin
   ...
 end;
end;

[souminet]

La gestion de cette exception est t-elle la meilleure manière de régler le problème?? puis je utiliser une autre manière de contourner le problème???
D'autre part , au niveau de ce qui a été proposé:

Code :

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

1
2
3
4
5
6
7
8
try
 Post
except
 on E: Exception do
 begin
   ...
 end;
end;

Le E: exception doit être certainement personnalisé en fonction de mon exception, non???
Bref, une autre solution serait la bien venue

MERCI

[Cl@udius]

Salut

Tu peux également utiliser l'évènement OnPostError de TDataSet.

[souminet]

Avec cet évenemnt, c'est à dire le OnPost Error, puis intercepter l'erreur avant la tentative d'insertion??

[Nono40]

Non car c'est l'insertion qui provoque l'erreur.

[Kaféine]

Le E: exception doit être certainement personnalisé en fonction de mon exception, non???

je sais pas ce que tu attaque comme base.
avec ADO par exemple, je crois que la violation de contrainte de clé correspond a un code erreur.

La gestion de cette exception est t-elle la meilleure manière de régler le problème??

le mieux c'est un id généré de facon automatique.

[Franck SORIANO]

La gestion de cette exception est t-elle la meilleure manière de régler le problème?? puis je utiliser une autre manière de contourner le problème???

Je dirais qu'il y a deux approches possibles du problème (l'une n'interdisant pas l'autre l'ailleurs) :
- Soit tu fais des contrôles en amont pour t'assurer que l'opération ne va pas provoquer une erreur. Donc avant une insertion, tu t'assures que la clé saisie ne correspond pas déjà à une clé existante.
- Soit tu traites l'erreur au moment du Post. Dans ce cas, je crois que toutes les solutions ont déjà été données.

Personnellement j'aurais tendance à dire qu'il faut faire les deux.
- Eviter de provoquer des erreures inutiles en signalant les anomalies au plux tôt (si le numéro de l'appel d'offre existe déjà, c'est peut-être que l'appel d'offre a déjà été saisi par quelqu'un d'autre. Dans ce cas, il vaut mieux prévenir l'utilisateur avant qu'il n'ait saisie la totalité de l'appel).
- Traiter l'erreur au moment de la validation parce que de toute façon quel que soient les contrôles en amonts, il y aura toujours des cas qui passeront à travers.

Je connais aussi d'autres développeurs qui résolvent le problème en supprimant les contraintes de la base. Comme ça plus d'erreur lors des accès BDD. Mais bon, on ne peut pas vraiment appeler ça une solution.

[souminet]

Je dirais qu'il y a deux approches possibles du problème (l'une n'interdisant pas l'autre l'ailleurs) :
- Soit tu fais des contrôles en amont pour t'assurer que l'opération ne va pas provoquer une erreur. Donc avant une insertion, tu t'assures que la clé saisie ne correspond pas déjà à une clé existante.

Donc , a travers quel composant ou encore quel type de méthode puis je implémenter cette solution??? en fonction bien sur de ce que j'ai déja utilisé au niveau de mon application.. A savoir un DBEdit relié à un DataSet... (TAble Paradox)

Merci beaucoup

[souminet]

Bonjour;
Voilà, je me suis documenté, et j'ai trouvé qu'une solution :

Code :

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

1
2
3
4
5
6
7
8
9
10
key:= inputbox('Nouveau','ajouter une nouvelle visite','');
if length(key)>0 then
if not table1.Locate('n_visite',key,[]) then
begin
table1.Append;
table1.FieldByName('n_visite').AsString:=key
end
else
if MessageDlg(('une visite ayant ce numéro existe déja'),mtWarning, mbOKCancel,0)=mryes then
table1.cancel

Mais je voudrais l'adapter à mon interface, c'est à dire le composant que j'utilise pour la saisie du N° d'Appel d'offres (Un DBEDIT)
Merci++++++