Процедура ОчиститьЗаписиВНезависимомРегистреСведенийСОтбором(Валюта, БазоваяВалюта)
	Набор = РегистрыСведений.КурсыВалют.СоздатьНаборЗаписей();
	Набор.Отбор.Валюта.Установить(Валюта);
	Набор.Отбор.БазоваяВалюта.Установить(Валюта);
	Набор.Записать();
КонецПроцедуры