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

11.12.17

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

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

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

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

 

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

1

 

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

2


 

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

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

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

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

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

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

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

Вступайте в нашу телеграмм-группу Инфостарт

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

Вы можете заказать платную адаптацию этой статьи под ваши задачи на «Бирже заказов».

  • 0% комиссии — оплата напрямую исполнителю;
  • Исполнители любого масштаба — от отдельных специалистов до команд под проект;
  • Прямой обмен контактами между заказчиком и исполнителем;
  • Безопасная сделка — при необходимости;
  • Рейтинги, кейсы и прозрачная система откликов.

См. также

SALE! 15%

Перенос данных 1C Файловый обмен (TXT, XML, DBF), FTP Системный администратор Программист 1С:Предприятие 8 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. Не требуется синхронного обновления правил после обновления другой конфигурации, участвующей в обмене. Типовой обмен через планы обмена кнопкой Синхронизация вручную или автоматически по расписанию, или вручную обработкой.

27633 руб.

12.06.2017    160785    967    320    

482

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

Переносите справочную информацию, остатки и документы из УПП 1.3 в Бухгалтерию 3.0 с помощью готовых правил. Переносится более 50 видов документов. Простой интерфейс и понятные настройки.

42000 руб.

15.12.2021    34198    259    64    

195

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

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

50050 руб.

25.02.2015    188255    359    289    

418

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

Перенос данных из БП 2 в БП 3 готовые правила конвертации данных (КД 2), сэкономьте свое время! | Выполнить переход с БП 2 на БП 3 в ситуациях, когда простым обновлением перейти не получается | Переносится вся справочная информация, документы за выбранный период, а также начальные остатки на выбранную дату (то есть можно еще и свертку базы сделать при переносе) | Есть фильтр по организациям при выгрузке данных | Перенос можно проверить перед покупкой прямо на вашем сервере! Обращайтесь за проверкой!

50600 руб.

21.05.2019    58083    81    131    

73

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

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

58000 руб.

15.04.2019    84059    225    175    

161

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

Правила переноса кадровых и расчетных данных и справочной информации из "1С:УПП1.3" или "1С:КА 1.1" в "1С:ЗУП 3.1 | Разработан в формате КД 2 (правила конвертации данных) | При выгрузке есть фильтр по организациям | Обновляется при выходе новых релизов 1С | Развитие алгоритмов | Расчетные документы переносятся в документ "Перенос данных" | Создаются документы "Начальная штатная расстановка" и "Начальная задолженность по зарплате", переносятся кадровые документы

58000 руб.

29.10.2018    62807    82    132    

81

Внешние источники данных Кадровый учет Файловый обмен (TXT, XML, DBF), FTP Перенос данных 1C Программист 1С:Предприятие 8 1С:Зарплата и кадры государственного учреждения 3 Государственные, бюджетные структуры Россия Бухгалтерский учет Бюджетный учет Платные (руб)

Обработка позволяет перенести кадровую информацию и данные по заработной плате, фактическим удержаниям, НДФЛ, вычетам, страховым взносам из базы Парус 10 учреждений (далее Парус) в конфигурацию 1С:Зарплата и кадры государственного учреждения ред. 3 (далее 1С) и начать с ней работать с любого месяца года.

85400 руб.

05.10.2022    13453    15    8    

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

Запрос = Новый Запрос;
Запрос.Текст = "Выбрать .......";
КоллекцияОбъектов = Запрос.Выполнить().Выгрузить();
4. kasper076 116 12.12.17 17:26 Сейчас в теме
Запрос в ПКО не оч красиво.
5. Nicholas 950 13.12.17 05:00 Сейчас в теме
(4) А почему не красиво? Мне этот вариант нравится. Получается наоборот более логично. Контактная информация и сбор этой информации - все в одном месте. Если понадобиться изменить или даже удалить эту табличную часть из обмена, то не нужно искать в других местах.
6. kasper076 116 13.12.17 08:12 Сейчас в теме
(5) Запрос в цикле это зло. В ПВД нужно все реализовывать.
simy4; unichkin; viking7; Ali1976; +4 Ответить
7. A_Max 21 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 36 13.02.24 09:07 Сейчас в теме
Добрый день.
Немного дополню, вдруг кому пригодится.
Точно по такому же принципу нужно делать перенос адресов организаций: из регистра в табличную часть.
Столкнулся с тем, что при переносе адресов индивидуального предпринимателя - адреса не переносились (затирались точнее) . Причина в разном значении "Видов контактной информации" и в том, что в старых конфигурациях (УТ, КА, УПП) это адреса для физического лица, а не адрес организации.

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

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

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