Процедура ЗаполнитьМассивУникальнымиЗначениями(МассивПриемник, МассивИсточник) Экспорт

	Для Каждого Элемент Из МассивИсточник Цикл
		Если МассивПриемник.Найти(Элемент) = Неопределено Тогда
			МассивПриемник.Добавить(Элемент);
		КонецЕсли;
	КонецЦикла;

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