Отчет по курсам УЕ
Есть курсы валют, записанные в периодический регистр сведений по периодам.
Необходимо создать отчет за определенный период по курсам УЕ не используя конструктор отчетов.
Листинг 1. Процедуры
|
&НаСервере Функция ОтчетПоКурсамУЕ (ДатаНачала, ДатаКонца) ТабДок = Новый ТабличныйДокумент; //Получаем общий макет Макет = ПолучитьОбщийМакет ("КурсУЕ"); //Получаем области из макета ОбластьЗаголовок = Макет.ПолучитьОбласть ("Заголовок"); ОбластьШапка = Макет.ПолучитьОбласть ("Шапка"); ОбластьСтрока = Макет.ПолучитьОбласть ("Строка"); //Выводим области ТабДок.Вывести (ОбластьЗаголовок); ТабДок.Вывести (ОбластьШапка); Выборка = РегистрыСведений.Курсы.Выбрать (ДатаНачала, ДатаКонца); Пока Выборка.Следующий () Цикл ОбластьСтрока.Параметры.Дата
= Выборка.Период; ОбластьСтрока.Параметры.Значение
= Выборка.Курс; ТабДок.Вывести
(ОбластьСтрока); КонецЦикла; Возврат ТабДок; КонецФункции &НаКлиенте Процедура Кнопка (Команда) ОтчетПоКурсамУЕ('20140415',
'20140418').Показать (); КонецПроцедуры |
Рис. 1. Общий макет КурсУЕ
На рисунке 2 показан отчет по курсам валют за период с 15 по 18 апреля. Видно что отчет сделан в первом приближении и требуется его доработка.
Рис. 2. Отчет по курсам УЕ
Если поколдовать с форматирование макета, то можно получить более качественный отчет. Как вы понимаете, предела совершенству нет.
Рис. 3. Улучшенный отчет по УЕ
ПРИМЕЧАНИЕ: код процедур проверен на 1С:
Предприятие 8.2.