ПроверитьКодыУзлов (БСП)

Проверить коды узлов.

Процедура ПроверитьКодыУзлов(РезультатАнализаДанныхКЗагрузке, УзелИнформационнойБазы) Экспорт
	Если НЕ ЭтоПланОбменаXDTO(УзелИнформационнойБазы) Тогда
		Возврат;
	КонецЕсли;

	КодУзлаИБ = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(УзелИнформационнойБазы,"Код");
	Если ЗначениеЗаполнено(РезультатАнализаДанныхКЗагрузке.NewFrom) Тогда
		УзелКорреспондентаПерекодирован = (КодУзлаИБ = РезультатАнализаДанныхКЗагрузке.NewFrom);
		Если НЕ УзелКорреспондентаПерекодирован
			И ОбменДаннымиXDTOСервер.ПоддерживаетсяВерсияСИдентификаторомОбменаДанными(УзелИнформационнойБазы) Тогда
			УзелОбменаОбъект = УзелИнформационнойБазы.ПолучитьОбъект();
			УзелОбменаОбъект.Код = РезультатАнализаДанныхКЗагрузке.NewFrom;
			УзелОбменаОбъект.ОбменДанными.Загрузка = Истина;
			УзелОбменаОбъект.Записать();
			УзелКорреспондентаПерекодирован = Истина;
		КонецЕсли;
	Иначе
		УзелКорреспондентаПерекодирован = Истина;
	КонецЕсли;
	Если УзелКорреспондентаПерекодирован Тогда
		ПсевдонимПредопределенногоУзла = ПсевдонимПредопределенногоУзла(УзелИнформационнойБазы);
		Если ЗначениеЗаполнено(ПсевдонимПредопределенногоУзла)
			И РезультатАнализаДанныхКЗагрузке.КорреспондентПоддерживаетИдентификаторОбменаДанными Тогда
			// Возможно, пора удалить запись. Проверка секции To.
			ИмяПланаОбмена = УзелИнформационнойБазы.Метаданные().Имя;
			КодПредопределенногоУзла = КодПредопределенногоУзлаПланаОбмена(ИмяПланаОбмена);
			Если СокрЛП(КодПредопределенногоУзла) = РезультатАнализаДанныхКЗагрузке.To Тогда
				ОбменДаннымиСлужебный.УдалитьНаборЗаписейВРегистреСведений(Новый Структура("Корреспондент", УзелИнформационнойБазы),
					"ПсевдонимыПредопределенныхУзлов");
			КонецЕсли;
		КонецЕсли;
	КонецЕсли;
КонецПроцедуры

///////////////////////////////////////////////////////////////////////////////////////////////////////
// Copyright (c) 2019, ООО 1С-Софт
// Все права защищены. Эта программа и сопроводительные материалы предоставляются 
// в соответствии с условиями лицензии Attribution 4.0 International (CC BY 4.0)
// Текст лицензии доступен по ссылке:
// https://creativecommons.org/licenses/by/4.0/legalcode
///////////////////////////////////////////////////////////////////////////////////////////////////////

Процедура ПроверитьКодыУзлов(РезультатАнализаДанныхКЗагрузке, УзелИнформационнойБазы) Экспорт
	Если НЕ ЭтоПланОбменаXDTO(УзелИнформационнойБазы) Тогда
		Возврат;
	КонецЕсли;

	КодУзлаИБ = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(УзелИнформационнойБазы,"Код");
	Если ЗначениеЗаполнено(РезультатАнализаДанныхКЗагрузке.NewFrom) Тогда
		УзелКорреспондентаПерекодирован = (КодУзлаИБ = РезультатАнализаДанныхКЗагрузке.NewFrom);
		Если НЕ УзелКорреспондентаПерекодирован
			И ОбменДаннымиXDTOСервер.ПоддерживаетсяВерсияСИдентификаторомОбменаДанными(УзелИнформационнойБазы) Тогда
			УзелОбменаОбъект = УзелИнформационнойБазы.ПолучитьОбъект();
			УзелОбменаОбъект.Код = РезультатАнализаДанныхКЗагрузке.NewFrom;
			УзелОбменаОбъект.ОбменДанными.Загрузка = Истина;
			УзелОбменаОбъект.Записать();
			УзелКорреспондентаПерекодирован = Истина;
		КонецЕсли;
	Иначе
		УзелКорреспондентаПерекодирован = Истина;
	КонецЕсли;
	Если УзелКорреспондентаПерекодирован Тогда
		ПсевдонимПредопределенногоУзла = ПсевдонимПредопределенногоУзла(УзелИнформационнойБазы);
		Если ЗначениеЗаполнено(ПсевдонимПредопределенногоУзла)
			И РезультатАнализаДанныхКЗагрузке.КорреспондентПоддерживаетИдентификаторОбменаДанными Тогда
			// Возможно, пора удалить запись. Проверка секции To.
			ИмяПланаОбмена = УзелИнформационнойБазы.Метаданные().Имя;
			КодПредопределенногоУзла = КодПредопределенногоУзлаПланаОбмена(ИмяПланаОбмена);
			Если СокрЛП(КодПредопределенногоУзла) = РезультатАнализаДанныхКЗагрузке.To Тогда
				ОбменДаннымиСлужебный.УдалитьНаборЗаписейВРегистреСведений(Новый Структура("Корреспондент", УзелИнформационнойБазы),
					"ПсевдонимыПредопределенныхУзлов");
			КонецЕсли;
		КонецЕсли;
	КонецЕсли;
КонецПроцедуры

///////////////////////////////////////////////////////////////////////////////////////////////////////
// Copyright (c) 2019, ООО 1С-Софт
// Все права защищены. Эта программа и сопроводительные материалы предоставляются 
// в соответствии с условиями лицензии Attribution 4.0 International (CC BY 4.0)
// Текст лицензии доступен по ссылке:
// https://creativecommons.org/licenses/by/4.0/legalcode
///////////////////////////////////////////////////////////////////////////////////////////////////////