Имя: Пароль:
1C
1С v8
Формирование анализа субконто
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) Спасибо, помогло ))
Выдавать глобальные идеи — это удовольствие; искать сволочные маленькие ошибки — вот настоящая работа. Фредерик Брукс-младший