Перенос 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 1 850 руб. Купить

Подписка PRO — скачивайте любые файлы со скидкой до 85% из Базы знаний

Оформите подписку на компанию для решения рабочих задач

Оформить подписку и скачать решение со скидкой

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

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

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

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

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

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

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

Обработка

См. также

Платные (руб)

Битрикс24 – это цифровое рабочее пространство для автоматизации вашей компании и работы сотрудников. Ставьте и контролируйте задачи, отправляйте файлы и голосовые сообщения, общайтесь в чате, обсуждайте планы и принимайте взвешенные решения. Используйте для работы десктопное и мобильное приложения. Мы проконсультируем по стоимости Bitrix24 и выбору нужного тарифа, а также поможем внедрить решение в вашем бизнесе!

159000 руб.

30.11.2020    33558    223    0    

70

Пользователь 1С:Предприятие 8 Управленческий учет Платные (руб)

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

6500 руб.

10.11.2015    45541    44    1    

24

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

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

61356 руб.

04.08.2015    182560    417    297    

434

SALE! 10%

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

27180 24462 руб.

12.06.2017    156224    925    306    

473

Перенос данных 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" с помощью правил конвертации будет максимально комфортным! | Можно бесплатно проверить перенос на вашем сервере!

52967 руб.

25.02.2015    179958    341    281    

404

SALE! 10%

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

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

38000 34200 руб.

15.12.2021    31499    228    61    

171

SALE! 10%

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

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

38000 34200 руб.

23.07.2020    63834    300    81    

242

Перенос данных 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 | Можно проверить на вашем сервере перед покупкой

61356 руб.

15.04.2019    80857    218    167    

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

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

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

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

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

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

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