Имя: Пароль:
1C
1С v8
Вывесте отчет СКД в табличный документ на форме списка документа
0 MadHead
 
23.04.12
10:37
Требуется вывести Структуру подчиненности документа в форму списка документа. Структура получаю в СКД. Не получается подсунуть именно нужный табличный документ . Вот код

&НаКлиенте
Процедура ЖурналСчетовПриАктивизацииСтроки(Элемент)
   ТекЗаказ = Элементы.ЖурналСчетов.ТекущаяСтрока;
   
   Если ТекЗаказ <> Неопределено Тогда
       ПоказатьСтруктуруПодчиненности(ТекЗаказ);
   КонецЕсли;
КонецПроцедуры

&НасервереБезКонтекста
Процедура ПоказатьСтруктуруПодчиненности(ТекЗаказ) Экспорт
   СхемаКомпоновкиДанных = Обработки.СписокМенеджеров.ПолучитьМакет("Макет");    
   //Из схемы возьмем настройки по умолчанию
   Настройки = СхемаКомпоновкиДанных.НастройкиПоУмолчанию;    
   
   пЗаказ = Настройки.ПараметрыДанных.НайтиЗначениеПараметра(Новый ПараметрКомпоновкиДанных("Заказ"));
   пЗаказ.Значение        = ТекЗаказ;
   пЗаказ.Использование    = Истина;

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

Все процедуры в модуле управляемой формы
1 MadHead
 
23.04.12
10:49
и все же...
2 le_
 
23.04.12
10:49
Можно так:

На клиенте:
Процедура ЖурналСчетовПриАктивизацииСтроки(Элемент)
   ТабДокНаФорме = ПоказатьСтруктуруПодчиненности(Заказ);
КонецПроцедуры


На сервере:
Функция ПоказатьСтруктуруПодчиненности(ТекЗаказ)
   ТабДок = Новый ТабличныйДокумент;
   ....
   Возврат ТабДок;
КонецФункции
3 MadHead
 
23.04.12
11:00
(2) Но у меня прямо на форме списка документов уже есть табличный документ. Табличный документ - это реквизит формы.
4 le_
 
23.04.12
11:04
(3) Ну, передавай его тогда вторым параметром...
5 MadHead
 
23.04.12
11:09
(4) Жесть. Я в пятницу так пробовал вродже ругалось что нельзя значения передавать такие. Виддимо по конец дня тупил. спасибо
Пользователь не знает, чего он хочет, пока не увидит то, что он получил. Эдвард Йодан