Перенос e-mail контрагентов из БП 2.0 в БП 3.0

10.11.17

Функциональные - Управление взаимоотношениями с клиентами (CRM)

Перенос E-Mail и контактной информации в конфигурации БП 3.0 после обновления с 2.0. Из РегистраСведений.УдалитьКонтактнаяИнформация в Табличную часть КонтактнаяИнформация по Контрагентам.

Скачать файл

ВНИМАНИЕ: Файлы из Базы знаний - это исходный код разработки. Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы. Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных. Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.

Наименование По подписке [?] Купить один файл
Перенос e-mail контрагентов из БП 2.0 в БП 3.0:
.epf 6,40Kb
9
9 Скачать (1 SM) Купить за 1 850 руб.

Как известно, контактная информация хранилась в 2.0 в соответствующем регистре сведений.

В 3.0 она хранится в Табличной Части Справочника Контрагенты.

Обработка ищет в регистре сведений записи по контрагентам и в случае если Тип = Адресу электронной почты или содержит в Представлении символ @ то добавляет в табличную часть Контактной информации соответствующую запись.

Код обработки открыт и свободен для доработок. 

В результате работы обработки выводятся Сообщения о добавлении Контрагенту - значения из Регистра сведений.

Тестировалось на Релизе 3.0.54.15, 3.0.52.42, 3.0.51.27.

Обработка

См. также

SALE! 10%

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

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

55778 50200 руб.

04.08.2015    166959    336    278    

376

Перенос данных 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. Не требуется синхронного обновления правил после обновления другой конфигурации, участвующей в обмене. Типовой обмен через планы обмена кнопкой Синхронизация вручную или автоматически по расписанию, или вручную обработкой.

26280 руб.

12.06.2017    142001    802    297    

422

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

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

35000 руб.

15.12.2021    24264    171    51    

130

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

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

35000 руб.

23.07.2020    51770    229    70    

187

SALE! 10%

Перенос данных 1C Файловый обмен (TXT, XML, DBF), FTP Системный администратор Программист Платформа 1С v8.3 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" с помощью правил конвертации будет максимально комфортным! | Можно бесплатно проверить перенос на вашем сервере!

48278 43450 руб.

25.02.2015    171372    304    257    

379

Управление взаимоотношениями с клиентами (CRM) Управление маркетингом (EMM) Пользователь Платформа 1С v8.3 Управленческий учет Платные (руб)

Решение 1С:CRM 3.0 предназначено для компаний с потребностью совместной работы более 5 пользователей в единой информационной базе. Решение позволяет автоматизировать все бизнес-процессы компании в соответствии с концепцией CRM, включая закупки, продажи, маркетинг, сервисное обслуживание и пр.

9700 руб.

10.11.2015    43229    32    1    

18

SALE! 10%

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

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

53111 47800 руб.

03.12.2020    36792    95    66    

92

Перенос данных 1C Программист Бухгалтер Платформа 1С v8.3 Сложные периодические расчеты 1С:Зарплата и Управление Персоналом 3.x Россия Бухгалтерский учет НДФЛ ФОМС, ЕФС Платные (руб)

Обработки для быстрого перехода с конфигураций «КАМИН:Расчет заработной платы 3.0», «КАМИН:Зарплата для бизнеса 4.0» и «КАМИН:Зарплата 5.0» на конфигурацию «Зарплата и управление персоналом» версии 3.1.

12000 руб.

25.09.2016    80945    315    250    

267
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. TrinitronOTV 16 11.11.17 14:07 Сейчас в теме
Без вашей обработки адреса что ли не переносятся?
2. Guyer 21 11.11.17 19:31 Сейчас в теме
1. Адреса переносятся штатным способом при обновлении инф базы
2. Код обработки открыт и изменив всего одну строчку Вы можете спокойно перенести адреса
3. Чуть позже сделаю более полную версию переноса
3. Светлый ум 423 25.01.19 12:30 Сейчас в теме
-1
Меняйте заголовок публикации, вашу обработку - нельзя назвать переносом!

- Вы сделали конвертацию данных архивного регистра в данные справочника - в рамках одной конфигурации.

Весь код обработки:

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

			
		КонецЕсли;
		
		
	КонецЦикла;
	
	

КонецПроцедуры

&НаКлиенте
Процедура Перенести(Команда)
	ПеренестиНаСервере();
КонецПроцедуры
Показать
Оставьте свое сообщение