Форум на Kuban.ru (http://forums.kuban.ru/)
-   Территория 1С (http://forums.kuban.ru/f1040/)
-   -   Таблица в Управляемой форме - выгрузить ТЗ с "заголовком" (http://forums.kuban.ru/f1040/tablica_v_upravlyaemoj_forme_-_vygruzit-_tz_s_zagolovkom-2882713.html)

Mugger 30.07.2012 11:56

Таблица в Управляемой форме - выгрузить ТЗ с "заголовком"
 
Добрый день.

Подскажите пожалуйста.
Есть управляемая форма, на ней элемент "Таблица1", связанный с реквизитом "ТЗДанных".

Делаю вывод данных в "ТЗДанных", указывая имя и заголовок.
На форме всё выводиться верно. (Заголовки точно загрузились)

После этого делаю:

&НаСервере
...
ФинальнаяТаблица2=ДанныеФормыВЗначение(ТЗДанных, Тип("ТаблицаЗначений"));
...


В "ФинальнаяТаблица2" не выгружают "Заголовок" колонок. Только "Имя".
(В "Заголовок" пустое значение)

Вопрос: Что делаю не так, и как вытащить "Заголовок" из таблицы с формы или из реквизита от этой таблицы.

Спасибо.

p etrovich 30.07.2012 12:52

а зачем на сервере заголовки колонок?

Uho 30.07.2012 14:24

нужна ли вообще ТЗ?

Mugger 31.07.2012 13:40

p etrovich

Далее я используя шаблон, красиво вывожу на печать данные.

Uho, порекомендуйте другой вариант. Мне нужно из экранной таблицы управляемой формы взять данные, оформить их по шаблону, и вывести на печать в виде отчёта.

Lexusss 31.07.2012 14:02

Читал, читал... - нечего не понял. Опиши человеческим 1Сным языком, какие типы к чему ты приводишь.

Mugger 31.07.2012 17:03

Lexusss,

Задача:

Взять из таблицы в управляемой форме, все данные, включая названия колонок и отправить на принтер, применив шаблон для форматирования выводимых/печатемых данных.

Uho 01.08.2012 08:54

данные в ТЗДанных как попадают?

Mugger 01.08.2012 10:56

два запроса с учётом фильтров с формы+спец.алгоритм(несколько циклов)=загрузка данных в ТЗДанных

Теоритически я могу ещё раз прогнать этоти запросы+обработка. Но это не технично, когда уже есть данные на экране и их нужно просто распечатать с бантиком.

Mugger 01.08.2012 12:40

ИдКоллекции="ТЗДанных";
КоллФормы=РеквизитФормыВЗначение(ИдКоллекции);
Для каждого ТекКол из КоллФормы.Колонки Цикл
МассивУдаляемыхРеквизитов.Добавить(ИдКоллекции+"."+ТекКол.Имя);
КонецЦикла;

Для каждого ТекКол из ТЗнач.Колонки Цикл
МассивДобавляемыхРеквизитов.Добавить(Новый РеквизитФормы(ТекКол.Имя,ТекКол.ТипЗначения,ИдКоллекции));
КонецЦикла;

ЭтаФорма.ИзменитьРеквизиты(МассивДобавляемыхРеквизитов,МассивУдаляемыхРеквизитов);
ЗначениеВРеквизитФормы(ТЗнач,ИдКоллекции);

Mugger 01.08.2012 15:31

Решение найдено.
Всем спасибо за помощь....

[em] ФинальнаяТаблица2=ДанныеФормыВЗначение(ТЗДанных, Тип("ТаблицаЗначений"));

ИдКоллекции="ТЗДанных";
ИдТаблицы="ТабПолеПредвДанных";
Для каждого ТекКол из ФинальнаяТаблица2.Колонки Цикл
Если НЕ ПустаяСтрока(Элементы.Найти(ИдТаблицы+ТекКол.Имя).Заголовок) тогда
ТекКол.Заголовок=Элементы.Найти(ИдТаблицы+ТекКол.Имя).Заголовок;
КонецЕсли;
КонецЦикла;[/em]


Текущее время: 13:47. Часовой пояс GMT +3.