Раскраска справочника номенклатураНеобходимо при открытии справочника номенклатура, если товар есть в остатках то он выделяется синим
<br>цветом. | | Автор статьи: Последняя редакция №1 от 23.09.11 URL: http://kb.mista.ru/article.php?id=851 | |
Процедура СписокПриВыводеСтроки
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
| ТоварыОрганизаций.КоличествоОстаток КАК Остаток
|ИЗ
| РегистрНакопления.ТоварыОрганизаций.Остатки КАК ТоварыОрганизаций
|ГДЕ
| ТоварыОрганизаций.Номенклатура.Наименование = &Номенклатура";
Запрос.Параметры.Вставить("Номенклатура",ДанныеСтроки.Наименование);
Выборка = Запрос.Выполнить().Выбрать();
Пока Выборка.Следующий() Цикл
Если Выборка.Остаток < 0 Тогда
ОформлениеСтроки.Ячейки.Наименование.ЦветТекста = WebЦвета.Красный;
Иначе
ОформлениеСтроки.Ячейки.Наименование.ЦветТекста = WebЦвета.Синий;
ОформлениеСтроки.Ячейки.Наименование.ЦветТекста = WebЦвета.Белый;
КонецЕсли;
КонецЦикла
Помогите оптимизировать тормозит справочник страшно |