Формирование анализа субконто
☑
0
sound
19.05.15
✎
14:56
Подскажите, пожалуйста, как программно сформировать отчет анализ субконто по выбранному контрагенту и договору.
Анализ = Отчеты.АнализСубконто.Создать();
Здесь как-то видимо передать в отбор этого контрагента и договор. Что-то не могу понять как.
1
butterbean
19.05.15
✎
15:15
в разных конфах по-разному
2
sound
19.05.15
✎
15:18
(1) Ну конкретно в УПП
3
sound
19.05.15
✎
15:22
Полюбому же как то просто должно быть
4
ale-sarin
19.05.15
✎
15:23
Посмотреть отладчиком, что происходит при ручном формировании.
Впрочем, как всегда.
5
ИУБиПовиц
19.05.15
✎
15:58
Я в БП делал так с ОСВ по счету: может поможет.
Отчет = Отчеты.ОборотноСальдоваяВедомостьПоСчету.Создать();
Отчет.РежимРасшифровки = Истина;
Отчет.Счет = ПланыСчетов.Хозрасчетный.РасчетыСПоставщикамиИПодрядчиками;
Отчет.Организация = Организация;;
Отчет.КонецПериода = ТекущаяДата();
Отчет.НачалоПериода = НачалоГода(ТекущаяДата());
Отчет.Организация = УправлениеПользователями.ПолучитьЗначениеПоУмолчанию(глЗначениеПеременной("глТекущийПользователь"), "ОсновнаяОрганизация");
Отчет.Счет = ПланыСчетов.Хозрасчетный.РасчетыСПоставщикамиИПодрядчиками;
Отчет.Настроить();
ФормаОтчета = Отчет.ПолучитьФорму();
ФормаОтчета.КомпоновщикНастроек.Настройки.Отбор.Элементы.Очистить();
ТиповыеОтчеты.ДобавитьОтбор(ФормаОтчета.КомпоновщикНастроек, "Субконто1", Владелец, ВидСравненияКомпоновкиДанных.Равно);
ТиповыеОтчеты.ДобавитьОтбор(ФормаОтчета.КомпоновщикНастроек, "Субконто2", Ссылка, ВидСравненияКомпоновкиДанных.Равно);
ФормаОтчета.Открыть();
ФормаОтчета.ОбновитьОтчет();
ФормаОтчета.Обновить();
6
sound
20.05.15
✎
10:53
Если чо сделал так:
Контрагент = ;
Договор = ;
ОтчетОбъект = Отчеты.АнализСубконто.Создать();
ОтчетОбъект.КомпоновщикНастроек.Настройки.Выбор.Элементы.Очистить();
ОтчетОбъект.КомпоновщикНастроек.Настройки.Структура.Очистить();
ОтчетОбъект.КомпоновщикНастроек.Настройки.Отбор.Элементы.Очистить();
ОтчетОбъект.НачалоПериода = '00010101';
ОтчетОбъект.КонецПериода = '00010101';
ОтчетОбъект.Организация = Справочники.Организации.ПустаяСсылка();
ОтчетОбъект.СписокВидовСубконто.Очистить();
ОтчетОбъект.СписокВидовСубконто.Добавить(ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.Контрагенты);
ОтчетОбъект.СписокВидовСубконто.Добавить(ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.Договоры);
ФормаОтчета = ОтчетОбъект.ПолучитьФорму("ФормаОтчета");
ФормаОтчета.Открыть();
ОтчетОбъект.КомпоновщикНастроек.Настройки.Отбор.Элементы.Очистить();
ТиповыеОтчеты.ДобавитьОтбор(ОтчетОбъект.КомпоновщикНастроек, "Субконто1", Контрагент, ВидСравненияКомпоновкиДанных.Равно, Истина);
ТиповыеОтчеты.ДобавитьОтбор(ОтчетОбъект.КомпоновщикНастроек, "Субконто2", Договор, ВидСравненияКомпоновкиДанных.Равно, Истина);
ФормаОтчета.ОбновитьОтчет();
7
sound
20.05.15
✎
10:54
(5) Спасибо, помогло ))
Чтобы обнаруживать ошибки, программист должен иметь ум, которому доставляет удовольствие находить изъяны там, где, казалось, царят красота и совершенство. Фредерик Брукс-младший