Форум 1С
Форум 1С
Программистам. Бухгалтерам. Администраторам. Пользователям
Задай вопрос - получи решение проблемы. Без троллинга и флуда.
15 Июн 2021, 16:29
Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
Не получили письмо с кодом активации?
МультиВход
 
collapse

Автор Тема: помогите с отчетом  (Прочитано 689 раз)

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

Оффлайн Vasya Povar

  • *
  • Регистрация: 2016-10-10
  • Сообщений: 36
  • РЕПУТАЦИЯ: 0
Есть часть кода в 7.7 версии
Нужно реализовать в 8.3
Таб1 = СоздатьОбъект("Таблица");
Таб1.ИсходнаяТаблица("Поставщики");
Таб1.ВывестиСекцию("Шапка");
Таб1.Опции(0,0,Таб1.ВысотаТаблицы(),0);
Ит1 = СоздатьОбъект("БухгалтерскиеИтоги");
Ит1.ИспользоватьРазделительУчета(ВыбРазделительУчета);
Ит1.ИспользоватьСубконто(ВидыСубконто.Контрагенты,, 1);
Ит1.ИспользоватьКорСубконто(ВидыСубконто.ТМЦ,,1);
Ит1.ВключатьСубсчета(-1,-1);
Если ПустоеЗначение(ВыбОсновной)=1 Тогда
СчетЗапроса="631,6851,6852,6853,6854,6855,6859";
Иначе
СчетЗапроса=ВыбОсновной;
КонецЕсли;
Ит1.ВыполнитьЗапрос(ВыбНачПериода, ВыбКонПериода, СчетЗапроса, ,, 3, "Операция", "СК");

Таб1.ВывестиСекцию("Шапка2");

Написал пока так:
ТабДок = Новый ТабличныйДокумент;
Макет = Отчеты.ХарактеристикаКонтрагентов.ПолучитьМакет("Поставщики");
Шапка = Макет.ПолучитьОбласть("Шапка");
Шапка1 = Макет.ПолучитьОбласть("Шапка1");
ТабДок.Вывести(Шапка);
ТабДок.Вывести(Шапка1);
Строка1 = Макет.ПолучитьОбласть("Строка1");

//Тут не знаю запрос делать наверно надо, но какой и откуда брать итоги
ТабДок.Вывести(Строка1);



Оффлайн Vasya Povar

  • *
  • Регистрация: 2016-10-10
  • Сообщений: 36
  • РЕПУТАЦИЯ: 0
Возможно нужно сделать регистр сведений по Контрагентам

Вот так должно получится в итоге



Оффлайн cska-fanat-kz

  • 1С:Специалист
  • *****
  • Регистрация: 2010-11-06
  • Сообщений: 5748
  • РЕПУТАЦИЯ: 1105
  • КПД: 19%
  • Красная армия всех сильней!
    • Skype: cska-fanat-kz81
  • Профессия: Разработчик 1С
Бухгалтерские итоги = запрос к регистру бухгалтерии
Получил помощь - скажи СПАСИБО.
Разобрался сам - расскажи другим.


Теги: буг 
 


* Живое общение

Не устроил ответ?

Зарегистрируйся и задай свой вопрос. Живое общение приносит результат намного быстрее.


Зарегистрироваться

* Реклама

* Поиск

* Последние задачи на разработку (фриланс)

* Последние вакансии

* Том 10 авторов за месяц

Геннадий ОбьГЭС Геннадий ОбьГЭС
69 Сообщений
LexaK
67 Сообщений
antoneus antoneus
32 Сообщений
Ивашка
28 Сообщений
neek666
25 Сообщений
KATERINA 861
19 Сообщений
SSC
15 Сообщений
alexandr_ll
13 Сообщений
Алексей_1985_06
12 Сообщений
pouyo
8 Сообщений

* Кто онлайн

  • Точка Гостей: 600
  • Точка Скрытых: 0
  • Точка Пользователей: 8
  • Точка Сейчас на форуме:

* Облако тэгов

* Инструменты

* Дополнительно

Поиск