Имя: Пароль:
1C
 
Вывод в табличный документ (управляемые формы)
0 R1A1
 
05.05.11
13:16
Пытаюсь вывести в табличный документ примитивный макет.

&НаСервере
Процедура ВыводВФорму()

Макет = Отчеты.Отчет3.ПолучитьМакет("МакетОтчета");    
ОбластьЗаголовок = Макет.ПолучитьОбласть("ШапкаОтчета");        
ТабДок=Новый ТабличныйДокумент;    
ТабДок.Вывести(ОбластьЗаголовок);
ТабДок.ОтображатьСетку = Ложь;
ТабДок.Защита = Ложь;
ТабДок.ТолькоПросмотр = Истина;
ТабДок.ОтображатьЗаголовки = Ложь;
ТабДок.Показать();

КонецПроцедуры

&НаКлиенте
Процедура Сформировать(Команда)
    ВыводВФорму();
КонецПроцедуры

Ошибок не пишет, но ничего и не выводит. Если создать реквизит на форме, то в него все прекрасно выводится:
Макет = Отчеты.Отчет3.ПолучитьМакет("МакетОтчета");
ТабличныйДокумент.Очистить();        
ОбластьЗаголовок = Макет.ПолучитьОбласть("ШапкаОтчета");
ТабличныйДокумент.Вывести(ОбластьЗаголовок);

Как правильно вывести в печатную форму макет?
1 Cube
 
05.05.11
13:20
Так?

&НаСервере
Функция ВыводВФорму()

Макет = Отчеты.Отчет3.ПолучитьМакет("МакетОтчета");    
ОбластьЗаголовок = Макет.ПолучитьОбласть("ШапкаОтчета");        
ТабДок=Новый ТабличныйДокумент;    
ТабДок.Вывести(ОбластьЗаголовок);
ТабДок.ОтображатьСетку = Ложь;
ТабДок.Защита = Ложь;
ТабДок.ТолькоПросмотр = Истина;
ТабДок.ОтображатьЗаголовки = Ложь;

КонецПроцедуры

&НаКлиенте
Процедура Сформировать(Команда)
    ВыводВФорму().Показать();
КонецПроцедуры
2 Seducer
 
05.05.11
13:20
>ТабДок.Показать();

И кому ты собрался показывать табличный документ? Серверу?  :)
3 Cube
 
05.05.11
13:21
+(1) КонецФункции забыл написать... Эх...
4 R1A1
 
05.05.11
13:24
(1) Значение не является значением объектного типа (Показать)
    ВыводВФорму().Показать();
5 R1A1
 
05.05.11
13:25
Скорее так
Возврат ТабДок;
6 Cube
 
05.05.11
13:27
(5) Ну я направление указал...
7 R1A1
 
05.05.11
13:27
(1)(2) Спасибо. Так работает.
&НаСервере
Функция ВыводВФорму()

Макет = Отчеты.Отчет3.ПолучитьМакет("МакетОтчета");    
ОбластьЗаголовок = Макет.ПолучитьОбласть("ШапкаОтчета");        
ТабДок=Новый ТабличныйДокумент;    
ТабДок.Вывести(ОбластьЗаголовок);
ТабДок.ОтображатьСетку = Ложь;
ТабДок.Защита = Ложь;
ТабДок.ТолькоПросмотр = Истина;
ТабДок.ОтображатьЗаголовки = Ложь;

Возврат ТабДок;
КонецФункции

Процедура Сформировать(Команда)
    ВыводВФорму().Показать();
КонецПроцедуры
2 + 2 = 3.9999999999999999999999999999999...