Подскажите пожалуйста , как раскрасить мне строчки журнала:
Процедура СписокПриПолученииДанных(Элемент, ОформленияСтрок)
//перем построитель,раскраска;
// Вставить содержимое обработчика.
СписокДокументов=Новый Массив;
Для каждого ОформлениеСтроки из ОформленияСтрок Цикл
СписокДокументов.Добавить(ОформлениеСтроки.ДанныеСтроки.Ссылка);
КонецЦикла;
запрос=новый запрос;
Запрос.Текст =
"ВЫБРАТЬ
| ИСТИНА КАК Переносить,
| ВЫБОР
| КОГДА ЕСТЬNULL(ЗаказыПокупателейОстатки.КоличествоОстаток, 0) > 0
| ТОГДА ЗаказыПокупателейОстатки.КоличествоОстаток
| ИНАЧЕ 0
| КОНЕЦ КАК ЗаказыКоличество,
| ВЫБОР
| КОГДА ЕСТЬNULL(ТоварыВРезервеНаСкладахОстатки.КоличествоОстаток, 0) > 0
| ТОГДА ТоварыВРезервеНаСкладахОстатки.КоличествоОстаток
| ИНАЧЕ 0
| КОНЕЦ КАК РезервыКоличество,
| ВЫБОР
| КОГДА ЕСТЬNULL(РазмещениеЗаказовПокупателейОстатки.КоличествоОстаток, 0) > 0
| ТОГДА ИСТИНА
| ИНАЧЕ 0
| КОНЕЦ КАК РазмещенияКоличество,
| ВЫБОР
| КОГДА ЕСТЬNULL(РасчетыСКонтрагентамиОстатки.СуммаВзаиморасчетовОстаток, 0) > 0
| ТОГДА РасчетыСКонтрагентамиОстатки.СуммаВзаиморасчетовОстаток
| ИНАЧЕ 0
| КОНЕЦ КАК РасчетыОстаток,
| ДокументыЗаказПокупателя.Ссылка как документ,
| ДокументыЗаказПокупателя.Дата,
| ДокументыЗаказПокупателя.Номер,
| ДокументыЗаказПокупателя.Контрагент,
| ДокументыЗаказПокупателя.ДоговорКонтрагента,
| ДокументыЗаказПокупателя.КонтактноеЛицоКонтрагента,
| ДокументыЗаказПокупателя.Организация,
| ДокументыЗаказПокупателя.Подразделение,
| ДокументыЗаказПокупателя.СкладГруппа,
| ДокументыЗаказПокупателя.Ответственный,
| ДокументыЗаказПокупателя.СуммаДокумента как СуммаДокумента,
| ДокументыЗаказПокупателя.ВалютаДокумента,
| ДокументыЗаказПокупателя.ТипЦен,
| ДокументыЗаказПокупателя.ДатаОплаты,
| ДокументыЗаказПокупателя.ДатаОтгрузки,
| ДокументыЗаказПокупателя.УсловиеПродаж,
| ДокументыЗаказПокупателя.Грузополучатель,
| ДокументыЗаказПокупателя.ДисконтнаяКарта,
| ДокументыЗаказПокупателя.Проведен
|ИЗ
| Документ.ЗаказПокупателя КАК ДокументыЗаказПокупателя
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрНакопления.ЗаказыПокупателей.Остатки КАК ЗаказыПокупателейОстатки
| ПО ДокументыЗаказПокупателя.Ссылка = ЗаказыПокупателейОстатки.ЗаказПокупателя
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрНакопления.РасчетыСКонтрагентами.Остатки КАК РасчетыСКонтрагентамиОстатки
| ПО ДокументыЗаказПокупателя.Ссылка = РасчетыСКонтрагентамиОстатки.Сделка
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрНакопления.ТоварыВРезервеНаСкладах.Остатки КАК ТоварыВРезервеНаСкладахОстатки
| ПО ДокументыЗаказПокупателя.Ссылка = ТоварыВРезервеНаСкладахОстатки.ДокументРезерва
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрНакопления.РазмещениеЗаказовПокупателей.Остатки КАК РазмещениеЗаказовПокупателейОстатки
| ПО ДокументыЗаказПокупателя.Ссылка = РазмещениеЗаказовПокупателейОстатки.ЗаказПокупателя
|ГДЕ
| ДокументыЗаказПокупателя.Проведен
| И ДокументыЗаказПокупателя.СуммаДокумента > 0
|
|УПОРЯДОЧИТЬ ПО
| ДокументыЗаказПокупателя.Дата,
| ДокументыЗаказПокупателя.Номер";
результат=запрос.Выполнить().Выбрать();
пока результат.Следующий() цикл
Если Раскраска Тогда
Результат.Отбор.Документ.Значение.ЗагрузитьЗначения(СписокДокументов);
Построитель.Выполнить();
Выборка=Построитель.Результат.Выбрать();
КонецЕсли;
Если Выборка.НайтиСледующий(ОформлениеСтроки.ДанныеСтроки.Ссылка, "Документ") Тогда
Если выборка.Расчетыостаток<>выборка.суммадокумента Тогда
ОформлениеСтроки.ЦветТекста=WebЦвета.БледноЗеленый;
КонецЕсли;
Если выборка.Заказыколичество<>выборка.РазмещенияКоличество Тогда
ОформлениеСтроки.ЦветТекста=WebЦвета.БледноЗолотистый;
КонецЕсли;
Если (выборка.Расчетыостаток<>выборка.суммадокумента) И (выборка.Заказыколичество<>выборка.РазмещенияКоличество) Тогда
ОформлениеСтроки.ЦветТекста=WebЦвета.Голубой;
КонецЕсли;
Конецесли;
конецЦикла;
КонецПроцедуры