Перестал работать обмен после обновления ЗУП с версии 3.1.29.78 на 3.1.30.57
Добрый день!
После обновления ЗУП с версии 3.1.29.78 на 3.1.30.57 перестала работать синхронизация данных с
нетиповыми правилами обмена, правила разработаны сторонней организацией, находятся в конфигурации.
При попытке запустить синхронизацию вручную, получаю ошибку
При попытке указать/добавить настройки подключения для синхронизации данных, получаю ошибку
В версии ЗУП 3.1.30.57 настройки подключения перенесли из РС в справочник (Настройки транспорта сообщений обмена).
В справочнике Настройки транспорта сообщений обмена у настроек для синхронизации с нетиповыми правилами не заполнен реквизит Корреспондент.
При попытке заполнить реквизит Корреспондент, через редактор объекта получаю список типов данных, без нетиповых правил обмена.
В какую сторону необходимо копать, чтобы нетиповые правила можно было выбрать в качестве корреспондента?
После обновления ЗУП с версии 3.1.29.78 на 3.1.30.57 перестала работать синхронизация данных с
нетиповыми правилами обмена, правила разработаны сторонней организацией, находятся в конфигурации.
При попытке запустить синхронизацию вручную, получаю ошибку
Не заданы настройки подключения по умолчанию |
|---|
| Не заданы настройки подключения по умолчанию.
Синхронизация не может быть продолжена. {Обработка.ВыполнениеОбменаДанными.Форма.Форма.Форма(49)}:ВызватьИсключение Текст; {ОбщийМодуль.ОбменДаннымиКлиент.Модуль(691)}:ПараметрыФормы, Владелец, УзелИнформационнойБазы.УникальныйИдентификатор(), , , ОповещениеОЗакрытии, РежимОткрытияОкнаФормы.БлокироватьОкноВладельца); {ОбщаяФорма.НастройкиСинхронизацииДанных.Форма(1034)}:ОбменДаннымиКлиент.ВыполнитьОбменДаннымиОбработкаКоманды(ДополнительныеПараметры.УзелИнформационнойБазы, ЭтотОбъект, , Истина, ВспомогательныеПараметры); {ОбщаяФорма.НастройкиСинхронизацииДанных.Форма(993)}:ОткрытьПомощникАвтоматическойСинхронизации(ОписаниеСтрокиПриложения); {ОбщаяФорма.НастройкиСинхронизацииДанных.Форма(390)}:СинхронизацияДанных(ОписаниеСтрокиПриложения); {ОбщаяФорма.НастройкиСинхронизацииДанных.Форма(675)}:ОбработкаКомандыВыполненияСинхронизации(ТекущиеДанные, Ложь); {ОбщаяФорма.НастройкиСинхронизацииДанных.Форма(172)}:ВыполнитьКомандуСПредварительнойПроверкой(Команда.Имя); [ОшибкаВоВремяВыполненияВстроенногоЯзыка, ИсключениеВызванноеИзВстроенногоЯзыка] |
При попытке указать/добавить настройки подключения для синхронизации данных, получаю ошибку
Неверный тип значения:Справочник.НастройкиТранспортаСообщенийОбмена.Корреспондент |
|---|
| Ошибка при вызове метода контекста (Заблокировать)
{Справочник.НастройкиТранспортаСообщенийОбмена.МодульМенеджера(24)}:Блокировка.Заблокировать(); {ОбщийМодуль.ТранспортСообщенийОбмена.Модуль(745)}:Справочники.НастройкиТранспортаСообщенийОбмена.ОбновитьНастройки(СтруктураЗаписи); {ОбщийМодуль.ТранспортСообщенийОбменаВызовСервера.Модуль(31)}:ТранспортСообщенийОбмена.СохранитьНастройкиТранспорта(Корреспондент, ИдентификаторТранспорта, НастройкиТранспорта); {Справочник.НастройкиТранспортаСообщенийОбмена.Форма.ПанельНастроекТранспорта.Форма(246)}:ТранспортСообщенийОбменаВызовСервера.СохранитьНастройкиТранспорта( {Обработка.ТранспортСообщенийОбменаFILE.Форма.ФормаНастройки.Форма(49)}:Закрыть(РезультатЗакрытия); [ОшибкаВоВремяВыполненияВстроенногоЯзыка] по причине: Неверный тип значения: Справочник.НастройкиТранспортаСообщенийОбмена.Корреспондент [ОшибкаИспользованияВстроенногоЯзыка] |
В версии ЗУП 3.1.30.57 настройки подключения перенесли из РС в справочник (Настройки транспорта сообщений обмена).
В справочнике Настройки транспорта сообщений обмена у настроек для синхронизации с нетиповыми правилами не заполнен реквизит Корреспондент.
При попытке заполнить реквизит Корреспондент, через редактор объекта получаю список типов данных, без нетиповых правил обмена.
В какую сторону необходимо копать, чтобы нетиповые правила можно было выбрать в качестве корреспондента?
Прикрепленные файлы:
Найденные решения
(4)
Получилось, спасибо.
Расширил типы для реквизита корреспондент в справочнике настройки транспорта сообщений обмена
А определяемы типы данных, можно добавлять в расширение, чтобы конфигурацию не снимать с поддержи для расширения типов ?
Нужно расширить типы у реквизита корреспондент в регистре настройки транспорта обмена данными
Получилось, спасибо.
Расширил типы для реквизита корреспондент в справочнике настройки транспорта сообщений обмена
А определяемы типы данных, можно добавлять в расширение, чтобы конфигурацию не снимать с поддержи для расширения типов ?
Прикрепленные файлы:
Остальные ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
По ЖР запускается процедура ОбработатьДанныеДляПереходаНаНовуюВерсию() и нетиповой обмен при этом не переносится, как корреспондент
Код |
|---|
Процедура ОбработатьДанныеДляПереходаНаНовуюВерсию() Экспорт
НачатьТранзакцию();
Попытка
Блокировка = Новый БлокировкаДанных;
Блокировка.Добавить("РегистрСведений.УдалитьНастройкиТранспортаОбменаДанными");
Блокировка.Добавить("РегистрСведений.НастройкиТранспортаОбменаОбластиДанных");
Блокировка.Добавить("Справочник.СценарииОбменовДанными");
Блокировка.Добавить("Справочник.НастройкиТранспортаСообщенийОбмена");
Блокировка.Заблокировать();
ПеренестиНастройкиТранспорта();
Если ОбщегоНазначения.РазделениеВключено()
И ОбщегоНазначения.ДоступноИспользованиеРазделенныхДанных() Тогда
ПеренестиНастройкиТранспортаМенеджераСервсиа();
КонецЕсли;
ПеренестиНастройкиТранспортаСценариевОбмена();
ЗафиксироватьТранзакцию();
Исключение
ОтменитьТранзакцию();
ВызватьИсключение;
КонецПопытки;
КонецПроцедуры
Процедура ПеренестиНастройкиТранспорта()
НачатьТранзакцию();
Попытка
Блокировка = Новый БлокировкаДанных;
Блокировка.Добавить("Справочник.НастройкиТранспортаСообщенийОбмена");
Блокировка.Заблокировать();
Набор = РегистрыСведений.УдалитьНастройкиТранспортаОбменаДанными.СоздатьНаборЗаписей();
Набор.Прочитать();
Для Каждого Запись Из Набор Цикл
Если НЕ ЗначениеЗаполнено(Запись.Корреспондент)
ИЛИ Запись.Корреспондент.ПолучитьОбъект() = Неопределено Тогда
// Пропускаем настройки с пустой или "битой" ссылкой (защита от ошибки в данных)
Продолжить;
КонецЕсли;
ПеренестиНастройкиТранспортаДляЗаписи(Запись)
КонецЦикла;
Набор.Очистить();
Набор.Записать();
ЗафиксироватьТранзакцию();
Исключение
ОтменитьТранзакцию();
ВызватьИсключение;
КонецПопытки;
КонецПроцедуры
Процедура ПеренестиНастройкиТранспортаДляЗаписи(Запись)
Пароли = ОбщегоНазначения.ПрочитатьДанныеИзБезопасногоХранилища(Запись.Корреспондент,
"COMПарольПользователя, FTPСоединениеПароль, WSПароль, ПарольАрхиваСообщенияОбмена");
НастроенныеВидыТранспорта = НастроенныеВидыТранспорта(Запись);
Для Каждого ВидТранспорта Из НастроенныеВидыТранспорта Цикл
НовыйСправочник = Справочники.НастройкиТранспортаСообщенийОбмена.СоздатьЭлемент();
НовыйСправочник.Корреспондент = Запись.Корреспондент;
НовыйСправочник.НастройкаПоУмолчанию = (Запись.ВидТранспортаСообщенийОбменаПоУмолчанию = ВидТранспорта);
НовыйСправочник.ИдентификаторТранспорта = ОбщегоНазначения.ИмяЗначенияПеречисления(ВидТранспорта);
Настройки = НовыйСправочник.Настройки;
Если ВидТранспорта = Перечисления.ВидыТранспортаСообщенийОбмена.EMAIL Тогда
НоваяСтрока = НовыйСправочник.Настройки.Добавить();
НоваяСтрока.Настройка = "МаксимальныйДопустимыйРазмерСообщения";
НоваяСтрока.Значение = Запись.EMAILМаксимальныйДопустимыйРазмерСообщения;
НоваяСтрока = НовыйСправочник.Настройки.Добавить();
НоваяСтрока.Настройка = "СжиматьФайлИсходящегоСообщения";
НоваяСтрока.Значение = Запись.EMAILСжиматьФайлИсходящегоСообщения;
НоваяСтрока = НовыйСправочник.Настройки.Добавить();
НоваяСтрока.Настройка = "УчетнаяЗапись";
НоваяСтрока.Значение = Запись.EMAILУчетнаяЗапись;
НоваяСтрока = НовыйСправочник.Настройки.Добавить();
НоваяСтрока.Настройка = "Транслитерация";
НоваяСтрока.Значение = Запись.EMAILТранслитерироватьИменаФайловСообщенийОбмена;
Если ЗначениеЗаполнено(Пароли.ПарольАрхиваСообщенияОбмена) Тогда
ПарольАрхиваСообщенияОбмена = Строка(Новый УникальныйИдентификатор);
ОбщегоНазначения.ЗаписатьДанныеВБезопасноеХранилище(ПарольАрхиваСообщенияОбмена, Пароли.ПарольАрхиваСообщенияОбмена);
НоваяСтрока = НовыйСправочник.Настройки.Добавить();
НоваяСтрока.Настройка = "ПарольАрхиваСообщенияОбмена";
НоваяСтрока.Значение = ПарольАрхиваСообщенияОбмена;
КонецЕсли;
ИначеЕсли ВидТранспорта = Перечисления.ВидыТранспортаСообщенийОбмена.FILE Тогда
НоваяСтрока = НовыйСправочник.Настройки.Добавить();
НоваяСтрока.Настройка = "КаталогОбменаИнформацией";
НоваяСтрока.Значение = Запись.FILEКаталогОбменаИнформацией;
НоваяСтрока = НовыйСправочник.Настройки.Добавить();
НоваяСтрока.Настройка = "СжиматьФайлИсходящегоСообщения";
НоваяСтрока.Значение = Запись.FILEСжиматьФайлИсходящегоСообщения;
НоваяСтрока = НовыйСправочник.Настройки.Добавить();
НоваяСтрока.Настройка = "Транслитерация";
НоваяСтрока.Значение = Запись.FILEТранслитерироватьИменаФайловСообщенийОбмена;
Если ЗначениеЗаполнено(Пароли.ПарольАрхиваСообщенияОбмена) Тогда
ПарольАрхиваСообщенияОбмена = Строка(Новый УникальныйИдентификатор);
ОбщегоНазначения.ЗаписатьДанныеВБезопасноеХранилище(ПарольАрхиваСообщенияОбмена, Пароли.ПарольАрхиваСообщенияОбмена);
НоваяСтрока = НовыйСправочник.Настройки.Добавить();
НоваяСтрока.Настройка = "ПарольАрхиваСообщенияОбмена";
НоваяСтрока.Значение = ПарольАрхиваСообщенияОбмена;
КонецЕсли;
ИначеЕсли ВидТранспорта = Перечисления.ВидыТранспортаСообщенийОбмена.FTP Тогда
НоваяСтрока = НовыйСправочник.Настройки.Добавить();
НоваяСтрока.Настройка = "МаксимальныйДопустимыйРазмерСообщения";
НоваяСтрока.Значение = Запись.FTPСоединениеМаксимальныйДопустимыйРазмерСообщения;
НоваяСтрока = НовыйСправочник.Настройки.Добавить();
НоваяСтрока.Настройка = "ПассивноеСоединение";
НоваяСтрока.Значение = Запись.FTPСоединениеПассивноеСоединение;
НоваяСтрока = НовыйСправочник.Настройки.Добавить();
НоваяСтрока.Настройка = "Пользователь";
НоваяСтрока.Значение = Запись.FTPСоединениеПользователь;
НоваяСтрока = НовыйСправочник.Настройки.Добавить();
НоваяСтрока.Настройка = "Порт";
НоваяСтрока.Значение = Запись.FTPСоединениеПорт;
НоваяСтрока = НовыйСправочник.Настройки.Добавить();
НоваяСтрока.Настройка = "Путь";
НоваяСтрока.Значение = Запись.FTPСоединениеПуть;
НоваяСтрока = НовыйСправочник.Настройки.Добавить();
НоваяСтрока.Настройка = "СжиматьФайлИсходящегоСообщения";
НоваяСтрока.Значение = Запись.FTPСжиматьФайлИсходящегоСообщения;
НоваяСтрока = НовыйСправочник.Настройки.Добавить();
НоваяСтрока.Настройка = "Транслитерация";
НоваяСтрока.Значение = Запись.FTPТранслитерироватьИменаФайловСообщенийОбмена;
Если ЗначениеЗаполнено(Пароли.ПарольАрхиваСообщенияОбмена) Тогда
ПарольАрхиваСообщенияОбмена = Строка(Новый УникальныйИдентификатор);
ОбщегоНазначения.ЗаписатьДанныеВБезопасноеХранилище(ПарольАрхиваСообщенияОбмена, Пароли.ПарольАрхиваСообщенияОбмена);
НоваяСтрока = НовыйСправочник.Настройки.Добавить();
НоваяСтрока.Настройка = "ПарольАрхиваСообщенияОбмена";
НоваяСтрока.Значение = ПарольАрхиваСообщенияОбмена;
КонецЕсли;
Если ЗначениеЗаполнено(Пароли.FTPСоединениеПароль) Тогда
Пароль = Строка(Новый УникальныйИдентификатор);
ОбщегоНазначения.ЗаписатьДанныеВБезопасноеХранилище(Пароль, Пароли.FTPСоединениеПароль);
НоваяСтрока = НовыйСправочник.Настройки.Добавить();
НоваяСтрока.Настройка = "Пароль";
НоваяСтрока.Значение = Пароль;
КонецЕсли;
ИначеЕсли ВидТранспорта = Перечисления.ВидыТранспортаСообщенийОбмена.WS Тогда
Если ЗначениеЗаполнено(Запись.WSКонечнаяТочкаКорреспондента) Тогда
НовыйСправочник.ИдентификаторТранспорта = "SM";
НоваяСтрока = НовыйСправочник.Настройки.Добавить();
НоваяСтрока.Настройка = "ВнутренняяПубликация";
НоваяСтрока.Значение = Истина;
НоваяСтрока = НовыйСправочник.Настройки.Добавить();
НоваяСтрока.Настройка = "КонечнаяТочкаКорреспондента";
НоваяСтрока.Значение = Запись.WSКонечнаяТочкаКорреспондента;
НоваяСтрока = НовыйСправочник.Настройки.Добавить();
НоваяСтрока.Настройка = "ОбластьДанныхКорреспондента";
НоваяСтрока.Значение = Запись.WSОбластьДанныхКорреспондента;
Иначе
НоваяСтрока = НовыйСправочник.Настройки.Добавить();
НоваяСтрока.Настройка = "АдресВебСервиса";
НоваяСтрока.Значение = Запись.WSURLВебСервиса;
НоваяСтрока = НовыйСправочник.Настройки.Добавить();
НоваяСтрока.Настройка = "ИмяПользователя";
НоваяСтрока.Значение = Запись.WSИмяПользователя;
НоваяСтрока = НовыйСправочник.Настройки.Добавить();
НоваяСтрока.Настройка = "ЗапомнитьПароль";
НоваяСтрока.Значение = Запись.WSЗапомнитьПароль;
Если Запись.WSЗапомнитьПароль И ЗначениеЗаполнено(Пароли.WSПароль) Тогда
Пароль = Строка(Новый УникальныйИдентификатор);
ОбщегоНазначения.ЗаписатьДанныеВБезопасноеХранилище(Пароль, Пароли.WSПароль);
НоваяСтрока = НовыйСправочник.Настройки.Добавить();
НоваяСтрока.Настройка = "Пароль";
НоваяСтрока.Значение = Пароль;
КонецЕсли;
КонецЕсли;
ИначеЕсли ВидТранспорта = Перечисления.ВидыТранспортаСообщенийОбмена.COM Тогда
НоваяСтрока = НовыйСправочник.Настройки.Добавить();
НоваяСтрока.Настройка = "ВариантРаботыИнформационнойБазы";
НоваяСтрока.Значение = Запись.COMВариантРаботыИнформационнойБазы;
НоваяСтрока = НовыйСправочник.Настройки.Добавить();
НоваяСтрока.Настройка = "КаталогИнформационнойБазы";
НоваяСтрока.Значение = Запись.COMКаталогИнформационнойБазы;
НоваяСтрока = НовыйСправочник.Настройки.Добавить();
НоваяСтрока.Настройка = "АутентификацияОперационнойСистемы";
НоваяСтрока.Значение = Запись.COMАутентификацияОперационнойСистемы;
НоваяСтрока = НовыйСправочник.Настройки.Добавить();
НоваяСтрока.Настройка = "ИмяПользователя";
НоваяСтрока.Значение = Запись.COMИмяПользователя;
НоваяСтрока = НовыйСправочник.Настройки.Добавить();
НоваяСтрока.Настройка = "ИмяСервера1СПредприятия";
НоваяСтрока.Значение = Запись.COMИмяСервера1СПредприятия;
НоваяСтрока = НовыйСправочник.Настройки.Добавить();
НоваяСтрока.Настройка = "ИмяИнформационнойБазыНаСервере1СПредприятия";
НоваяСтрока.Значение = Запись.COMИмяИнформационнойБазыНаСервере1СПредприятия;
Если ЗначениеЗаполнено(Пароли.COMПарольПользователя) Тогда
ПарольПользователя = Строка(Новый УникальныйИдентификатор);
ОбщегоНазначения.ЗаписатьДанныеВБезопасноеХранилище(ПарольПользователя, Пароли.COMПарольПользователя);
НоваяСтрока = НовыйСправочник.Настройки.Добавить();
НоваяСтрока.Настройка = "ПарольПользователя";
НоваяСтрока.Значение = ПарольПользователя;
КонецЕсли;
ИначеЕсли ВидТранспорта = Перечисления.ВидыТранспортаСообщенийОбмена.WSПассивныйРежим Тогда
НовыйСправочник.ИдентификаторТранспорта = "ПассивныйРежим";
КонецЕсли;
НовыйСправочник.Записать();
КонецЦикла;
ОбщегоНазначения.УдалитьДанныеИзБезопасногоХранилища(Запись.Корреспондент, "");
КонецПроцедуры
Показать |
Прикрепленные файлы:
(4)
Получилось, спасибо.
Расширил типы для реквизита корреспондент в справочнике настройки транспорта сообщений обмена
А определяемы типы данных, можно добавлять в расширение, чтобы конфигурацию не снимать с поддержи для расширения типов ?
Нужно расширить типы у реквизита корреспондент в регистре настройки транспорта обмена данными
Получилось, спасибо.
Расширил типы для реквизита корреспондент в справочнике настройки транспорта сообщений обмена
А определяемы типы данных, можно добавлять в расширение, чтобы конфигурацию не снимать с поддержи для расширения типов ?
Прикрепленные файлы:
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот