|
Заполнить табличную часть. Программно. |
☑ |
0
applesound
31.12.19
✎
13:26
|
Добрый день.
Необходимо заполнить табличную часть спрвочника Партнеры.КонтактнаяИнформация.
Часть реквизитов заполнено: Ссылка, НомерСтроки, Тип, Вид, Представление, ЗначенияПолей
Часть реквизитов не заполнено: НомерТелефона, НомерТелефонаБезКодов
Необходимо на основании заполненного поля Представление дозаполнить поля НомерТелефона и НомерТелефонаБезКодов
Создана Подписка на событие / СправочникОбъект.Партнеры / ПередЗаписью
Процедура в общем модуле. При записи отладчиком попадаю в процедуру. Всё остальное не работает.
Процедура ПартнерПередЗаписьюПроверитьДополнитьКИПередЗаписью(Объект, Отказ) Экспорт
// Вставить содержимое обработчика.
ДляОтладки = Истина;
Таблица = Объект.КонтактнаяИнформация.Добавить();
Таблица.Колонки.Добавить("НомерТелефона");
Таблица.Колонки.Добавить("НомерТелефонаБезКодов");
Для каждого Строка Из Таблица Цикл
Строка.НомерТелефона = Объект.КонтактнаяИнформация.Представление;
Сообщить(Строка.НомерТелена);
Строка.НомерТелефонаБезКодов = Объект.КонтактнаяИнформация.Представление;
Сообщить(Строка.НомерТелефонаБезКодов);
КонецЦикла;
КонецПроцедуры
|
|
1
Ёпрст
гуру
31.12.19
✎
13:30
|
(0)
Таблица.Колонки.Добавить("НомерТелефона"); //это конечно, полный ПЭ ..подумайте, что вы пишите
Таблица.Колонки.Добавить("НомерТелефонаБезКодов");
|
|
2
Amra
31.12.19
✎
13:36
|
(1) То, что Таблица это не ТЗ, а строка ТЧ, не смущает?
(0) Код выкинуть. Весь. Совсем. Подумать. Написать
|
|
3
polosov
31.12.19
✎
13:41
|
(0) Используй процедуры и функции модулей УправлениеКонтактнойИнформацией*
|
|
4
applesound
31.12.19
✎
13:48
|
Текс процедуры смущает - даже очень как смущает.
Открыл Общие модули УправлениеКонтактнойИнформацией - направьте, что именно искать.
|
|
5
polosov
31.12.19
✎
13:53
|
(4) Все что начинается с Заполнить*
|
|
6
applesound
31.12.19
✎
14:01
|
Таблица = Объект.КонтактнаяИнформация.Заполнить();
Верно? Добавить возвращает новую строку табличной части
|
|
7
polosov
31.12.19
✎
14:05
|
(6)
|
|
8
applesound
14.01.20
✎
12:21
|
Вопрос закрыт, решений найдено.
Решение:
Для каждого ТекСтрока из Объект.КонтактнаяИнформация Цикл
ТекСтрока.НомерТелефона = ТекСтрока.Представление;
ТекСтрока.НомерТелефонаБезКодов = ТекСтрока.Представление
КонецЦикла;
|
|