Заполнить данными измерительную диаграмму

 // Настроить свойства диаграммы. 
Диаграмма = ЭлементыФормы.ДиаграммаПродажи; 
Диаграмма.ТипДиаграммы = ТипДиаграммы.Измерительная; 
Диаграмма.АвтоМаксимальноеЗначение = Ложь; 
Диаграмма.МаксимальноеЗначение = 20000; 
Диаграмма.АвтоМинимальноеЗначение = Ложь; 
Диаграмма.МинимальноеЗначение = 0; 

// Создать три полосы. 
Полосы = Диаграмма.ПолосыИзмерительнойДиаграммы; 
НоваяПолоса = Полосы.Добавить(); 
НоваяПолоса.Начало = 0; 
НоваяПолоса.Конец = 1000; 
НоваяПолоса.ЦветФона = WebЦвета.Красный; 

НоваяПолоса = Полосы.Добавить(); 
НоваяПолоса.Начало = 1000; 
НоваяПолоса.Конец = 5000; 
НоваяПолоса.ЦветФона = WebЦвета.Желтый; 

НоваяПолоса = Полосы.Добавить(); 
НоваяПолоса.Начало = 5000; 
НоваяПолоса.Конец = 20000; 
НоваяПолоса.ЦветФона = WebЦвета.Зеленый; 

Запрос = Новый Запрос(" 
|ВЫБРАТЬ 
|	ПродажиОбороты.Период, 
|	ПродажиОбороты.СтоимостьОборот 
|ИЗ 
|	РегистрНакопления.Продажи.Обороты(&ДатаНачала, &ДатаОкончания, День, ) КАК ПродажиОбороты"); 

Запрос.УстановитьПараметр("ДатаНачала", '2004.08.10 00:00:00'); 
Запрос.УстановитьПараметр("ДатаОкончания", '2004.08.30 23:59:59'); 

ЭлементыФормы.ДиаграммаПродажи.ИсточникДанных = Запрос.Выполнить().Выгрузить();