Error al restar registros Entre Tablas

[Lenny]

Buenas y gracias de antemano, nuevamente, necesito de su ayuda.

Tengo este codigo que me genera un error:

Código Delphi [-]
BDatos.PRODUCTOSTAB.Edit;
BDatos.PRODUCTOSTAB.FieldbyName('STOCK').AsString:=
floatToStr (StrToFloat (BDatos.PRODUCTOSTAB.FieldbyName('STOCK').AsString) -
StrToFloat (BDatos.PRODUCTOSFTAB.FieldbyName('STOCK').AsString));
BDatos.PRODUCTOSTAB.Post;

El error es este:

First chance exception at $75A69617. Exception class EZSQLException with message '2 record(s) updated. Only one record should have been updated.'. Process DISEMAQ.exe (660)

Si saco el POST del codigo funciona impecable, a que se deve este error??? estare muy agradesido ante cualquier aydua, de antemano muchas gracias.

PD. Utilizo Delphi 2010, MySQL, Zeos...