Доллары = Справочники.Валюты.НайтиПоНаименованию("USD");

Отбор = Новый Структура;

Отбор.Вставить("Валюта", Доллары);

Курсы = РегистрыСведений.КурсыВалют;

ТекКурс = Курсы.ПолучитьПоследнее(ТекущаяДата(), Отбор);

Сообщить("Текущий курс доллара: " + ТекКурс.Курс + " руб.");



// ИЛИ ТАК:



CубконтоПодр= РегистрыСведений.РаботникиОрганизаций.ПолучитьПоследнее(Дата, Новый Структура("Сотрудник",Справочники.СотрудникиОрганизаций.НайтиПоРеквизиту("Физлицо",СтрокаТЗ.Физлицо))).ПодразделениеОрганизации;