Создадим шаблон печатной формы;
КонОст=Запрос.СуммаКонОст;
Если Контра.ЭтоГруппа()=1 Тогда
Таб.ВывестиСекцию("Группа");
Иначе
Таб.ВывестиСекцию("Контра");
Пока Запрос.Группировка(2)=1 Цикл
Дог=Запрос.Догов;
НачОст=Запрос.СуммаНачОст;
ПрихТов=Запрос.СуммаПриходТов;
РасхДен=Запрос.СуммаРасходДен;
РасхТов=Запрос.СуммаРасходТов;
ПрихДен=Запрос.СуммаПриходДен;
КонОст=Запрос.СуммаКонОст;
Таб.ВывестиСекцию("Дог");
КонецЦикла;
КонецЕсли;
КонецЦикла;
Таб.ВывестиСекцию("Итого");
Таб.ТолькоПросмотр(1);
Таб.ПараметрыСтраницы(1,100,1);
Таб.Показать("");
КонецПроцедуры
Создадим шаблон печатной формы;
Сохраним конфигурацию;
Создаем новый отчет "ОбороткаПоСкладу";
Добавим поле ввода ДатаН – тип Дата, формула ДатаН();
Добавим поле ввода ДатаК – тип Дата, формула ДатаК();
Добавим поле ввода Склад – тип С.Склады;
Пропишем процедуры в модуле формы:
//-----------------------------------------------
Процедура ДатаН()
Если ДатаН>ДатаК Тогда
ДатаН=ДатаК;
КонецЕсли;
КонецПроцедуры
//-----------------------------------------------
Процедура ДатаК()
Если ДатаК<ДатаН Тогдаbr> ДатаК=ДатаН;
ИначеЕсли ДатаК>ПолучитьДатуТА() Тогда
ДатаК=ПолучитьДатуТА();
КонецЕсли;
КонецПроцедуры
//-----------------------------------------------
Процедура Сформировать()
Если Склад.Выбран()=0 Тогда
Сообщить("Не выбран склад");
Возврат;
КонецЕсли;
Запрос=СоздатьОбъект("Запрос");
ТекстЗапроса="
Содержание Назад Вперед