// Объединить 2 таблицы значения // тзОсновная - таблица к которой будут изменяться данные // тзПрисоединяемая - таблица из которой будут браться данные // стОтборОдинаковых - стурктура со списком полей по которым определяеться одинаковость записи // ДобавлятьНеНайденное - ИСТИНА => не сущесвующие записи в тзОсновная будут браться из тзПрисоединяемая Процедура ОбъединитьТаблицыЗначений(тзОсновная,тзПрисоединяемая, стОтборОдинаковых, ДобавлятьНеНайденное = Ложь) Экспорт Для каждого текПрисоединяемаяЗапись из тзПрисоединяемая цикл ЗаполнитьЗначенияСвойств(стОтборОдинаковых,текПрисоединяемаяЗапись); НайденыеСтроки = тзОсновная.НайтиСтроки(стОтборОдинаковых); Если НайденыеСтроки.Количество() > 0 тогда Для каждого текНайденная из НайденыеСтроки цикл ЗаполнитьЗначенияСвойств(текНайденная,текПрисоединяемаяЗапись); КонецЦикла; ИначеЕсли ДобавлятьНеНайденное тогда НовСтрокаОсновном = тзОсновная.Добавить(); ЗаполнитьЗначенияСвойств(НовСтрокаОсновном,текПрисоединяемаяЗапись); КонецЕсли; КонецЦикла; КонецПроцедуры
