Отчет по рознице помогите

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

// Подготовка к заполнению выходных форм данными запроса
Таб = СоздатьОбъект("Таблица");
Таб.ИсходнаяТаблица("Сформировать");
// Заполнение полей "Заголовок"
Таб.ВывестиСекцию("Заголовок");
Состояние("Заполнение выходной таблицы...");
Таб.Опции(0, 0, Таб.ВысотаТаблицы(), 0);
Пока Запрос.Группировка(1) = 1 Цикл
// Пока Запрос.Группировка(2) = 1 Цикл
// Заполнение полей РеализацияРозница
Таб.ВывестиСекцию("РеализацияРозница");
КонецЦикла;
// добавил
Пока Запрос.Группировка(2) = 1 Цикл
Таб.ВывестиСекцию("Номенклатура");
КонецЦикла;
// Заполнение полей "Итого"
Таб.ВывестиСекцию("Итого");
// Вывод заполненной формы
Таб.ТолькоПросмотр(1);
Таб.Показать("Сформировать", "");
КонецПроцедуры

Мне кажется, что и такое подробное упорядочивание ни к чему.... :-/
И ещё, здесь правильно сказали, что нужна группировка по документу и по строкам документа
Результаты обходить надо через
Пока Запрос.Группировка(1) = 1 Цикл
Пока Запрос.Группировка(2) = 1 Цикл
...
КонецЦикла;
КонецЦикла;

Спасибо за советы сейчас выводит номенклатуру, НО ...
Номенкулатура выводится:итог по фирме товара|название группы товара|а затем только сам товар, первые две строчки лишние, одна из них добавляется с помощью второй групировки

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

// Подготовка к заполнению выходных форм данными запроса
Таб = СоздатьОбъект("Таблица");
Таб.ИсходнаяТаблица("Сформировать");
// Заполнение полей "Заголовок"
Таб.ВывестиСекцию("Заголовок");
Состояние("Заполнение выходной таблицы...");
Таб.Опции(0, 0, Таб.ВысотаТаблицы(), 0);
Пока Запрос.Группировка(1) = 1 Цикл
// Заполнение полей РеализацияРозница
Таб.ВывестиСекцию("РеализацияРозница");
Пока Запрос.Группировка(2) = 1 Цикл
// Заполнение полей Номенклатура
Таб.ВывестиСекцию("Номенклатура");
КонецЦикла;
КонецЦикла;
// Заполнение полей "Итого"
Таб.ВывестиСекцию("Итого");
// Вывод заполненной формы
Таб.ТолькоПросмотр(1);
Таб.Показать("Сформировать", "");
КонецПроцедуры

Вообщем пробовал сделать по регистрам Документ (Document) - позволяет детализацию до документа;
СтрокаДокумента (DocumentLine) - позволяет детализацию до строки документа; не получаеться у меня ...(немогу понять как переменные описать, и как таблицу линовать?) Сделал я таки по своему всё выводиться ОК(одну лишнюю строку в таблице просто убрал :)). Теперь надо добавить Возврат от покупателя, вроде бы сделал всё как и раньше, ощибок на синтаксис нет, а на выводе не отображается по Возврату НИЧЕГО, в чем причина не могу понять (в таблице секции прописал)? Листинг:
//*******************************************
// Процедура генерации запроса Сформировать.
//
Процедура Сформировать()
Перем Запрос, ТекстЗапроса, Таб;
//Создание объекта типа Запрос
Запрос = СоздатьОбъект("Запрос");
ТекстЗапроса =
"//{{ЗАПРОС(Сформировать)
|Период с ВыбНачПериода по ВыбКонПериода;
|Количество1 = Регистр.ОстаткиТМЦ.Количество;
|ЦенаПрод = Регистр.ОстаткиТМЦ.ЦенаПрод;
|Функция КоличествоНачОст = НачОст(Количество1);
|Функция КоличествоКонОст = КонОст(Количество1);
|Функция ЦенаПродСумма = Сумма(ЦенаПрод);
|РеализацияРозница = Документ.РеализацияРозница.ТекущийДокумент;
|Контрагент = Документ.РеализацияРозница.Контрагент;
|Процент = Документ.РеализацияРозница.Скидка.Процент;
|Номенклатура = Документ.РеализацияРозница.Номенклатура;
|Количество = Документ.РеализацияРозница.Количество;
|Цена = Документ.РеализацияРозница.Цена;
|Сумма = Документ.РеализацияРозница.Сумма;
// возврат
|ВозвратОтПокупателя = Документ.ВозвратОтПокупателя.ТекущийДокумент;
|КонтрагентВ = Документ.ВозвратОтПокупателя.Контрагент;
|ПроцентВ = Документ.ВозвратОтПокупателя.Скидка.Процент;
|НоменклатураВ = Документ.ВозвратОтПокупателя.Номенклатура;
// |АртикулВ = Документ.ВозвратОтПокупателя.Номенклатура.Артикул;
|КоличествоВ = Документ.ВозвратОтПокупателя.Количество;
|ЦенаВ = Документ.ВозвратОтПокупателя.Цена;
|СуммаВ = Документ.ВозвратОтПокупателя.Сумма;
|Функция КоличествоВСумма = Сумма(КоличествоВ);
|Функция СуммаВСумма = Сумма(СуммаВ);
|Функция ЦенаВСумма = Сумма(ЦенаВ);

// конец возврата
|Функция ЦенаСумма = Сумма(Цена);
|Функция КоличествоСумма = Сумма(Количество);
|Функция СуммаСумма = Сумма(Сумма);
|Группировка РеализацияРозница без групп упорядочить по РеализацияРозница.ДатаДок, РеализацияРозница.Контрагент, РеализацияРозница.Скидка,ЦенаСумма;
|Группировка Номенклатура без групп упорядочить по Номенклатура.Наименование, Номенклатура.Артикул,КоличествоСумма, СуммаСумма;
// возврат
|Группировка ВозвратОтПокупателя упорядочить по ВозвратОтПокупателя.ДатаДок, ВозвратОтПокупателя.Контрагент, ВозвратОтПокупателя.Скидка без групп;
|Группировка НоменклатураВ упорядочить по НоменклатураВ.Наименование, НоменклатураВ.Артикул, КоличествоВСумма, ЦенаВСумма, СуммаВСумма без групп;
// конец группировки возврата
|"//}}ЗАПРОС
;
// Если ошибка в запросе, то выход из процедуры
Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
Возврат;
КонецЕсли;

// Подготовка к заполнению выходных форм данными запроса
Таб = СоздатьОбъект("Таблица");
Таб.ИсходнаяТаблица("Сформировать");
// Заполнение полей "Заголовок"
Таб.ВывестиСекцию("Заголовок");
Состояние("Заполнение выходной таблицы...");
Таб.Опции(0, 0, Таб.ВысотаТаблицы(), 0);
Пока Запрос.Группировка(1) = 1 Цикл
// Пока Запрос.Группировка(2) = 1 Цикл
// Заполнение полей РеализацияРозница
Таб.ВывестиСекцию("РеализацияРозница");
Пока Запрос.Группировка(2) = 1 Цикл
// Заполнение полей Номенклатура
Таб.ВывестиСекцию("Номенклатура");

// возврат
Пока Запрос.Группировка(3) = 1 Цикл
Таб.ВывестиСекцию("ВозвратОтПокупателя");
Пока Запрос.Группировка(4) = 1 Цикл
Таб.ВывестиСекцию("НоменклатураВ");
КонецЦикла;
КонецЦикла;
// возврат
КонецЦикла;
КонецЦикла;
// Заполнение полей "Итого"
Таб.ВывестиСекцию("Итого");
Таб.ВывестиСекцию("Итого1");
// Вывод заполненной формы
Таб.ТолькоПросмотр(1);
Таб.Показать("Сформировать", "");
КонецПроцедуры

Попробовал воспользоваься запросом выше, любезно предоставленный Poppy. Задача такова: сделать отчет продаж в котором столбцы
ДатаДок/ВремяДок/ВидОперации/Контрагент/Артикул/Номенклатура­/Цена/Скидка/Кол-во/Сумма и итоги.(ВидОперации : РелизацияРозница и ВозвратОтПокупателя. Приход не включать.)

После редактирования выше запроса что неполучилось:
1)время документа неверное показывает (00:00:19)у всех одинаковое!
2)ВидОперации по продаже показывает, по ВозвратуОтПокупателя пустая строка?
3)Одна лишняя строка остается кот. показывает итоги по документу (получается группировкой по документу).
4)Надо кол-во и Сумму по возвратуОтПокупателя как-то со знаком минус сделать, а то Итоги неверные получаются.
Листинг:

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

// Подготовка к заполнению выходных форм данными запроса
Таб = СоздатьОбъект("Таблица");
Таб.ИсходнаяТаблица("Сформировать");
// Заполнение полей "Заголовок"
Таб.ВывестиСекцию("Заголовок");
Состояние("Заполнение выходной таблицы...");
Таб.Опции(0, 0, Таб.ВысотаТаблицы(), 0);
Пока Запрос.Группировка(1) = 1 Цикл
Пока Запрос.Группировка(2) = 1 Цикл
// Заполнение полей ТекущийДокумент
Таб.ВывестиСекцию("ТекущийДокумент");
// Заполнение полей Номенклатура
Таб.ВывестиСекцию("Номенклатура");
КонецЦикла;
КонецЦикла;
// Заполнение полей "Итого"
Таб.ВывестиСекцию("Итого");
Таб.ВывестиСекцию("Итого1");
// Вывод заполненной формы
Таб.ТолькоПросмотр(1);
Таб.Показать("Сформировать", "");
КонецПроцедуры

led Написал:
-------------------------------------------------------
> После редактирования выше запроса что
> неполучилось:
> 1)время документа неверное показывает (00:00:19)у
> всех одинаковое!
Должно быть правильное :-/ Или попробуй воспользоваться методом для документа ПолучитьВремя();

> 2)ВидОперации по продаже показывает, по
> ВозвратуОтПокупателя пустая строка?
Посмотри в отладчике значение у документа реквизита КодОперации при возврате.

> 3)Одна лишняя строка остается кот. показывает
> итоги по документу (получается группировкой по
> документу).
Ну так не выводи её раз лишняя и всё, т.е. убери строку
Таб.ВывестиСекцию("ТекущийДокумент");
или выводи её только при первом обходе этой группировки(установив счётчик обхода)

> 4)Надо кол-во и Сумму по возвратуОтПокупателя
> как-то со знаком минус сделать, а то Итоги
> неверные получаются.
Если перебираешь суммы по документам реализации и возврата, в модуле так и пропиши:

Сумма=Запрос.СуммаСумма;
Если Запрос.ТекущийДокумент.Вид()="ВозвратОтПокупателя" тогда
Сумма=-Запрос.СуммаСумма ;
КонецЕсли;
И в таблице исправь Запрос.СуммаСумма на Сумма

А итоги считай уже вручную,
СуммаИтого=СуммаИтого+Сумма;
т.е.
СуммаИтого=0;
Пока Запрос.Группировка(1) = 1 Цикл
Пока Запрос.Группировка(2) = 1 Цикл
Сумма=Запрос.СуммаСумма;
Если Запрос.ТекущийДокумент.Вид()="ВозвратОтПокупателя" тогда
Сумма=-Запрос.СуммаСумма ;
КонецЕсли;
СуммаИтого=СуммаИтого+Сумма;
Таб.ВывестиСекцию("Номенклатура");
КонецЦикла;
КонецЦикла;

> // выводятся остатки
> |Количество1 = Регистр.ОстаткиТМЦ.Количество;
> |Функция КоличествоНачОст = НачОст(Количество1);
> |Функция КоличествоКонОст = КонОст(Количество1);
А это тебе зачем?

Vladko Написал:
> > 4)Надо кол-во и Сумму по
> возвратуОтПокупателя
> > как-то со знаком минус сделать, а то Итоги
> > неверные получаются.
> Если перебираешь суммы по документам реализации и
> возврата, в модуле так и пропиши:
>
> А итоги считай уже вручную,
> СуммаИтого=СуммаИтого+Сумма;
> т.е.
> СуммаИтого=0;
> Пока Запрос.Группировка(1) = 1 Цикл
> Пока Запрос.Группировка(2) = 1 Цикл
> Сумма=Запрос.СуммаСумма;
> Если
> Запрос.ТекущийДокумент.Вид()="ВозвратОтПокупателя"
> тогда
> Сумма=-Запрос.СуммаСумма ;
> КонецЕсли;
> СуммаИтого=СуммаИтого+Сумма;
> Таб.ВывестиСекцию("Номенклатура");
> КонецЦикла;
> КонецЦикла;
>
Зачем так сложно? Ведь в первоначальном запросе было две переменных: СуммаСумма - продажи, СуммаВСумма - возвраты.

Соответсвенно СуммаИтого = Запрос.СуммаСумма - Запрос.СуммаВСумма