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