Имя: Пароль:
1C
1С v8
Несколько отчетов СКД один под другим
,
0 pavvlyk
 
06.11.12
19:23
Подскажите как реализовать. Есть справочник в котором есть табличная часть в которой идет перечень макетов скд которые нужны данному контрагенту например.(Сами макеты тоже создаем у этого же справочника).
Нужно создать отчет в котором мы выбираем контрагента и он автоматически формирует подряд один под другим несколько отчетов, смотря сколько у данного контрагента их в справочнике выбрано.
Как это можно реализовать? Создаем отчет на скд и там в процедуре "ПриКомпановкеРезультата" что-то делаем? Или как? Заранее спасибо.
1 alex-pro
 
06.11.12
19:25
Ну, в СКД на закладке Настройки сколько хочешь видов отчетов можешь наклепать
2 pavvlyk
 
07.11.12
01:28
Нет нужно программно. Пытаюсь как то так. Не получается.

     ТабДок = Новый ТабличныйДокумент;
   ТабДок1 = Новый ТабличныйДокумент;

   Схема = Отчеты.Прайс2.ПолучитьМакет("ОсновнаяСхемаКомпоновкиДанных");
   Настройки = Схема.НастройкиПоУмолчанию;
   
   Параметр = Настройки.ПараметрыДанных.НайтиЗначениеПараметра(Новый ПараметрКомпоновкиДанных("Период"));
   
   Если Параметр <> Неопределено Тогда
       Параметр.Значение = ТекущаяДата();
       Параметр.Использование = Истина;
   КонецЕсли;
   
   КомпоновщикМакета = Новый КомпоновщикМакетаКомпоновкиДанных;
   
   Макет = КомпоновщикМакета.Выполнить(Схема,Настройки);
   
   ПроцессорКомпоновки = Новый ПроцессорКомпоновкиДанных;
   ПроцессорКомпоновки.Инициализировать(Макет);
   
   ПроцессорВывода = Новый ПроцессорВыводаРезультатаКомпоновкиДанныхВТабличныйДокумент;

   ПроцессорВывода.УстановитьДокумент(ТабДок);
   ПроцессорВывода.Вывести(ПроцессорКомпоновки);
  /////////////////////////////////////////////////////
   Схема1 = Отчеты.Прайс3.ПолучитьМакет("ОсновнаяСхемаКомпоновкиДанных");
   Настройки1 = Схема1.НастройкиПоУмолчанию;
   
   Параметр1 = Настройки1.ПараметрыДанных.НайтиЗначениеПараметра(Новый ПараметрКомпоновкиДанных("Период"));
   
   Если Параметр1 <> Неопределено Тогда
       Параметр1.Значение = ТекущаяДата();
       Параметр1.Использование = Истина;
   КонецЕсли;
   
   КомпоновщикМакета1 = Новый КомпоновщикМакетаКомпоновкиДанных;
   Макет1 = КомпоновщикМакета1.Выполнить(Схема1,Настройки1);
   ПроцессорКомпоновки1 = Новый ПроцессорКомпоновкиДанных;
   ПроцессорКомпоновки1.Инициализировать(Макет1);
   
   ПроцессорВывода1 = Новый ПроцессорВыводаРезультатаКомпоновкиДанныхВТабличныйДокумент;
   ПроцессорВывода1.УстановитьДокумент(ТабДок1);
   ПроцессорВывода1.Вывести(ПроцессорКомпоновки1);
   
   
   ТабДок.Присоединить(ТабДок1);
   
   Возврат ТабДок;
3 pavvlyk
 
07.11.12
01:29
Ээээ не то скопировал. Присоединить это не то. =)
Ну в общем если все выводить в один ТабДок все равно не получается. В чем косяк?
4 pavvlyk
 
07.11.12
01:49
(0) пока можно не читать В данный момент проблема именно с выводом нескольких отчетов один под другим.
5 perec1982
 
07.11.12
01:59
Нужно присоеденять результат в отдельный Табличный документ
Ошибка? Это не ошибка, это системная функция.