Каталог решений - Выборочный перенос данных из Комплексной автоматизации 2.5 в Управление нашей фирмой 3.0

Задача была поставлена перенести данные с отбором по выбранной организации и с ограничение по дате, а так же, при необходимости, по выбранным документам (разделам учета) из конфигурации Комплексная автоматизация 2.5 в Управление нашей фирмой 3.0 . Штатной обработки или возможности настройки синхронизации я не нашел, поэтому пришлось пойти на небольшую хитрость, а так же использовать консоль запросов и обработку для связки документов (восстановить связи — создающиеся при вводе на основании документов). Далее по пунктам:

1. Т.к. штатного обмена между собой (первое, что пришло в голову), в конфигурациях нет, пришла мысль — настроить обмен КА2 с Бухгалтерией 3.0, ну а потом уже с УНФ 3.0, но, к сожалению, таким образом переносится совсем мало видов документов, поэтому я пошел немного другим путем:

1.0 Естественно, делаем резервные копии перед всеми манипуляциями.

1.1 Обновляем до последней версии конфигурацию КА 2

1.2 Скачиваем последнюю версию УТ 11.5 и выгружаем файл конфигурации поставщика.

1.3 Загружаем в КА 2 (через меню Конфигурация — загрузить конфигурацию из файла) выгруженную конфигурацию УТ 11.5 с постановкой на поддержку и пытаемся сохранить — программа ругнется — на несколько регистров, и при первой попытке не даст сохранить

1.4 Из конфигурации же открываем КА 2 и очищаем обработкой регистры (для тех, кто в танке, добавлю для скачивания готовые обработки и инструменты архивом, возможно, с выходом более новых версий регистры могут добавиться) 

ОчисткаРегистровВКА.epf

	НаборЗаписей = РегистрыСведений.ЗначенияГруппДоступаПоУмолчанию.СоздатьНаборЗаписей();
	НаборЗаписей.Записать(Истина);   
	
	НаборЗаписей = РегистрыСведений.ИспользуемыеВидыДоступа.СоздатьНаборЗаписей();
	НаборЗаписей.Записать(Истина); 
	
	НаборЗаписей = РегистрыСведений.КодировкиФайлов.СоздатьНаборЗаписей();
	НаборЗаписей.Записать(Истина);

	НаборЗаписей = РегистрыСведений.СведенияОФайлах.СоздатьНаборЗаписей();
	НаборЗаписей.Записать(Истина);
	
	НаборЗаписей = РегистрыСведений.НаличиеФайлов.СоздатьНаборЗаписей();
	НаборЗаписей.Записать(Истина);                   

  	НаборЗаписей = РегистрыСведений.НеудаленныеОбъекты.СоздатьНаборЗаписей();
	НаборЗаписей.Записать(Истина);  
	
	НаборЗаписей = РегистрыСведений.РеестрДокументов.СоздатьНаборЗаписей();
	НаборЗаписей.Записать(Истина);  
	
	НаборЗаписей = РегистрыСведений.ФайлыВРабочемКаталоге.СоздатьНаборЗаписей();
	НаборЗаписей.Записать(Истина); 
		
	НаборЗаписей = РегистрыСведений.ХранилищеФайлов.СоздатьНаборЗаписей();
	НаборЗаписей.Записать(Истина);   
	
	НаборЗаписей = РегистрыСведений.ЭлектронныеПодписи.СоздатьНаборЗаписей();
	НаборЗаписей.Записать(Истина); 
	
	НаборЗаписей = РегистрыСведений.ДанныеПервичныхДокументов.СоздатьНаборЗаписей();
	НаборЗаписей.Записать(Истина);
	
	НаборЗаписей = РегистрыСведений.СклоненияПредставленийОбъектов.СоздатьНаборЗаписей();
	НаборЗаписей.Записать(Истина);

     НаборЗаписей = РегистрыСведений.УдалитьДвоичныеДанныеФайлов.СоздатьНаборЗаписей();
	НаборЗаписей.Записать(Истина);

1.5 Далее сохраняем конфигурацию, и получаем из КА — уже УТ 11.5, открываем базу данных для того, чтобы база обновилась.

2. Теперь остается настроить обмен (который уже есть типовой) между УНФ и УТ с отбором по организациям, дате отправки документов и прочими радостями! Этот процесс типовой — несложный, его я описывать не буду.

3. Итак, после проведения обмена — мы получили необходимые документы (к примеру, Заказ покупателя, Заказ поставщику, Поступления товаров и расчетные документы), но вот незадача, в КА — у нас в отчете связных документов показывало, что на основании чего создано, и можно было по документу заказ покупателя — отследить всю цепочку, а после переноса в УНФ — всех связок не видно..

Решение — перенести эти связки, выгружая из КА 2 через консоль запросов, сохраняя в ексель, и загружая в УНФ через обработку загрузки, обработка ищет по дате и номеру документ Заказ покупателя и Заказ поставщика и связывает их, прописывая в документ заказ поставщика реквизит Основание — заказ покупателя, аналогичным образом обрабатываются Поступления, Расход со счета, и т.п.

Для консоли запросов в КА (УТ)

ВЫБРАТЬ 
	ЗаказПоставщику.ДокументОснование.Номер как НомерЗаказа,
	ЗаказПоставщику.ДокументОснование.Дата КАК ДатаЗаказа,
	ЗаказПоставщику.ДокументОснование.Ссылка как ЗаказКлиента,
	ЗаказПоставщику.Ссылка КАК Ссылка,
	ЗаказПоставщику.Номер как НомерЗП,
	ЗаказПоставщику.Дата как ДатаЗП
ИЗ
	Документ.ЗаказПоставщику КАК ЗаказПоставщику
ГДЕ
	ЗаказПоставщику.ДокументОснование.Ссылка Ссылка Документ.ЗаказКлиента

После сохранения в ексель, можно загрузить обработкой ЗагрузкаИзЕксельДанных.epf

Для Каждого Стр из Таблица Цикл
		Попытка
			ЗаказПоставщику = Документы.ЗаказПоставщику.НайтиПоНомеру(Стр.К5,Дата(Стр.К6));
			Заказ = Документы.ЗаказПокупателя.НайтиПоНомеру(Стр.К1,Дата(Стр.К2));
		Исключение
			
		КонецПопытки;
		
		
		Если Не ЗначениеЗаполнено(ЗаказПоставщику) Тогда 
			Продолжить;
		КонецЕсли;
		
		Если Не ЗначениеЗаполнено(ЗаказПоставщику.ДокументОснование) и ЗначениеЗаполнено(Заказ) Тогда
			ЗаказПоставщикуО = ЗаказПоставщику.ПолучитьОбъект();
			ЗаказПоставщикуО.ДокументОснование = Заказ;
			ЗаказПоставщикуО.Записать(РежимЗаписиДокумента.Запись);
		КонецЕсли;
			
	КонецЦикла;

После всех манипуляций — мы получаем полноценные данные из Комплексной автоматизации по финансовой деятельности предприятия в конфигурации Управление нашей фирмой.

Таким образом можно, не прибегая к конфигурации конвертация данных и написания правил обмена — быстро перекинуть данные для этих конфигураций.