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

11.12.17

Интеграция - Файловый обмен (TXT, XML, DBF), FTP

Довольно часто встречается задача выгрузить при помощи «Конвертация данных, редакция 2.1» контактной информации контрагента из «Управление торговлей", редакция 10.3» в «Бухгалтерия предприятия, редакция 3.0». Сложность заключается в том, что в УТ контактная информация хранится в регистре сведений, а в БП - в табличной части справочника «Контрагенты». Предлагаю мое, достаточно простое, решение данной задачи.

Довольно часто встречается задача выгрузить при помощи «Конвертация данных, редакция 2.1» контактной информации контрагента из «Управление торговлей", редакция 10.3» в «Бухгалтерия предприятия, редакция 3.0». Сложность заключается в том, что в УТ контактная информация хранится в регистре сведений, а в БП - в табличной части справочника «Контрагенты».

Предлагаю мое, достаточно простое, решение данной задачи.

 

1. В правило конвертации объектов (ПКО) «Контрагенты» добавляем конвертацию свойств (ПКС) табличной части «КонтактнаяИнформация», причем не указываем источник и ставим галку «получать из входящих данных». Добавляем все, необходимые реквизиты табличной части.

1

 

2. Открываем ПКО «Контрагенты» и добавляем ниже следующий код в обработчик «Перед выгрузкой».

2


 

//Выгружаем контактную информацию контрагента

ВходящиеДанные = Новый Структура("КонтактнаяИнформация");
ВходящиеДанные.КонтактнаяИнформация = Новый ТаблицаЗначений;
ВходящиеДанные.КонтактнаяИнформация.Колонки.Добавить("Представление");
ВходящиеДанные.КонтактнаяИнформация.Колонки.Добавить("Вид");
ВходящиеДанные.КонтактнаяИнформация.Колонки.Добавить("Тип");

Запрос = Новый Запрос;
Запрос.Текст =
    "ВЫБРАТЬ
    |    КонтактнаяИнформация.Представление,
    |    КонтактнаяИнформация.Вид,
    |    КонтактнаяИнформация.Тип
    |ИЗ
    |    РегистрСведений.КонтактнаяИнформация КАК КонтактнаяИнформация
    |ГДЕ
    |    КонтактнаяИнформация.Объект = &ТекущийКонтрагент";

Запрос.УстановитьПараметр("ТекущийКонтрагент", Источник);
Выборка = Запрос.Выполнить().Выбрать();

Пока Выборка.Следующий() Цикл
    НовСтрока = ВходящиеДанные.КонтактнаяИнформация.Добавить();
    ЗаполнитьЗначенияСвойств(НовСтрока, Выборка);
КонецЦикла;

Суть в том, что мы программно создаем табличную часть «Контактная информация» и подставляем ее для выгружаемого объекта в качестве входящих данных.

Следует обратить внимание, что инициализация параметра «ВходящиеДанные», и передача в него таблицы значений со всеми необходимыми колонками, обязательна для каждого объекта. В противном случае, будет возникать ошибка типа «Ошибка получения свойства подчиненного объекта из входящих данных».

конвертация данных контактная информация

См. также

SALE! 10%

Перенос данных 1C Файловый обмен (TXT, XML, DBF), FTP Системный администратор Программист Платформа 1С v8.3 1С:Розница 2 1С:Управление нашей фирмой 1.6 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х 1С:Управление нашей фирмой 3.0 1С:Розница 3.0 Россия Платные (руб)

Правила в универсальном формате обмена для ERP 2.5, КА 2.5, УТ 11.5, БП 3.0, Розница, УНФ, для последних версий конфигураций. Ссылки на другие конфигурации в описании публикации. Правила совместимы со всеми другими версиями конфигураций новыми и старыми, поддерживающими обмен и синхронизацию в формате EnterpriseData. Не требуется синхронного обновления правил после обновления другой конфигурации, участвующей в обмене. Типовой обмен через планы обмена кнопкой Синхронизация вручную или автоматически по расписанию, или вручную обработкой.

25080 руб.

12.06.2017    138148    761    292    

404

Перенос данных 1C Файловый обмен (TXT, XML, DBF), FTP Программист Платформа 1С v8.3 1С:Управление производственным предприятием 1С:ERP Управление предприятием 2 Бухгалтерский учет Управленческий учет Платные (руб)

Переход и перенос данных из 1С:Управление производственным предприятием 1.3 в 1С:ERP Управление предприятием 2.5 и 1С:Комплексную автоматизацию 2.5 с помощью правил обмена. Переносятся остатки, документы (обороты за период), справочная информация. Правила проверены на конфигурациях УПП 1.3 (1.3.227.x), ERP 2.5 (2.5.16.x), КА 2.5 (2.5.16.x) .

28000 руб.

24.06.2020    62369    51    27    

81

Перенос данных 1C Файловый обмен (TXT, XML, DBF), FTP Системный администратор Программист Платформа 1С v8.3 1С:Управление производственным предприятием 1С:Бухгалтерия 3.0 Россия Бухгалтерский учет Управленческий учет Платные (руб)

Перенос данных из 1С:Управление производственным предприятием 1.3 в 1С:Бухгалтерия предприятия 3.0 с помощью правил обмена. Переносятся остатки, документы (обороты за период), справочная информация. Правила проверены на конфигурациях УПП 1.3 (1.3.228.x) и БП 3.0 (3.0.154.x). Правила подходят для версии ПРОФ и КОРП.

28000 руб.

15.12.2021    21797    144    40    

104

Перенос данных 1C Файловый обмен (TXT, XML, DBF), FTP Программист Платформа 1С v8.3 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Россия Платные (руб)

Перенос данных из ERP в БП 3 | из КА 2 в БП 3 | из УТ 11 в БП 3 | из ЕРП в БП 3 | В продаже с 2019г. | Воспользовались более 176 предприятий! | Сэкономьте время - используйте готовое решение для перехода! | Перенос разработан в формате КД 2 (правила конвертации данных) | Переносятся все возможные виды документов, начальных остатков и нормативно-справочная информация| Можно опционально выгружать каждую пару "номенклатура+характеристика" как отдельную номенклатуру | Есть выгрузка настроек счетов учета и зарплатных данных из ERP / КА 2 | Можно проверить на вашем сервере перед покупкой, обращайтесь!

45650 руб.

15.04.2019    70378    174    146    

117

Перенос данных 1C Файловый обмен (TXT, XML, DBF), FTP Системный администратор Программист Платформа 1С v8.3 Оперативный учет 1С:Управление торговлей 10 1С:Управление торговлей 11 Россия Управленческий учет Платные (руб)

Перенос данных из 1С:Управление торговлей 10.3 в 1С:Управление торговлей 11.5 с помощью правил обмена. Переносятся остатки, документы (обороты за период), справочная информация. Правила проверены на конфигурациях УТ 10.3.87.x и УТ 11.5.16.x

28000 руб.

23.07.2020    48440    208    64    

170

SALE! %

Перенос данных 1C Взаиморасчеты Оптовая торговля Логистика, склад и ТМЦ Файловый обмен (TXT, XML, DBF), FTP Системный администратор Программист Платформа 1С v8.3 1С:Управление торговлей 10 1С:ERP Управление предприятием 2 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Россия Управленческий учет Платные (руб)

Можно проверить до покупки, оставьте заявку! Воспользовались более 268 компаний! Перенос в продаже с 2015г., и мы постоянно работаем над его развитием. Перенос данных из УТ 10.3 в УТ 11 | из УТ 10.3 в КА 2 | из УТ 10.3 в ERP. Предлагаем качественное и проверенное временем решение для перехода с УТ 10.3. Можно перенести начальные остатки, нормативно-справочную информацию и все возможные документы. При выгрузке можно установить отбор по периоду, организациям и складам. При выходе новых релизов конфигураций 1C оперативно выпускаем обновление переноса данных.

45650 27000 руб.

24.04.2015    192483    142    241    

272

Перенос данных 1C Файловый обмен (TXT, XML, DBF), FTP Системный администратор Программист Платформа 1С v8.3 Платформа 1C v8.2 1С:Комплексная автоматизация 1.х 1С:Управление торговлей 10 1С:Управление производственным предприятием Россия Платные (руб)

Регулярный обмен, выгрузка, перенос из КА 1.1, УПП 1.3, УТ 10.3 для обмена с любыми конфигурациями, поддерживающими обмен в формате EnterpriseData (КД3) - БП 3.0, ERP, КА 2, УТ 11, Розница 2, УНФ 1.6 и другими. Правила для старых и доработанных конфигураций не требуют синхронного обновления и совместимы с новыми и будущими конфигурациями. Обмен по расписанию, через папку, FTP, почту.

14580 руб.

18.02.2016    184534    573    509    

516

Перенос данных 1C Файловый обмен (TXT, XML, DBF), FTP Системный администратор Программист Платформа 1С v8.3 1С:Комплексная автоматизация 1.х 1С:Управление производственным предприятием 1С:Бухгалтерия 3.0 Россия Бухгалтерский учет Платные (руб)

В продаже с 2015 года | Воспользовались более 287 предприятий! | Перенос данных из УПП 1.3 в БП 3.0 | из КА 1.1 в БП 3.0 | Переносятся документы, начальные остатки и вся справочная информация | Сэкономьте свое время - используйте готовое решение для перехода! | Есть фильтр по организации и множество других параметров выгрузки | Поддерживается несколько сценариев работы: как первичный полный перенос, так и перенос только новых документов | Перенос данных возможен в "1С: Бухгалтерия 3.0" версии ПРОФ, КОРП или базовую | Переход с "1С: УПП1.3" / "1С:КА 1.1" на "1С:БП3.0" с помощью правил конвертации будет максимально комфортным! | Можно бесплатно проверить перенос на вашем сервере!

39500 руб.

25.02.2015    169755    293    253    

374
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. peterxx 23 11.12.17 21:26 Сейчас в теме
Метод прекрасный. У него есть только один недостаток, он мало пригоден для переноса контактной информации. Поле приемника "ЗначенияПолей", в котором фактически и содержится контактная информация в виде текста XML, и с которым работают конфигурации на БСП, таким способом не заполнить. Нужны пляски с бубном, точнее, в источнике нужно разделять КИ на элементы, а в приемнике - формировать из них строку в формате XML. Задача, кстати, не совсем тривиальная.
2. Nicholas 897 12.12.17 10:02 Сейчас в теме
(1) Да, согласен. Но пока нет такой задачи. В рамках текущей задачи мне было достоточно перенести "адрес в свободной форме". Если бы в УТ адреса заполнялись из КЛАДР, а в телефонах указывались "код страны" и "код города", то можно было заморочится.
8. Mbisha 05.05.18 22:18 Сейчас в теме
(2)Пытаюсь таким же образом перенести контактную информацию Физических лиц, возникла проблема с переносом элементов справочника ВидыКонтактнойИнормации. В обеих базах они являются предопределенными. Сопоставляю их на закладке КонвертацияЗначений. При загрузке в строке ТЧ КонтактнаяИнформация поле Вид принимает значение <Объект не найден> и адрес не отображается на форме. Какой момент я упустила?
3. A_Max 20 12.12.17 15:38 Сейчас в теме
Вариант покороче. В ПКО группы "КонтактнаяИнформация" "Перед обработкой"

Запрос = Новый Запрос;
Запрос.Текст = "Выбрать .......";
КоллекцияОбъектов = Запрос.Выполнить().Выгрузить();
4. kasper076 109 12.12.17 17:26 Сейчас в теме
Запрос в ПКО не оч красиво.
5. Nicholas 897 13.12.17 05:00 Сейчас в теме
(4) А почему не красиво? Мне этот вариант нравится. Получается наоборот более логично. Контактная информация и сбор этой информации - все в одном месте. Если понадобиться изменить или даже удалить эту табличную часть из обмена, то не нужно искать в других местах.
6. kasper076 109 13.12.17 08:12 Сейчас в теме
(5) Запрос в цикле это зло. В ПВД нужно все реализовывать.
simy4; unichkin; viking7; Ali1976; +4 Ответить
7. A_Max 20 27.12.17 11:47 Сейчас в теме
(6) Вынести в ПВД - конечно вообще самый правильный способ. Я предложил упрощение которое сразу станет понятно для человека и реализуемо на раз-два.
9. neomike 12.03.19 17:41 Сейчас в теме
а есть у кого-нибудь примерчик с ПВД?!
10. Eremkin 02.12.19 20:31 Сейчас в теме
Не благодари =)
Прикрепленные файлы:
11. user1758004 29.03.22 17:22 Сейчас в теме
(6)
Запрос в цикле это зло. В ПВД нужно все реализовывать.

А что здесь не красивого? - по мне так, для тех у кого опыта в конвертации не так много и при небольших выборках данных самое оно. ) И с передачей GUID не надо заморачиваться )
12. Diego_Iv 34 13.02.24 09:07 Сейчас в теме
Добрый день.
Немного дополню, вдруг кому пригодится.
Точно по такому же принципу нужно делать перенос адресов организаций: из регистра в табличную часть.
Столкнулся с тем, что при переносе адресов индивидуального предпринимателя - адреса не переносились (затирались точнее) . Причина в разном значении "Видов контактной информации" и в том, что в старых конфигурациях (УТ, КА, УПП) это адреса для физического лица, а не адрес организации.

В правиле конвертации (ПередОбработкой) использовал такой код:

Если Источник.ЭтоГруппа Тогда
	Отказ = Истина;
КонецЕсли;	

Если ЗначениеЗаполнено(Источник.ИндивидуальныйПредприниматель) Тогда
	Запрос = Новый Запрос("ВЫБРАТЬ
|	ВЫБОР
|		КОГДА КонтактнаяИнформация.Вид = ЗНАЧЕНИЕ(Справочник.ВидыКонтактнойИнформации.ФактАдресФизЛица)
|			ТОГДА ЗНАЧЕНИЕ(Справочник.ВидыКонтактнойИнформации.ФактАдресОрганизации)
|		КОГДА КонтактнаяИнформация.Вид = ЗНАЧЕНИЕ(Справочник.ВидыКонтактнойИнформации.ЮрАдресФизЛица)
|			ТОГДА ЗНАЧЕНИЕ(Справочник.ВидыКонтактнойИнформации.ЮрАдресОрганизации)
|		КОГДА КонтактнаяИнформация.Вид = ЗНАЧЕНИЕ(Справочник.ВидыКонтактнойИнформации.ИнформАдресФизЛица)
|			ТОГДА ЗНАЧЕНИЕ(Справочник.ВидыКонтактнойИнформации.АдресОрганизацииПочтовый)
|		ИНАЧЕ КонтактнаяИнформация.Вид
|	КОНЕЦ КАК Вид,
|	ВЫБОР
|		КОГДА КонтактнаяИнформация.Вид = ЗНАЧЕНИЕ(Справочник.ВидыКонтактнойИнформации.ФактАдресФизЛица)
|			ТОГДА ЗНАЧЕНИЕ(Справочник.ВидыКонтактнойИнформации.ФактАдресОрганизации)
|		КОГДА КонтактнаяИнформация.Вид = ЗНАЧЕНИЕ(Справочник.ВидыКонтактнойИнформации.ЮрАдресФизЛица)
|			ТОГДА ЗНАЧЕНИЕ(Справочник.ВидыКонтактнойИнформации.ЮрАдресОрганизации)
|		КОГДА КонтактнаяИнформация.Вид = ЗНАЧЕНИЕ(Справочник.ВидыКонтактнойИнформации.ИнформАдресФизЛица)
|			ТОГДА ЗНАЧЕНИЕ(Справочник.ВидыКонтактнойИнформации.АдресОрганизацииПочтовый)
|		ИНАЧЕ КонтактнаяИнформация.Вид
|	КОНЕЦ КАК ВидДляСписка,
|	КонтактнаяИнформация.Поле4 КАК Город,
|	КонтактнаяИнформация.Поле3 КАК НомерТелефона,
|	КонтактнаяИнформация.Представление,
|	КонтактнаяИнформация.Поле2 КАК Регион,
|	КонтактнаяИнформация.Тип,
|	КонтактнаяИнформация.Вид.Предопределенный
|ИЗ
|	РегистрСведений.КонтактнаяИнформация КАК КонтактнаяИнформация
|ГДЕ
|	КонтактнаяИнформация.Объект = &Объект");
Запрос.УстановитьПараметр("Объект", Источник.ИндивидуальныйПредприниматель);	
Иначе
Запрос = Новый Запрос(" 
    |ВЫБРАТЬ
    |    КонтактнаяИнформация.Вид,  
	|    КонтактнаяИнформация.Вид КАК ВидДляСписка,
	|    КонтактнаяИнформация.Поле4 КАК Город,
	|    КонтактнаяИнформация.Поле3 КАК НомерТелефона,
	|    КонтактнаяИнформация.Представление,
	|    КонтактнаяИнформация.Поле2 КАК Регион,
	|    КонтактнаяИнформация.Тип
    |ИЗ
    |    РегистрСведений.КонтактнаяИнформация КАК КонтактнаяИнформация
    |ГДЕ
    |    КонтактнаяИнформация.Объект = &Объект");
Запрос.УстановитьПараметр("Объект", Источник.Ссылка);
КонецЕсли;
    
КоллекцияОбъектов  = Запрос.Выполнить().Выгрузить();
Показать
Оставьте свое сообщение