>
| Обробляти НеПомеченниеНаУдаленіе;
| Магазин = Документ.Расход.Магазін;
| Товар = Документ.Расход.Товар;
| Кількість = Документ.Расход.Колічество;
| Функція КолічествоСумма = Сума (Кількість);
| Угруповання Магазин;
| Угруповання Товар;
| Умова (Магазин в ВибМагазін);
| Умова (Товар в ВибТовар);
| "/ /}} ЗАПИТ
;
// Якщо помилка в запиті, то вихід з процедури
Якщо Запрос.Виполніть (ТекстЗапроса) = 0 Тоді
Повернення;
КонецЕсли;
// Підготовка до заповнення вихідних форм даними запиту
Таб = СоздатьОб'ект ("Таблиця");
Таб.ІсходнаяТабліца ("Сформувати");
// Заповнення полів "Тема"
Таб.ВивестіСекцію ("Тема");
Стан ("Заповнення вихідний таблиці ...");
Таб.Опціі (0, 0, Таб.ВисотаТабліци (), 0);
Поки Запрос.Группіровка (1) = 1 Цикл
// Заповнення полів Магазин
Таб.ВивестіСекцію ("Магазин");
Поки Запрос.Группіровка (2) = 1 Цикл
// Заповнення полів Товар
Таб.ВивестіСекцію ("Товар");
КонецЦікла;
КонецЦікла;
// Заповнення полів "Разом"
Таб.ВивестіСекцію ("Разом");
// Висновок заповненої форми
Таб.ТолькоПросмотр (1);
Таб.Показать ("Сформувати", "");
КонецПроцедури
Модуль форми обробки В«ПоказатьОстаткіВ»
Мінл Об'ектАналіза, КонтСправочніка;
Мінл Залишки;
Процедура ЗаполнітьКолонкіТабліци ()
СпособПоказа =
ТабліцаФорми.Очістіть ();
Якщо СпособПоказа = "магазинам" Тоді
Залишки = СоздатьОб'ект ("Регістр.ОстаткіТоваров");
ТабліцаФорми.НоваяКолонка ("Магазин", "Справочнік.Магазіни",,,, 20,, 1);
ТабліцаФорми.НоваяКолонка ("Залишок", "Рядок",,,, 7,, 2);
ТабліцаФорми.НоваяКолонка ("Одиниця", "Рядок",,, "Од.", 5,, 2);
КонецЕсли;
КонецПроцедури// ЗаполнітьКолонкіТабліци ()
Процедура ЗаполнітьПоМагазінам ()
ТаблОстатков = СоздатьОб'ект ("ТабліцаЗначеній");
Остаткі.В...