Discussion :

[NABIL74]

Bonsoir,
J'ai une application qui utilise les composants ZEOSDBO-7.1.4-stable + Firebird 2.5.

-Pour supprimer un enregistrement:

Code :

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

1
2
3
4
Table1.Edit;
Table1.Delete;
Table1.ApplyUpdates;
Table1.CommitUpdates;

L'enregistrement supprimé ne reste pas en mémoire, il est supprimé définitivement de la table.

-Pour ajouter un nouvel enregistrement:

Code :

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

1
2
3
4
5
Table1.append;
...
Table1.post;
Table1.ApplyUpdates;
Table1.CommitUpdates;

Mais si j'ajoute un nouvel enregistrement et que je veux supprimer l'enregistrement que je viens d'ajouter, je reçois un message d'erreur:
"Le projet ...exe a déclenché la classe d'exception EZSQLException avec le message '0 record(s) updated only one record should have been updated'

Ce message d'erreur s'affiche seulement quand j'essaye de supprimer l'enregistrement que je viens d'ajouter mais si j'essaye de supprimer un autre enregistrement, ça marche: je ne reçois pas ce message d'erreur.

j'ai essayé de modifier le code de suppression de l'enregistrement:

Code :

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

1
2
Table1.Edit;
Table1.Delete;

mais ce code n'efface pas réellement l'enregistrement de la Table, il l'efface de la mémoire seulement.

Table1 : CachedUpdates est à False
Comment résoudre ce soucis svp?.
Merci pour votre aide.

Nabil

[SergioMaster]

Bonjour,

Pour supprimer un enregistrement, un simple table.delete suffit, surtout pas un Table.Edit avant !
pour explication : table.Edit demande à mettre l'enregistrement en mode édition (mise à jour, une transaction A) donc attend, quelques instructions de modification de colonnes puis un table.Post (pour la fin de la transaction)
or si avant le post, donc en concurrence avec cette transaction A une opération Delete se fait (soit une autre transaction B). Les ApplyUpdates,CommitUpdates suivant tente d'appliquer la transaction A sur un élément non trouvé (puisque supprimé) d'où l'erreur levée.

Table1 : CachedUpdates est à False

je ne vois pas pourquoi alors, il y a des ApplyUpdates,CommitUpdates je pense qu'il y a là une mauvaise compréhension sur l'utilité de ces instructions ou alors du paramétrage de la table ou de la connexion, pour moi ces deux instructions sont en trop !
Zeos fonctionne comme BDE (c'est pour cela que je dis qu'une bonne transaction est une transaction la plus courte possible) un insert/un delete/un post -> un commit c'est la règle de l'autocommit (que l'on peut contourner pour un ensemble de transactions par un Start Transaction ..... Commit Transaction).

[NABIL74]

bonjour ,
Merci Serge pour ton explication.

Voici mon code pour le post:

Code :

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

1
2
3
4
5
6
7
8
9
 
try 
     ZConnection1.StartTransaction;
      Table1.Post;
      ZConnection1.Commit;
    except
      ZConnection1.Rollback;
      raise;
    end;

Pour le delete:

Code :

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

1
2
3
4
5
6
7
8
try    
      ZConnection1.StartTransaction;
      Table1.Delete;
      ZConnection1.Commit;
    except
      ZConnection1.Rollback;
      raise;
    end;

le post ajoute l"enregistrement mais en mémoire seulement(si je fait un close et après un open de la Table, l'enregistrement disparait !!)

La ZConnection1 est en Autocomit.
Quelle est mon erreur ici svp?
merci

[SergioMaster]

Réponse Rapide : mais pourquoi une transaction alors que ZEOS fait ça tout seul ?

[NABIL74]

Merci,
J'ai essayé avec ou sans la transaction, l'enregisterment reste en mémoire, donc le post(le commit) ne marche pas?!

J'ai essayé avec :tiReadCommitted,tiRepeatableRead et tiNone sans succès.

[NABIL74]

voici ZConnection