Вопрос

Допустим, у меня есть 2 набора данных: A и B, которые имеют одинаковые столбцы. Я хочу получить «Путь расстояния» - необходимо выполнить минимальные операции, чтобы изменить наборы данных на B.

Я могу предположить, что A и B содержат только в нескольких различиях, и я ищу что -то лучшее, тогда:

  • Удалить все элементы А
  • вставить все элементы B в

Как это можно архивировать?

Это было полезно?

Решение

Если вы хотите узнать, как преобразовать A в B, вам нужно знать, в чем разница между A и B. Для этого есть очень простой общий алгоритм, хотя он может быть более сложным в зависимости от того, сколько полей находится в вашем наборе данных и сколько из них может отличаться от A до B. Но вот общая идея:

  • Сортировать оба набора данных. Обязательно сортируйте по тем же критериям. (На этом этапе, если бы они оба содержали один и тот же набор элементов данных, два списка их содержимого были бы идентичны, если рассматриваться рядом.)
  • Начните с первого элемента обоих наборов данных. Сравните два элемента с сравнением, которое может вернуть less than, equal или же greater than.
    • Если A <B, обратите внимание на разницу и перейдите к следующему ряду А.
    • Если a> b, обратите внимание на разницу и перейдите к следующему ряду B.
    • Если a = b, выдвините оба набора данных в следующую строку.
  • Повторите шаг сравнения и применения, пока не достигнете EOF на обоих наборах данных.

Как только вы закончите, у вас будет полный список различий между A и B, что сделает шаги, необходимые для преобразования A в B, простым для расчета.

Другие советы

Если вы знаете, как использовать SQL:

SELECT a.* FROM a 
LEFT JOIN b on (a.field1 = b.field1 AND a.field2 = b.field2 AND ....)
WHERE b.field1 IS NULL

Даст вам все поля в A, которых нет в B.

Теперь делай

INSERT INTO b
  SELECT a.* FROM a 
  LEFT JOIN b on (a.field1 = b.field1 AND a.field2 = b.field2 AND ....)
  WHERE b.field1 IS NULL

А затем делай (или не делай в зависимости от ваших потребностей).

DELETE b FROM b
LEFT JOIN a ON (a.field1 = b.field1 and a.field2 = b.field2 AND ...)
a.field1 IS NULL

Теперь таблица a а также b будет таким же.

Подобный код Delphi должен сделать трюк, но точный код зависит от вашей базы данных и используемых компонентов запроса.

procedure TForm1.equalize(A, B: TDataset);
var
  tablenameA: string;
  tablenameB: string;
  MyQuery: TQuery;
begin
  tablenameA:= IProviderSupport(A).PSGetTableName;
  tablenameB:= IProviderSupport(B).PSGetTableName;
  MyQuery:= TQuery.Create(self);
  MyQuery.Database:= .....
  MyQuery.SQL.Text:= ' INSERT INTO '+tablenameA+' .....
  MyQuery.ExecSQL;
end;
Лицензировано под: CC-BY-SA с атрибуция
Не связан с StackOverflow
scroll top