Pues no hace Rollback correctamente.
Tengo el siguiente código:
Código:
if not DMConexionDB.ZConnection.InTransaction then
DMConexionDB.ZConnection.StartTransaction;
try
Post;
if TZQuery(Dataset).UpdatesPending then
TZQuery(Dataset).ApplyUpdates;
ProcedimientoConError; // Este procedimiento da un error forzado
DMConexionDB.ZConnection.Commit;
Result := True;
except
DMConexionDB.ZConnection.Rollback;
Result := False;
raise;
end; // Try/Except
Los cambios que se fijan en TZQuery(Dataset).ApplyUpdates, no se deshacen con el Rollback.
¿Que puede estar pasando?.