// Настроить свойства диаграммы. 
Диаграмма = ЭлементыФормы.ДиаграммаПродажи; 
Диаграмма.ТипДиаграммы = ТипДиаграммы.Измерительная; 
Диаграмма.АвтоМаксимальноеЗначение = Ложь; 
Диаграмма.МаксимальноеЗначение = 20000; 
Диаграмма.АвтоМинимальноеЗначение = Ложь; 
Диаграмма.МинимальноеЗначение = 0; 
// Создать три полосы. 
Полосы = Диаграмма.ПолосыИзмерительнойДиаграммы; 
НоваяПолоса = Полосы.Добавить(); 
НоваяПолоса.Начало = 0; 
НоваяПолоса.Конец = 1000; 
НоваяПолоса.ЦветФона = WebЦвета.Красный; 
НоваяПолоса = Полосы.Добавить(); 
НоваяПолоса.Начало = 1000; 
НоваяПолоса.Конец = 5000; 
НоваяПолоса.ЦветФона = WebЦвета.Желтый; 
НоваяПолоса = Полосы.Добавить(); 
НоваяПолоса.Начало = 5000; 
НоваяПолоса.Конец = 20000; 
НоваяПолоса.ЦветФона = WebЦвета.Зеленый; 
Запрос = Новый Запрос(" 
|ВЫБРАТЬ 
|   ПродажиОбороты.Период, 
|       ПродажиОбороты.СтоимостьОборот 
|ИЗ 
|  РегистрНакопления.Продажи.Обороты(&ДатаНачала, &ДатаОкончания, День, ) КАК ПродажиОбороты"); 
Запрос.УстановитьПараметр("ДатаНачала", '2004.08.10 00:00:00'); 
Запрос.УстановитьПараметр("ДатаОкончания", '2004.08.30 23:59:59'); 
ЭлементыФормы.ДиаграммаПродажи.ИсточникДанных = Запрос.Выполнить().Выгрузить();