Как правильно сделать проверку на дубли

Процедура ОсновныеДействияФормыСоздатьСчетаНаОплату(Кнопка)
	
	МассивОтобранныхДокументов = ПолучитьВыбранныеДокументы(); //Отобранные пользователем докумнеты на форме обработки

УжеСозданныеСчета = МассивСчетов();  //Это массив всех существующих счетов
МассивСозданныхДокументов = Новый Массив; 

Для Каждого ЭлементМассива Из МассивОтобранныхДокументов Цикл

                ДокументКопия = ЭлементМассива.Скопировать();
		ДокументКопия.Дата = НоваяДатаДок;
		ДокументКопия.Комментарий = НовыйКомментарий;

Для Каждого Счет ИЗ УжеСозданныеСчета Цикл
			
			Если ДокументКопия.Контрагент = Счет.Контрагент И 
				ДокументКопия.СуммаДокумента = Счет.СуммаДокумента И
				ДокументКопия.Комментарий = Счет.Комментарий Тогда
				
				Сообщить("Документ на основании счета № " + ЭлементМассива.Номер + " " + ЭлементМассива.Дата + " был создан ранее.");
				Сообщить("Документ не создан");
				
				ДокументКопия.Удалить();
				
			ИначеЕсли (ДокументКопия.Контрагент <> Счет.Контрагент И    //Мне не понятно почему, но когда падает в эту ветку, то первую ссылку на документ прогоняет два раза, затем идет на следующий и там по уже все нормально.
				ДокументКопия.СуммаДокумента = Счет.СуммаДокумента И
				ДокументКопия.Комментарий = Счет.Комментарий) ИЛИ
				(ДокументКопия.Контрагент = Счет.Контрагент И 
				ДокументКопия.СуммаДокумента <> Счет.СуммаДокумента И
				ДокументКопия.Комментарий = Счет.Комментарий) ИЛИ
				(ДокументКопия.Контрагент = Счет.Контрагент И 
				ДокументКопия.СуммаДокумента = Счет.СуммаДокумента И
				ДокументКопия.Комментарий <> Счет.Комментарий) Тогда
				
				
				ДокументКопия.Записать();
				
			КонецЕсли;
		КонецЦикла;
		
		МассивСозданныхДокументов.Добавить(ДокументКопия.Ссылка); //В этот массив попадают документы новые, не дубли.
		
	КонецЦикла;


//Далее запускается функция сохранения счетов, по ссылке формируется счет и сохраняется в форматы excel и pdf. Но есть одно но: если обработка отслеживает дубли,то выдается ошибка. {ВнешняяОбработка.Счета.Форма.Форма.Форма(761)}: Преобразование значения к типу Булево не может быть выполнено
	СуммаКПрописи = Сумма + ?(Шапка.СуммаВключаетНДС, 0, СуммаНДС); это при обращении к процедуре сохранить. Ее код - это стандартный код формирования счета на оплату, только в конце дописано чтобы сохранялось на жесткий диск.

Для Каждого ЭлементГотовый Из МассивСозданныхДокументов Цикл   
		СохранениеСчетов = СохранитьСчетНаОплату(ЭлементГотовый);
	КонецЦикла;
	
КонецПроцедуры

ДокументКопия = ЭлементМассива.Скопировать();
        ДокументКопия.Дата = НоваяДатаДок;
        ДокументКопия.Комментарий = НовыйКомментарий;

Для Каждого Счет ИЗ УжеСозданныеСчета Цикл
            
            Если ДокументКопия.Контрагент = Счет.Контрагент И ...

Процедура СкопироватьДоки()
	
	// поля, уникальность которых нужно отслеживать
	ПоляПоиска = "Договор, ОО";
	Фильтр = Новый Структура(ПоляПоиска);
	// создаем ТЗ для отслеживания уникальности
	Уникальность = Новый ТаблицаЗначений;
	Уникальность.Колонки.Добавить("Договор");
	Уникальность.Колонки.Добавить("ОО");
	Уникальность.Индексы.Добавить(ПоляПоиска);
	
	// цикл по каким-то данным, где есть одноименные ключевые поля
	Для Каждого ТекСтрока Из БазовыеРасчеты Цикл 
		// заполняем фильтр данными поиска
		ЗаполнитьЗначенияСвойств(Фильтр, ТекСтрока);
		// ищем в ТЗ уникальности
		Если Уникальность.НайтиСтроки().Количество()<>0 Тогда  // уже такие данные есть, пропускаем дальнейший код цикла
			Продолжить;
		КонецЕсли;
		Док = ....; // создаем документ
		ЗаполнитьЗначенияСвойств(Уникальность.Добавить(), Фильтр); // добавляем запись в ТЗ уникальности
	КонецЦикла;
	
КонецПроцедуры

Уникальность.НайтиСтроки().Количество()<>0

Уникальность.НайтиСтроки(Фильтр).Количество()<>0