How to compare two records of the same table

[Blog bot]

Источник: http://alexvoy.blogspot.com/2013/09/...ame-table.html
==============

Amongst other mundane chores, from time to time AX consultants and programmers need to check if two table records are indentical and what the difference is if they are not.

Here is a small project for AX 2012 with tmxTableBufferOperation class that provides the following static methods:

• getOneRecordFieldList(Common _record1)
• getTwoRecordsFieldList(Common _record1, Common _record2)
• areIdentical(Common _record1, Common _record2)
• getDifference(Common _record1, Common _record2)

Their names are mnemonical so you won't misunderstand what they do.

There is also a batch demonstrating how to use them:

The main idea is to use reflection DictTable class to enumerate all the fields of the given table buffer and then populate containers with its field ids, names and values.

 static public List getTwoRecordsFieldList(Common _record1, Common _record2)
{
    Common              buffer1;
    Common              buffer2;

    List                list        = new List(Types::Container);   //list of all the fields, field names and values
    List                bufferList  = new List(Types::Container);   //final list of all the fields, field names and values of these two records
    ListEnumerator      le;

    int                 i;
    fieldId             fieldId;
    DictTable           dictTable;
    DictField           dictField;

    container           c;

    if(_record1.TableId != _record2.TableId)
    {
        error(strFmt('Both records are supposed to be of the same table type!'));
    }

    dictTable = new DictTable(_record1.TableId);

    if (dictTable)
    {
        // create the list of all the fields in the table
        for (i = dictTable.fieldCnt(); i; i--)
        {
            fieldId = dictTable.fieldCnt2Id(i);
            dictField = new DictField(dictTable.id(), fieldId);
            list.addEnd([fieldId, fieldId2name(dictTable.id(), fieldId)]);
        }

        buffer1 = dictTable.makeRecord();
        buffer2 = dictTable.makeRecord();

        select buffer1 where buffer1.RecId == _record1.recId;
        select buffer2 where buffer2.RecId == _record2.recId;

        le = list.getEnumerator();
        while (le.moveNext())
        {
            c = le.current();
            bufferList.addEnd([[conPeek(c,1), conPeek(c,2), buffer1.(conPeek(c,1))],
                               [conPeek(c,1), conPeek(c,2), buffer2.(conPeek(c,1))]]);
        }
    }
    return bufferList;
}

Источник: http://alexvoy.blogspot.com/2013/09/...ame-table.html

[gl00mie]

Цитата:

Сообщение от Blog bot

Here is a small project for AX 2012

if(_record1.TableId != _record2.TableId)
{
    error(strFmt('Both records are supposed to be of the same table type!'));
}

В 2012-й с учетом наследования таблиц такого сравнения уже недостаточно, потому что на вход могут подать два буфера родительской таблицы, которые содержат записи из разных производных таблиц, и тогда простое сравнение по полям будет некорректно.

Цитата:

Сообщение от Blog bot

// create the list of all the fields in the table
for (i = dictTable.fieldCnt(); i; i--)
{
    fieldId = dictTable.fieldCnt2Id(i);
    dictField = new DictField(dictTable.id(), fieldId);
    list.addEnd([fieldId, fieldId2name(dictTable.id(), fieldId)]);
}

А вот ни разу это не даст полный список полей в случае с таблицей в иерархии наследования. Нужно еще проверить, есть ли у нее родительская таблица, и при необходимости дополнить список ее полями, и так - до корневой таблицы в иерархии. См., например, \Classes\SysDictField\findFieldById. Еще непонятно, почему было не воспользоваться dictField.name().

[wojzeh]

Дельные замечания!

Про наследование таблиц, думаю, верно. Я взял кусок стандартного кода, уж не помню, из какого класса и убрал для простоты ту часть, которая бежит по "вложенным полям".

функцию нейм() не использовал, потому что балбес.