КурсыВалют = РегистрыСведений.КурсыВалют;<br /> НаборКурсов = КурсыВалют.СоздатьНаборЗаписей();<br /> Доллар = Справочники.Валюты.НайтиПоНаименованию(«USD»);<br /> НаборКурсов.Отбор.Валюта.Установить(Доллар);<br /> НаборКурсов.Отбор.Период.Установить(НачалоДня(ТекущаяДата()));<br /> НаборКурсов.Прочитать();<br /> Если НаборКурсов.Количество() = 0 Тогда<br /> НовыйКурс = НаборКурсов.Добавить();<br /> НовыйКурс.Валюта = Доллар;<br /> НовыйКурс.Период = ТекущаяДата();<br /> ИначеЕсли НаборКурсов.Количество() = 1 Тогда<br /> НовыйКурс = НаборКурсов[0];<br /> Иначе<br /> Предупреждение(НСтр(«ru = ‘Курс валюты задается один раз в день.’;»<br /> + » en = ‘Rate is set once a day.'»), 60);<br /> Возврат;<br /> КонецЕсли;