Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
22 ноя 2024, 11:48

Помогите новичку с заданием

Автор Арс, 24 дек 2018, 13:29

0 Пользователей и 1 гость просматривают эту тему.

Арс

Задача вывести отчет в табличный документ, при ходе выполнения возникли вопросы, а именно: есть 4 колонки, номГруппа1, номГруппа2, СуммаПродаж и СебестоимостьПродаж. Надо по колонке СуммаПродаж и СебестоимостьПродаж в подаале вывести итоги, то есть сложить все значения, и итоговую сумму.
Так же есть 5 колонка ВаловаяПрибыль, ее надо рассчитать из двух колонок СуммаПродаж - СебестоимостьПродаж.
Я совсем новичок, и если можно по подробнее расскажите пожалуйста


&НаКлиенте
Процедура Формировать(Команда)
ВыводВФорму().Показать();
КонецПроцедуры

&НаСервере
Функция ВыводВФорму()
ТабДок=Новый ТабличныйДокумент;
Макет = Отчеты.ПродажиИСебестоимостьСпособ2.ПолучитьМакет("Макет");
ОбластьШапка = Макет.ПолучитьОбласть("Шапка");
ТабДок.Вывести(ОбластьШапка);
//{{КОНСТРУКТОР_ЗАПРОСА_С_ОБРАБОТКОЙ_РЕЗУЛЬТАТА
// Данный фрагмент построен конструктором.
// При повторном использовании конструктора, внесенные вручную изменения будут утеряны!!!
 
Запрос = Новый Запрос;
Запрос.Текст =
  "ВЫБРАТЬ
  | ХозрасчетныйОбороты.Субконто1 КАК НомГруппа1,
  | ХозрасчетныйОбороты1.Субконто1 КАК НомГруппа2,
  | СУММА(ХозрасчетныйОбороты.СуммаОборотКт) КАК СуммаПродаж,
  | СУММА(ХозрасчетныйОбороты1.СуммаОборотДт) КАК СебестоимостьПродаж
  |ИЗ
  | РегистрБухгалтерии.Хозрасчетный.Обороты(, , , Счет.Код = ""90.01.1"", , , , ) КАК ХозрасчетныйОбороты
  |  ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрБухгалтерии.Хозрасчетный.Обороты(, , , Счет.Код = ""90.02.1"", , , , ) КАК ХозрасчетныйОбороты1
  |  ПО ХозрасчетныйОбороты.Субконто1 = ХозрасчетныйОбороты1.Субконто1
  |
  |СГРУППИРОВАТЬ ПО
  | ХозрасчетныйОбороты1.Субконто1,
  | ХозрасчетныйОбороты.Субконто1";
 
РезультатЗапроса = Запрос.Выполнить();
 
Выборка = РезультатЗапроса.Выбрать();
 
Пока Выборка.Следующий() Цикл
  ОбластьСтрока = Макет.ПолучитьОбласть("СтрокаТаблицы");
  ЗаполнитьЗначенияСвойств(ОбластьСтрока.Параметры, Выборка); 
  ТабДок.Вывести(ОбластьСтрока);
КонецЦикла;
 
//}}КОНСТРУКТОР_ЗАПРОСА_С_ОБРАБОТКОЙ_РЕЗУЛЬТАТА
 
ОбластьПодвал = Макет.ПолучитьОбласть("Подвал");
ОбластьПодвал.Параметры.ИтогоСП=ОбластьСтрока.Параметры.СуммаПродаж.Итог("СуммаПродаж");
ТабДок.Вывести(ОбластьПодвал);
ТабДок.ОтображатьСетку = Ложь;
ТабДок.Защита = Ложь;
ТабДок.ТолькоПросмотр = Истина;
ТабДок.ОтображатьЗаголовки = Ложь;
Возврат ТабДок;
КонецФункции

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск