Методика разработки СКД-отчетов по сверке между базами с COM-запросом в другую базу

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

К примеру, необходимо найти «проблемный» регистратор при переносе движений по складу по документам в УТ 10.2 в ERP2.1.

В результате, проблема должна быстро находиться в массиве данных:

Теперь собственно методика разработки отчета:

1. В СКД добавляем набор данных – объект. Собственно объектом является таблица значений, в которую выгружаем результат запроса (см. рисунок ниже) в процессе выполнения процедуры ПриКомпоновкеРезультата(…).
2. Формируем запрос к данным другой базы. В моем случае я использовал COM-соединение, т.к. базы лежали в одной сети и ограничений в доступе к данным у меня не было. Особенности регистрации такого отчета по технологии «внешнего» для работы в безопасном режиме — написал отдельно (//infostart.ru/public/552950/)
3. Показатели одной базы формируем со знаком «плюс», движения второй базы с «минусом». Если движения по всем измерениям (кроме измерения «база») совпадают – тогда в отчете отображается результат – 0. Если присутствует разница, то будет некое число, которое необходимо быстро и удобно найти.
4. Поскольку была возможность сопоставить регистраторы в обеих база по ГУИД – сопоставляем программно, после чего таблица значений передается в СКД во внешние данные
5. Настраиваем группировки отчета, чтобы быстро найти проблему – в данном случае, по виду регистратора, а затем по регистратору (см рисунок)

Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка)
СтандартнаяОбработка = Ложь;

Настройки = КомпоновщикНастроек.ПолучитьНастройки();
ПараметрПериод = Новый ПараметрКомпоновкиДанных("Период");

СтруктураПараметров = Новый Соответствие;

Для каждого ЭлементКоллекции Из Настройки.ПараметрыДанных.Элементы Цикл
Если ЭлементКоллекции.Параметр = ПараметрПериод Тогда
СтруктураПараметров.Вставить("ДатаНачала", ЭлементКоллекции.Значение.ДатаНачала);
СтруктураПараметров.Вставить("ДатаОкончания", ЭлементКоллекции.Значение.ДатаОкончания);
КонецЕсли;
КонецЦикла;

ТаблицаВнешниеДанные = ПолучитьТаблицу(СтруктураПараметров.Получить("ДатаНачала"), СтруктураПараметров.Получить("ДатаОкончания"));

ВнешниеНаборыДанных = Новый Структура("ТаблицаВнешниеДанные", ТаблицаВнешниеДанные);

КомпоновщикМакета = Новый КомпоновщикМакетаКомпоновкиДанных;
МакетКомпоновки = КомпоновщикМакета.Выполнить(СхемаКомпоновкиДанных, Настройки, ДанныеРасшифровки);

ПроцессорКомпоновкиДанных = Новый ПроцессорКомпоновкиДанных;
ПроцессорКомпоновкиДанных.Инициализировать(МакетКомпоновки, ВнешниеНаборыДанных, ДанныеРасшифровки);

ПроцессорВывода = Новый ПроцессорВыводаРезультатаКомпоновкиДанныхВТабличныйДокумент;
ПроцессорВывода.УстановитьДокумент(ДокументРезультат);
ПроцессорВывода.Вывести(ПроцессорКомпоновкиДанных,);

КонецПроцедуры

Если данные идентичны – можно развернуть и посмотреть детальные записи.

Если различаются – открываем раздел, затем регистратор

А можем и провалиться непосредственно в форму документа

Вот собственно и все, чем хотел поделиться, если что-то нашли полезным плюсуйте ). Программистам добавляю собственно отчет, для копирования или редактирования, может будет кому полезен (он не универсальный!)