Problema para excluir os registros em uma tabela

Tenho um sistema que funciona da seguinte forma, tem uma tabela de pendentes e uma de atendidos, os dados da tabela de pendentes só saem da tabela para irem para a tabela atendidos, quando clicado no botão gravar, que tem o codigo abaixo:

If (DMBaseDados.TblPendentesRamal.Value =
DMBaseDados.TblAtendidosRamal_Ret.Value) and
(DMBaseDados.TblPendentesUsuario.Value = DMBaseDados.TblAtendidosUsuario_Ret.Value) then
begin
DMBaseDados.TblAtendidos.Insert;
DMBaseDados.TblPendentes.Delete;
end;

Obs.: O problema que estou tendo é que quando ele inclui o registro na tabela atendidos e exclui da tabela pendentes é apresentada uma mensagem de erro informando que ´ O valor de chave desta linha foi alterado ou excluido do banco de dados. A linha local está agora excluída.

Estou utilizando banco de dados Access e os componentes ADO, Table e DataSource.


Grato,



Ethewaldo