Разработка в 1С 8.0
Кон = Новый Граница
Нач = Новый МоментВремени(ВыбДатаВремяНачала);
Кон = Новый Граница(ВыбДатаВремяОкончания,ВидГраницы.Включая);
Отбор = Новый Структура("Валюта", ВыбВалюта);
Выборка = РегистрыСведений.КурсыВалют.Выбрать(Нач,Кон,Отбор);
Пока Выборка.Следующий() Цикл
| Сообщить(СокрЛП(Выборка.Валюта) + " " + |
| СокрЛП(Выборка.Период) + " " + |
| СокрЛП(Выборка.Курс)); |
