#Область УдалениеЛишнихСтрок

 Индекс=0;

 Для каждого СтрТаб Из ТаблицаКурсовыхРазниц Цикл

  Индекс = ТаблицаКурсовыхРазниц.Индекс(СтрТаб);

   СтрТаб2 = ТаблицаКурсовыхРазниц.Получить(Индекс);

   Если СтрТаб.СубконтоДт1 = СтрТаб2.СубконтоДт1 И СтрТаб.Сумма = СтрТаб2.Сумма Тогда //Условие совпадиния

    ТаблицаКурсовыхРазниц.Удалить(Индекс+1);

    ТаблицаКурсовыхРазниц.Удалить(Индекс);

  КонецЕсли;

 КонецЦикла;

#КонецОбласти

   

 // Чтение данных на определенную дату из регистра сведений

Запрос = Новый Запрос;

	

МассивВалют = Новый Массив;



МассивВалют.Добавить(Валюта1);

МассивВалют.Добавить(Валюта2);



Запрос.УстановитьПараметр("МассивВалют", МассивВалют);

Запрос.УстановитьПараметр("ДатаПолучения", ДатаПолучения);

	

Запрос.Текст = "

|ВЫБРАТЬ

|	ВалютыСрезПоследних.Валюта,

|	ВалютыСрезПоследних.Курс

|ИЗ

|	РегистрСведений.КурсыВалют.СрезПоследних(&ДатаПолучения, Валюта В (&МассивВалют)) КАК ВалютыСрезПоследних";

		

ТаблицаКурсов = Запрос.Выполнить().Выгрузить();