Код:

ТабДок = Новый ТабличныйДокумент;

ТекстЗапроса = "ВЫБРАТЬ

|   СпрНоменклатура.Наименование,

|   СпрНоменклатура.ЭтоГруппа,

|   СпрНоменклатура.Ссылка КАК Ссылка,

|   РегОстатки.КоличествоОстаток КАК Остаток 

|ИЗ 

|   Справочник.Номенклатура КАК СпрНоменклатура 

|   ЛЕВОЕ СОЕДИНЕНИЕ 

|     РегистрНакопления.УчетНоменклатуры.Остатки КАК РегОстатки 

|     ПО СпрНоменклатура.Ссылка = РегОстатки.Номенклатура 

|ГДЕ ЭтоГруппа = Ложь 

|ИТОГИ СУММА(Остаток) ПО Ссылка ТОЛЬКО ИЕРАРХИЯ";

Запрос = Новый Запрос(ТекстЗапроса);

Макет = ПолучитьМакет("Остатки");

Обл = Макет.ПолучитьОбласть("Шапка");

ТабДок.Вывести(Обл);

 

//зафиксируем шапку для удобного просмотра 

ТабДок.ФиксацияСверху = ТабДок.ВысотаТаблицы;

 

Обл = Макет.Область("Строка");

 

ОбычныйШрифт = Обл.Шрифт;

ОбычныйЦветТекста = Обл.ЦветТекста;

ОбычныйЦветФона = Обл.ЦветФона;

 

//один раз получим область Строка

Обл = Макет.ПолучитьОбласть("Строка");

 

Выборка = Запрос.Выполнить().Выбрать();

Пока Выборка.Следующий() Цикл

Остаток = ?(Выборка.Остаток = Null, 0, Выборка.Остаток);

Обл = Макет.Область("Строка");

Обл.Шрифт = ОбычныйШрифт;

Обл.ЦветТекста = ОбычныйЦветТекста;

Обл.ЦветФона = ОбычныйЦветФона;

Если Выборка.ТипЗаписи()<>ТипЗаписиЗапроса.ИтогПоГруппировке Тогда

Если Остаток <= 2 Тогда

<

Содержание  Назад  Вперед

---

Forekc.ru
Рефераты, дипломы, курсовые, выпускные и квалификационные работы, диссертации, учебники, учебные пособия, лекции, методические пособия и рекомендации, программы и курсы обучения, публикации из профильных изданий

---

---

---