Имя: Пароль:
1C
1С v8
Динамическое создание колонок в табличном поле
, ,
0 asder117
 
15.05.19
22:29
Доброго времени суток. Битый час борюсь понять не могу как сделать. Есть табличное поле. Пытаюсь создать колонки по датам. колонки создаются но значения туда никак вставить не могу
Пока ВыборкаСумм.Следующий() цикл
    //////создание колонок в таблице итогов
    ИмяКолонки      = СтрЗаменить(Строка(Формат(ВыборкаСумм.ДатаИсполненияЗаказа,"ДЛФ=Д")),".","_");
    Сообщить("На"+ИмяКолонки + " "+ВыборкаСумм.Регион); ///Для проверки
    КвалификаторыЧисла  = Новый КвалификаторыЧисла(20, 5, ДопустимыйЗнак.Любой);
    Массив = Новый Массив;
    Массив.Добавить(Тип("Число"));
    ЧисловойТип = Новый ОписаниеТипов(Массив, , , КвалификаторыЧисла);
    //////
    Если СводнаяТаблица.Колонки.Найти("На"+ИмяКолонки) <> Неопределено Тогда
        Сообщить("Колонка "+ИмяКолонки+" существует.");
        ЭлементыФормы.СводнаяТаблица.СоздатьКолонки();
        //СводнаяТаблица.Колонки["На"+ИмяКолонки].Значение = ВыборкаСумм.СуммаОстатка; тут выдает ошибку
    иначе
        СводнаяТаблица.Колонки.Добавить("На"+ИмяКолонки,ЧисловойТип);
        ЭлементыФормы.СводнаяТаблица.СоздатьКолонки();
        //СводнаяТаблица.Колонки["На"+ИмяКолонки].Значение = ВыборкаСумм.СуммаОстатка; тут выдает ошибку
    КонецЕсли;

Прошу посоветовать что лучше и как сделать. Заранее спасибо.
1 Garykom
 
гуру
15.05.19
22:36
1С 8.0 да?
2 asder117
 
15.05.19
22:37
8.2 конфа УПП (забыл написать...звиняйте)
3 Garykom
 
гуру
15.05.19
22:41
>значения туда никак вставить не могу

Значения надо в саму ТЗ писать это ведь логично и понятно да?
А данные из ТЗ уже сами будут на форме отображаться
4 Garykom
 
гуру
15.05.19
22:41
>Есть табличное поле

Оно с чем связано?
5 asder117
 
15.05.19
22:47
(3) понятно. (4) ни с чем.
6 Garykom
 
гуру
15.05.19
22:48
(5) Значит там автоматом создается ТЗ в реквизитах, привязанная к полю.
7 asder117
 
15.05.19
22:50
(6) Да есть такое
8 asder117
 
15.05.19
22:51
как в нее значения встваить не пойму...или просто заработался
9 Garykom
 
гуру
15.05.19
22:51
НовСтр = ЭтотОбъект.ТвоеИмяТабличногоПоля.Добавить()
НовСтр[ИмяКолонки] = "Тута?"

как то оно так, точно уже не помню сча больше под УФ пишу
10 asder117
 
15.05.19
22:52
(9) я тоже с УФ больше работаю. и там проблем нет..а тут упп попалась
11 asder117
 
15.05.19
23:08
(9) спасибо. ступил. все взлетело