Как вывести отчет с реализациями, с последовательностью по номерам реализаций?

1. nutmeg 18.05.07 14:27 Сейчас в теме
Народ помогите вывести отчет с реализациями, с последовательностью по номерам реализаций ?
Ответы
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
3. programmist 18.05.07 14:57 Сейчас в теме
Вот текст процедуры, которая выводит документы Реализация, отсортированные по номерам, с суммами.

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

// Подготовка к заполнению выходных форм данными запроса
Таб = СоздатьОбъект("Таблица");
Таб.ИсходнаяТаблица("Сформировать");
// Заполнение полей "Заголовок"
Таб.ВывестиСекцию("Заголовок");
Состояние("Заполнение выходной таблицы...");
Таб.Опции(0, 0, Таб.ВысотаТаблицы(), 0);
Пока Запрос.Группировка(1) = 1 Цикл
// Заполнение полей ТекущийДокумент
Таб.ВывестиСекцию("ТекущийДокумент");
КонецЦикла;
// Заполнение полей "Итого"
Таб.ВывестиСекцию("Итого");
// Вывод заполненной формы
Таб.ТолькоПросмотр(1);
Таб.Показать("Сформировать", "");
КонецПроцедуры
2. programmist 18.05.07 14:53 Сейчас в теме
Последовательность тебе нужна по номерам накладных?
4. nutmeg 18.05.07 15:02 Сейчас в теме
5. programmist 18.05.07 15:05 Сейчас в теме
Если не разберешься с таблицей, могу выслать обработку.

nutmeg Написал:
-------------------------------------------------------
> Спасибо большое!


6. nutmeg 18.05.07 15:12 Сейчас в теме
Необрабатывает :))


Переменная не определена (ВыбНачПериода) Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда {Обработка.Отчет_по_продажам.Форма.Модуль(17)}: Период с <<?>> ВыбНачПериода по ВыбКонПериода; Запрос[2] : Ошибка в выражении 'ВыбНачПериода' ВыбКонПериода<<?>> Переменная не определена (ВыбКонПериода) Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда {Обработка.Отчет_по_продажам.Форма.Модуль(17)}: Период с ВыбНачПериода по <<?>> ВыбКонПериода; Запрос[2] : Ошибка в выражении 'ВыбКонПериода'
7. programmist 18.05.07 15:15 Сейчас в теме
Лови

nutmeg Написал:
-------------------------------------------------------
> Необрабатывает )
>
>
> Переменная не определена (ВыбНачПериода) Если
> Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
> {Обработка.Отчет_по_продажам.Форма.Модуль(17)}:
> Период с <<?>> ВыбНачПериода по
> ВыбКонПериода; Запрос[2] : Ошибка в выражении
> 'ВыбНачПериода' ВыбКонПериода<<?>>
> Переменная не определена (ВыбКонПериода) Если
> Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
> {Обработка.Отчет_по_продажам.Форма.Модуль(17)}:
> Период с ВыбНачПериода по <<?>>
> ВыбКонПериода; Запрос[2] : Ошибка в выражении
> 'ВыбКонПериода'


Прикрепленные файлы:
12345.rar
8. nutmeg 18.05.07 15:21 Сейчас в теме
9. CheBurator 2684 20.05.07 19:33 Сейчас в теме
Учимся использовать то что под рукой.
1. формируем отчет "реестр документов", сохраняем в эксель и сортируем по нужному признаку.
2. если такого отчета нет - пользуемся набором универсальных отчетов с диска ИТС и получаем аналогичный отчет
Оставьте свое сообщение

Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот