Множественный выбор из справочника и замена существующего в тч

&НаКлиенте
Процедура Подбор(Команда)
	
			ПараметрыФормы = Новый Структура;
			ПараметрыФормы.Вставить("РежимВыбора", Истина);
			ПараметрыФормы.Вставить("ЗакрыватьПриВыборе", Ложь);
			ПараметрыФормы.Вставить("МножественныйВыбор", Истина);

			СтруктураОтбор = Новый Структура;
			СтруктураОтбор.Вставить("Проведен", Истина);
			СтруктураОтбор.Вставить("Организация", ВладелецФормы.Объект.Организация);
			Если ЕстьРеквизитКонтрагент И ЗначениеЗаполнено(ВладелецФормы.Объект.Контрагент) Тогда				
				СтруктураОтбор.Вставить("Партнер", ОтборПартнер);
			КонецЕсли;
			ПараметрыФормы.Вставить("Отбор", СтруктураОтбор);
						
			ОписаниеОповещенияФормы = Новый ОписаниеОповещения("ПодборЗавершение", ЭтотОбъект);

			ОткрытьФорму(ТипДокументовОснования + ".ФормаВыбора", ПараметрыФормы, Элементы.ВыбранныеДокументы,,,,ОписаниеОповещенияФормы, РежимОткрытияОкнаФормы.БлокироватьОкноВладельца);
			
	
КонецПроцедуры

&НаКлиенте
Процедура ПодборЗавершение(МассивДокументов, ДопПараметры) Экспорт
	
	Если Не ВыбранныеДокументы.Количество() = 0 Тогда
		ОписаниеОповещенияФормы = Новый ОписаниеОповещения("ПроверитьДублиЗавершение", ЭтотОбъект);
		ПоказатьВопрос(ОписаниеОповещенияФормы, "Проверить дубли выбранных документов?", РежимДиалогаВопрос.ДаНет);
	КонецЕсли;
		
КонецПроцедуры

&НаКлиенте
Процедура ПроверитьДублиЗавершение(Ответ, ДополнительныеПараметры) Экспорт
		
	Если Ответ = КодВозвратаДиалога.Да Тогда
		ПроверитьДублиНаСервере();	
	КонецЕсли;
		
КонецПроцедуры

&НаСервере
Процедура ПроверитьДублиНаСервере() 
	
	КоличествоДо = ВыбранныеДокументы.Количество();
	МассивВыбранныеДокументы = ВыбранныеДокументы.ВыгрузитьЗначения();
	МассивВыбранныеДокументы = ОбщегоНазначенияКлиентСервер.СвернутьМассив(МассивВыбранныеДокументы);
	ВыбранныеДокументы.ЗагрузитьЗначения(МассивВыбранныеДокументы);
	
	Если Не КоличествоДо = ВыбранныеДокументы.Количество() Тогда
		Сообщить("Удалено дублей: " + Строка(КоличествоДо - ВыбранныеДокументы.Количество()));
	Иначе
		Сообщить("Дублей не обнаружено");
	КонецЕсли;
	
КонецПроцедуры