Разработка в 1С 8.0


         

Кон = Новый Граница


Нач = Новый МоментВремени(ВыбДатаВремяНачала);

Кон = Новый Граница(ВыбДатаВремяОкончания,ВидГраницы.Включая);

Отбор = Новый Структура("Валюта", ВыбВалюта);

Выборка = РегистрыСведений.КурсыВалют.Выбрать(Нач,Кон,Отбор);

Пока Выборка.Следующий() Цикл

Сообщить(СокрЛП(Выборка.Валюта) + " " +  

 СокрЛП(Выборка.Период) + " " +  

 СокрЛП(Выборка.Курс));  

КонецЦикла;




Содержание  Назад  Вперед