Bucle infinito al intentar abrir un tableset

[Shikanda]

Hola a todos!

Tengo un pequeño problema que no termino de comprender, y esperaba que me pudieseis echar un cable. Tengo dos DBEdit, uno muestra el código de empleado y el otro el nombre, pero cada DBEdit recoge los datos de un tableset diferente. El código del empleado se recoge de un tableset que se llama UsuariosSistema y el nombre de un tableset Empleados que tiene como DataSource el tableset UsuariosSistema. Basicamente he hecho un copy&paste de otros casos iguales que hay dentro del mismo programa pero en este caso, cuando voy a ejecutar, se crea un bucle infinito entre dos lineas

Código Delphi [-]
procedure TDMUsuarios_Sistema.DSQUsuarios_SistemaDataChange(
  Sender: TObject; Field: TField);
begin
        XEmpleados.Close;
        XEmpleados.Open;
end;

hasta que termina por dar un Access Violation de tipo Write of Address.

No sé porqué me pasa esto. Todavía estoy aprendiendo mucho sobre Delphi y Firebird y seguro que es algo absurdo. Agradeceré toda la ayuda recibida