Имя: Пароль:
1C
1С v8
Отчет в виде графика с нарастающим итогом
0 idw
 
10.07.19
15:10
По мотивам вот этой переписки пытаюсь сделать аналогичный отчет, выводящий график с нарастающим итогом, но не получается.

Вот мой запрос:

ВЫБРАТЬ
    ПлощадиОбъектовНедвижимости.КоличествоЖилыхКомнат КАК КолвоКомнат,
    НАЧАЛОПЕРИОДА(СтатусыОбъектов.Период, МЕСЯЦ) КАК Месяц,
    СУММА(1) КАК КолвоПродаж
ПОМЕСТИТЬ ТабПродаж
ИЗ
    Справочник.УПН_ОбъектыНедвижимости КАК ОбъектыНедвижимости
        ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.УПН_ПлощадиОбъектовНедвижимости.СрезПоследних КАК ПлощадиОбъектовНедвижимости
        ПО (ПлощадиОбъектовНедвижимости.ОбъектНедвижимости = ОбъектыНедвижимости.Ссылка)
        ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.УПН_СтатусыОбъектов.СрезПоследних КАК СтатусыОбъектов
        ПО (ОбъектыНедвижимости.Ссылка = СтатусыОбъектов.ОбъектНедвижимости)
ГДЕ
    НЕ ОбъектыНедвижимости.ПометкаУдаления
    И НЕ ОбъектыНедвижимости.ЭтоГруппа
    И ОбъектыНедвижимости.ЗданиеЗемельныйУчасток = &Ссылка
    И СтатусыОбъектов.Статус = &Статус

СГРУППИРОВАТЬ ПО
    ПлощадиОбъектовНедвижимости.КоличествоЖилыхКомнат,
    НАЧАЛОПЕРИОДА(СтатусыОбъектов.Период, МЕСЯЦ)
;

////////////////////////////////////////////////////////////////////////////////
ВЫБРАТЬ
    ТабПродаж.КолвоКомнат КАК КолвоКомнат,
    ТабПродаж.Месяц КАК Месяц,
    СУММА(ТабПродаж_Копия.КолвоКомнат) КАК КолвоПродажНакопительная
ИЗ
    ТабПродаж КАК ТабПродаж
        ЛЕВОЕ СОЕДИНЕНИЕ ТабПродаж КАК ТабПродаж_Копия
        ПО ТабПродаж.КолвоКомнат = ТабПродаж_Копия.КолвоКомнат
            И ТабПродаж.Месяц >= ТабПродаж_Копия.Месяц

СГРУППИРОВАТЬ ПО
    ТабПродаж.КолвоКомнат,
    ТабПродаж.Месяц

УПОРЯДОЧИТЬ ПО
    Месяц,
    КолвоКомнат


График рисую вот так:

        КолвоСНакоплением = 0;
    
    Выборка = РезультатЗапроса.Выбрать();
    Пока Выборка.Следующий() = Истина Цикл
        Серия = Диаграмма.УстановитьСерию(Выборка.Колво);
    
        Серия.Текст = Строка(Выборка.КолвоКомнат)+" комнатная";
        
        Серия.Расшифровка = Выборка.КолвоКомнат;

        Точка = Диаграмма.УстановитьТочку(Выборка.Месяц);
        Точка.Текст = Выборка.Месяц;
            Точка.Расшифровка = Выборка.Месяц;
        
        КолвоСНакоплением = Выборка.КолвоПродаж + КолвоСНакоплением;
        Диаграмма.УстановитьЗначение(Точка, Серия, КолвоСНакоплением);
        
        Сообщить(Серия.Текст+" "+Точка.Текст+": "+Строка(Выборка.КолвоПродаж)+" : "+Строка(КолвоСНакоплением));
    КонецЦикла;

Но у меня суммируются 1комнатный с 3хкомнатными.

Это то, что выводит Сообщить():
1 комнатная 01.07.2018 0:00:00: 1 : 1
1 комнатная 01.09.2018 0:00:00: 2 : 3
3 комнатная 01.09.2018 0:00:00: 3 : 6
1 комнатная 01.10.2018 0:00:00: 3 : 9
3 комнатная 01.10.2018 0:00:00: 6 : 15
1 комнатная 01.11.2018 0:00:00: 4 : 19
3 комнатная 01.11.2018 0:00:00: 9 : 28
1 комнатная 01.12.2018 0:00:00: 5 : 33
3 комнатная 01.12.2018 0:00:00: 12 : 45
Есть два вида языков, одни постоянно ругают, а вторыми никто не пользуется.