При создании отчета столкнулась с вот такой проблемой: в табличной части документа расположены реквизиты месяца года с типом значения число,т.к. в них располагается сумма. И последней колонкой идет итог за год. В отчет должна идти итоговая сумма (за год), и в другую ячейку таблицы должен идти месяц, в котором заполнена сумма. У меня получается выводить только сумму конкретной колонки месяца, а вот необходимо чтобы выводило в отчет месяц (например, "январь"):
Процедура Сформировать()
Перем Запрос, ТекстЗапроса, Таб;
//Создание объекта типа Запрос
Запрос = СоздатьОбъект("Запрос");
ТекстЗапроса =
"//{{ЗАПРОС(Сформировать)
|Период с ВыбНачПериод по ВыбКонПериод;
|Обрабатывать НеПомеченныеНаУдаление;
|КодДК = Документ.ПланЗакупок.КодДК;
|Закупки = Документ.ПланЗакупок.Закупки;
|Примечание = Документ.ПланЗакупок.Примечание;
|СуммаЗаГод = Документ.ПланЗакупок.СуммаЗаГод;
|мес1 = Документ.ПланЗакупок.мес1;
|мес2 = Документ.ПланЗакупок.мес2;
|ПериодГод =Документ.ПланЗакупок.ПериодГод;
|Ответственный = Документ.ПланЗакупок.Ответственный;
|Функция Всего = Сумма(СуммаЗаГод);
|Группировка КодДК;
|Группировка Примечание;
|Условие (ПериодГод = ВыбПериод);
|"//}}ЗАПРОС
;
// Если ошибка в запросе, то выход из процедуры
Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
Возврат;
КонецЕсли;
ЭтотГод = СокрЛП(ПериодСтр(НачГода(ВыбНачПериод),КонГода(ВыбНачПериод)));
// Подготовка к заполнению выходных форм данными запроса
Таб = СоздатьОбъект("Таблица");
Таб.ИсходнаяТаблица("Сформировать");
// Заполнение полей "Заголовок"
Таб.ВывестиСекцию("Заголовок");
Состояние("Заполнение выходной таблицы...");
Таб.Опции(0, 0, Таб.ВысотаТаблицы(), 0);
Пока Запрос.Группировка(1) = 1 Цикл
Если (ПустоеЗначение(ВыбКод) = 0)и((Лев(СокрЛП(Запрос.КодДК),СтрДлина(СокрЛП(ВыбКод))) <> СокрЛП(ВыбКод))или(СтрДлина(СокрЛП(ВыбКод))>СтрДлина(СокрЛП(Запрос.КодДК)))) Тогда
Продолжить;
КонецЕсли;
ТекДок = Запрос.КодДК; // Заполнение полей КодДК
Закупки = Запрос.Закупки;
Подразделение = Запрос.Ответственный.Подразделение;
Ответственный = Формат(Запрос.Ответственный.Подразделение, "Сn") +" "+"-"+" "+Запрос.Ответственный;
Пока Запрос.Группировка(2) = 1 Цикл
Выводить = 0;
Если (СвышеСтаТысяч = 1) И (Запрос.СуммаЗаГод > 100000 ) Тогда
Выводить = 1;
ИначеЕсли (СвышеСтаТысяч = 0) И (Запрос.СуммаЗаГод < 100000 ) Тогда
Выводить = 1;
Иначе
Выводить = 0;
КонецЕсли;
Если Выводить = 1 Тогда
СуммаЗаГод = СокрЛП(Формат(Запрос.СуммаЗаГод,"Ч020.")+" "+"("+Формат(Запрос.СуммаЗаГод,"ЧП")+" "+"у т.ч. ПДВ"+" "+"-"+" "+Окр(((Число(Запрос.СуммаЗаГод))/6),2)+")");
мес = Запрос.мес1 + Запрос.мес2;
Таб.ВывестиСекцию("Секция_1");
Итог = Итог + Запрос.Всего;
КонецЕсли;
КонецЦикла;
КонецЦикла;
Таб.ВывестиСекцию("Итог");
Таб.ТолькоПросмотр(1);
Таб.Показать("Сформировать", "");
КонецПроцедуры