|
Обращение к ТЧ элемента, через COM-соединение
| ☑ |
0
_Дайвер_
17.07.17
✎
11:07
|
Для Каждого ТекСтрока ИЗ Объект.ДанныеВыгрузкиКонтрагенты Цикл
ТекСтрока.СоответствиеНайдено = НайтиСоответствияВБазеПриемнике(ТекСтрока.ИНН, ТекСтрока.КПП);//, ТекСтрока.КОД);
Если ТекСтрока.СоответствиеНайдено Тогда
Сообщить("Для " + ТекСтрока.Ссылка + " найдено соответствие в базе приемнике!!!");
Продолжить;
Иначе
Контрагент = Соединение.Справочники.Контрагенты.СоздатьЭлемент();
Контрагент.ПометкаУдаления = ТекСтрока.ПометкаУдаления;
Контрагент.Код = ТекСтрока.Код;
Контрагент.ИНН = ТекСтрока.ИНН;
Контрагент.КодПоОКПО = ТекСтрока.КодПоОКПО;
Контрагент.КПП = ТекСтрока.КПП;
Контрагент.НаименованиеПолное = ТекСтрока.НаименованиеПолное;
Контрагент.КонтактнаяИнформация.АдресЭП = ТекСтрока.АдресЭП; // Как обратиться к ТЧ "КонтактнаяИнформация" элемента?
Контрагент.Наименование = ТекСтрока.Наименование;
Контрагент.КПП = ТекСтрока.КПП;
Контрагент.Записать();
Сообщить("Контрагент " + ТекСтрока.Ссылка + " перенесен!");
КонецЕсли;
КонецЦикла;
|
|
1
zvial
17.07.17
✎
11:09
|
Контрагент.КонтактнаяИнформация.Добавить().АдресЭП = ТекСтрока.АдресЭП
|
|
2
butterbean
17.07.17
✎
11:10
|
(1) убил бы
|
|
3
_Дайвер_
17.07.17
✎
11:11
|
(1) Спасибо, друг)
|
|
4
_Дайвер_
17.07.17
✎
11:12
|
(2) Не обижайся) Понедельник день тяжелый xD
|
|
5
lodger
17.07.17
✎
11:14
|
(3) если осознаешь, что в КИ надо и остальные поля заполнить, тогда:
НоваяСтрокаКИ = Контрагент.КонтактнаяИнформация.Добавить();
НоваяСтрокаКИ.АдресЭП = ТекСтрока.АдресЭП;
НоваяСтрокаКИ.ЕщеКакойТоРеквизит = ТекСтрока.КакойТоРеквизит;
|
|