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