8.х Диаграмма

Тема в разделе "Конфигурирование на платформе "1С:Предприятие 8"", создана пользователем grrus, 12 июл 2006.

  1. TopicStarter Overlay
    grrus
    Offline

    grrus

    Регистрация:
    12 июл 2006
    Сообщения:
    1
    Симпатии:
    0
    Баллы:
    1
    Здраствуйте важаемые посетители.
    У меня просьба: помогите построить диаграмму с помощью программного кода.
    Пожалуйста Пришлите пример на мыло grrus@mail.ru

    Текст кода
    Код:
    Процедура Сформировать() 
    Запрос = Новый Запрос; 
    Запрос.Текст = "ВЫБРАТЬ
    |    ПродажиОбороты.Клиент.Представление КАК Клиент,
    |    ПродажиОбороты.ВыручкаОборот - ПродажиОбороты.СтоимостьОборот КАК Доход
    |ИЗ
    |    РегистрНакопления.Продажи.Обороты КАК ПродажиОбороты
    |
    |УПОРЯДОЧИТЬ ПО
    |    Доход УБЫВ";
    
    ВыборкаРеэультатаЗапроса = Запрос.Выполнить().Выбрать();
    Диаграмма = ЭлементыФормы.Диаграмма;
    //запретить обновление и автотранспонирование диаграммы 
    Диаграмма.Обновление = Ложь; 
    Диаграмма.АвтоТранспонирование = Ложь;
    //создать единственную точку диаграммы 
    ТочкаДиаграммы = Диаграмма.УстановитьТочку("Доход");
    //перебрать выборку результата запроса и создать серии // и значения
    Пока ВыборкаРезультатаЗапроса.Следующний Цикл ТекущаяСерияДиаграммы = Диаграмма.УстановитьСерию(ВыборкаРеэультатаЗапроса.Клиент);
    Диаграмма.УстановитьЗначение(ТочкаДиаграммы,ТекущаяСерияДиаграммы,ВыборкаРезультатаЗапроса.Доход);
    КонецЦикла;
    //разрешить обновление и автотранспонирование диаграммы 
    Диаграмма.Обновление = Истина; 
    Диаграмма.АвтоТранспонирование = Истина;
    
    КонецПроцедуры
    
    После проверки синтаксиса выдает:
    {Отчет.РейтингКлиентов(14,20)}: Переменная не определена (ЭлементыФормы)
    Диаграмма = <<?>>ЭлементыФормы.Диаграмма;
    {Отчет.РейтингКлиентов(21,13)}: Переменная не определена (ВыборкаРезультатаЗапроса)
    Пока <<?>>ВыборкаРезультатаЗапроса.Следующний Цикл ТекущаяСерияДиаграммы = Диаграмма.УстановитьСерию(ВыборкаРеэультатаЗапроса.Клиент);
    {Отчет.РейтингКлиентов(22,75)}: Переменная не определена (ВыборкаРезультатаЗапроса)
    Диаграмма.УстановитьЗначение(ТочкаДиаграммы,ТекущаяСерияДиаграммы,<<?>>ВыборкаРезультатаЗапроса.Доход);
    
    
    
    Хотя На форме ЭУ Диаграмма присутствует.
    Как быть?
  2. Роман
    Offline

    Роман Гость Гость

Поделиться этой страницей