Best way to integrate a X-Data list into Aurelius

BIZ TMS XData
1

Hello


What is the best way to integrate a X-Data list into Aurelius ?
I'm doing this :

var
  Assure: TAssures;
  Client: TXDataClient;
  Assures: TList<TAssures>;
begin
  Client := TXDataClient.Create;
  try
  Assure := TAssures.Create;
  try
    Assures := Client.List<TAssures>;
    for Assure in Assures do
      Manager.SaveOrUpdate(Assure);

  except
    if not Manager.IsAttached(Assure) then
      Assure.Free;
    raise;
  end;
  finally
     Client.Free;
     Assures.Free;
  end;
end;