Показано с 1 по 2 из 2
Тема: 1с 8.2 Создание отчёта !
-
04.04.2013, 20:13 #1
- Регистрация
- 04.04.2013
- Сообщений
- 2
- Сказал(а) спасибо
- 0
- Поблагодарили 0 раз(а) в 0 сообщениях
1с 8.2 Создание отчёта !
Мне необходимо создать отчет «Список документов», который должен:
1)формировать список документов «Приходная накладная» введенные в информационную базу за определенный интервал времени, список документов должен быть отсортирован по их дате;
2)я должен иметь возможность указать не только период, но и из списка (который будет содержать весь список документов конфигурации) выбрать интересующий меня тип документа. Отчет формировать по выбранному типу документа;
У меня создано 4 документа: ПриходнаяНакладная, РасходнаяНакладная, ПеремещениеТоваров, РасходныйКассовыйОрдер...
В общем я сделал 1 пункт , а вот 2 не могу ... Подскажите как его сделать... Заранее спс
-
06.04.2013, 01:59 #2
- Регистрация
- 05.01.2012
- Сообщений
- 23
- Сказал(а) спасибо
- 21
- Поблагодарили 5 раз(а) в 3 сообщениях
Собирайте отчет на СКД вручную, в запрос программно подставляйте имя таблицы.
что-то наподобии:
Функция ПечатьДокумента()
ДокументОбъект = РеквизитФормыВЗначение("Об ъект");
Запрос = Новый Запрос;
Запрос.Текст = "ВЫБРАТЬ
| СборкаКомпьютера.Дата,
| СборкаКомпьютера.Номер,
| СборкаКомпьютера.Мастер,
| СборкаКомпьютера.Продукци� � КАК СистемныйБлок,
| СборкаКомпьютера.Склад
|ИЗ
| Документ.СборкаКомпьютера КАК СборкаКомпьютера
|ГДЕ
| СборкаКомпьютера.Ссылка = &Ссылка";
Запрос.УстановитьПараметр( "Ссылка", ДокументОбъект.Ссылка);
Результат = Запрос.Выполнить();
ШапкаДок = Результат.Выгрузить();
ВнешниеНаборыДанных = Новый Структура();
ВнешниеНаборыДанных.Встав� �ть("СоставСБ", ДокументОбъект.ПереченьНо� �енклатуры);
ВнешниеНаборыДанных.Встав� �ть("ДокументСБ", ШапкаДок);
СхемаКомпоновкиДанных = ДокументОбъект.ПолучитьМа� �ет("Макет");
Настройки = СхемаКомпоновкиДанных.Нас� �ройкиПоУмолчанию;
КомпоновщикМакета = Новый КомпоновщикМакетаКомпонов киДанных;
МакетКомпоновки = КомпоновщикМакета.Выполни� �ь(СхемаКомпоновкиДанных, Настройки);
ПроцессорКомпоновкиДанных = Новый ПроцессорКомпоновкиДанных ;
ПроцессорКомпоновкиДанных .Инициализировать(МакетКом поновки, ВнешниеНаборыДанных);
ДокументРезультат = Новый ТабличныйДокумент;
ПроцессорВывода = Новый ПроцессорВыводаРезультата КомпоновкиДанныхВТабличны йДокумент;
ПроцессорВывода.Установит� �Документ(ДокументРезульта т);
ПроцессорВывода.Вывести(Пр оцессорКомпоновкиДанных);
Возврат ДокументРезультат;
КонецФункции[COLOR="Silver"]
Социальные закладки