Ver Mensaje Individual
  #6  
Antiguo 19-06-2004
Avatar de jachguate
jachguate jachguate is offline
Miembro
 
Registrado: may 2003
Ubicación: Guatemala
Posts: 6.254
Reputación: 28
jachguate Va por buen camino
Para que el proceso siga normal podrias hacer algo como:

Código Delphi [-]
IniciarTransaccion;
while not eof Table1 do
Begin
  try
    InsertarRegistroActual;
  except
    on RegistroDuplicado do
    Begin
      Table2.cancel;  // para cancelar la inserción iniciada y dejarle en status dsBrowse
      ShowMessage('Registro duplicado!');
    End;
  end;
  Table1.Next;
end;
commit;

Sin hacer abort, ni rollback... de esa manera "matas" la excepción y continua normalmente el ciclo.

Hasta luego.

__________________
Juan Antonio Castillo Hernández (jachguate)
Guía de Estilo | Etiqueta CODE | Búsca antes de preguntar | blog de jachguate
Responder Con Cita