|
|
Решил начать с нее чтобы понять логику сделал простую базу с 3 регистрами и 2 доками
вообщем хочу сделать отчет- номенклатура в разрезе по складам с ценой и стоимостью бюсь уже 4 часа не получается сгруппировать по складам
Нужно чтобы получилось номенклатура склад количество цена сумма- если такое вообще возможно
Процедура Сформировать()
Перем Запрос, ТекстЗапроса, Таб;
//Создание объекта типа Запрос
Запрос = СоздатьОбъект("Запрос");
ТекстЗапроса =
"//{{ЗАПРОС(Сформировать)
|стоимость = Регистр.СтоимостьТовара.стоимость;
|номенклатура = Регистр.ОстаткиТоваров.номенклатура, Регистр.СтоимостьТовара.Сноменклатура;
|количество = Регистр.ОстаткиТоваров.количество;
|склад = Регистр.ОстаткиТоваров.склад;
|Функция количествоКонОст = КонОст(количество);
|Функция стоимостьКонОст = КонОст(стоимость);
//|Группировка склад; Если вкл группировку по складу он начинает добавлять строки номенклатура- количество, номенклатура-сумма
|Группировка номенклатура;
|"//}}ЗАПРОС
;
// Если ошибка в запросе, то выход из процедуры
Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
Возврат;
КонецЕсли;
// Подготовка к заполнению выходных форм данными запроса
Таб = СоздатьОбъект("Таблица");
Таб.ИсходнаяТаблица("таблица");
// Заполнение полей "Заголовок"
Таб.ВывестиСекцию("Заголовок");
Состояние("Заполнение выходной таблицы...");
Таб.Опции(0, 0, Таб.ВысотаТаблицы(), 0);
// Пока Запрос.Группировка(1) = 1 Цикл
//Если тогда
// Пока запрос.Группировка(1)=1
пока запрос.Группировка(1)=1 цикл
Таб.ВывестиСекцию("номенклатура");
Сообщить(Запрос.номенклатура,Запрос.СтоимостьКонОст);
КонецЦикла;
// КонецЦикла;
// Заполнение полей "Итого"
//Таб.ВывестиСекцию("Итого");
// Вывод заполненной формы
Таб.ТолькоПросмотр(1);
Таб.Показать("Таблица", "");
КонецПроцедуры |
|
1С Управление торговлей 10.3
.gif)