Категория:
Регистры сведений Версии: 8.x
Функция ПересчетСуммыПоКурсу(ВалютнаяСумма, Валюта, Дата) Экспорт
Запись = РегистрыСведений.КурсыВалют.ПолучитьПоследнее(Дата, Новый Структура(" Валюта" , Валюта));
Сумма = ВалютнаяСумма * Запись.Курс / Запись.Кратность;
Возврат Сумма;
КонецФу