Имя: Пароль:
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) Жесть. Я в пятницу так пробовал вродже ругалось что нельзя значения передавать такие. Виддимо по конец дня тупил. спасибо
Программист всегда исправляет последнюю ошибку.