Ver Mensaje Individual
  #1  
Antiguo 07-09-2006
Avatar de @-Soft
@-Soft @-Soft is offline
Miembro
 
Registrado: may 2003
Ubicación: Santo Domingo, Rep. Dom.
Posts: 200
Reputación: 22
@-Soft Va por buen camino
Exclamation problemas al actualizar por segunda vez

hol@

este tema ya lo habia expuesto en otra ocasion pero no recibi respuesto, he optado por iniciar el mismo tema nuevamente en otro hilo, pido disculpas.

estoy en fase de culminacion de un sistema de control de academias educativas pequeñas, estoy trabajando con delphi 7, BDE, Paradox por la razon de que son academias pequeñas, para no entrar en detalle con el tema de las SGBD y DB Desktop, etc.

en los mantenimientos utilizo una barra de botoneria que esta compuesto por (Insertar, Modificar, Grabar, Cancelar, Eliminar, Buscar), debido esto a que trabajo con componentes DataAdware.

estoy utilizando componentes tQuery en vez de usar tTable por conveniencia, debido a que yo utilizo un campo logico para marcar registros como borrados y al yo traer los registros con el tQuery pues condicionarlos, es decir, puedo hacer un (Select * From MiTabla Where reg_eliminado = 0) donde 0 quiere decir que no ha sido eliminado.

con un TQuery yo puede efectuar las mismas operacion que con un TTable, es decir, un Insert o Append, un Edit, un Post.

despues de mucho bla bla, es en esta parte donde recide el problema, cuando yo modifico un registro por primera vez me graba los cambios sin dar error, pero cuand modifico ese mismo registro al otra vez, en el instante me da un error que dice : Couldn't perform the edit because another user change the record. no se porque se produce este error, solo pude determinar que se genera realizar un ApplyUpdate por segunda vez, esta es la sentencia para que confirme:

Código Delphi [-]
if dsMiQuery.State in [dsInsert, dsEdit] then
begin
     try
         qMiQuery.Post;
         qMiQuery.ApplyUpdate;
     Except
      ....
end;

un saludo
__________________
Ivan Lora

http://www.arrobasoft.da.ru

Valientes son aquellas personas que triunfan donde otros fracasan.
Bienaventurado los que nada esperan porque jamas seran defraudados.
Responder Con Cita