ошибка при сохранении и обновлении файла конфиурации cf - УТП

Здравствуйте, ошибка при сохранении и загрузке конфиурации.
Была типичная конфигурация с данными "Управление торговым предприятием" версии 1.2.6. от 2011 г
В конфигураторе обновил конфигурацию до версии 1.2.66.1 от февраля 2022 г.

Сохранил конфигурацию и запустил режим 1с Предприятие из Конфигуратора

Выдало ошибку
{Обработка.ЗаполнениеСинонимовОбъектов.МодульОбъекта(99)}: Ошибка при вызове метода контекста (ПолучитьОбъект)
ТекущаяЗапись = СсылкаНаЭлемент.ПолучитьОбъект();
по причине:
В данной транзакции уже происходили ошибки!

При входе в Конфигуратор для исправления попадает на строку
ТекущаяЗапись = СсылкаНаЭлемент.ПолучитьОбъект();

Объект конфигурации - Обработка ЗаполнениеСинонимовОбъектов,
Вот код:
// Выполняет заполнение синонимов предопределенных элементов справочника
//
Процедура ЗаполнитьСправочник(ИмяОбъекта)

МетаданныеСправочника = Метаданные.Справочники.Найти(ИмяОбъекта);
Если МетаданныеСправочника = Неопределено Тогда
// нет такого справочника
Возврат;
КонецЕсли;

ТипСправочника = Тип("СправочникСсылка."+МетаданныеСправочника.Имя);
ИмяМакета = "НачальноеЗаполнение";

ЕстьМакет = МетаданныеСправочника.Макеты.Найти(ИмяМакета);
Если ЕстьМакет = Неопределено Тогда
// нет такого макета
Возврат;
КонецЕсли;

Макет = Справочники[ИмяОбъекта].ПолучитьМакет(ИмяМакета);

КодЯзыкаПечать = ЯзыкИнформационнойБазы;
Макет.КодЯзыкаМакета = КодЯзыкаПечать;

СостояниеЗаполнения(НСтр("ru='Заполняется справочник';uk='Заповнюється довідник'") + МетаданныеСправочника.Синоним);

ЧислоРеквизитов = Макет.ШиринаТаблицы;

ТаблицаРеквизитов = Новый ("ТаблицаЗначений");
ТаблицаРеквизитов.Колонки.Добавить("Реквизит");
ТаблицаРеквизитов.Колонки.Добавить("Тип");
ТаблицаРеквизитов.Колонки.Добавить("Менеджер");

КоличествоЗаписей = Макет.ВысотаТаблицы;
ЗаполняемыйСправочник = Справочники[ИмяОбъекта];

//Заполняем справочник
Для Сч = 2 По КоличествоЗаписей Цикл

ФлагИзменений = Ложь;

//Предопределенные реквизиты
Имя = Макет.Область(Сч, 1).Текст;
Код = Макет.Область(Сч, 2).Текст;
Наименование = Макет.Область(Сч, 3).Текст;

СсылкаНаЭлемент = ПолучитьПредопределенный(ТипСправочника, ЗаполняемыйСправочник, Имя);
Если СсылкаНаЭлемент = Неопределено Тогда
Сообщить(СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСт року(НСтр("ru='Не найден предопределённый элемент %1 для справочника %2'"), Имя, ИмяОбъекта));
Возврат;
КонецЕсли;
ТекущаяЗапись = СсылкаНаЭлемент.ПолучитьОбъект();

Если МетаданныеСправочника.ДлинаНаименования > 0 Тогда
Если НЕ ПустаяСтрока(Наименование) И (Наименование <> ТекущаяЗапись.Наименование) Тогда
ТекущаяЗапись.Наименование = Наименование;
ФлагИзменений = Истина;
КонецЕсли;
КонецЕсли;

Если ФлагИзменений Тогда

// проверим, нет ли случайно второго элемента с таким же кодом,
// чтобы не было лишних проблем при записи
Если МетаданныеСправочника.ДлинаКода > 0 И МетаданныеСправочника.КонтрольУникальности = Истина Тогда
Если НЕ КодЭлементаУникален("Справочник."+ИмяОбъекта,ТекущаяЗапись.К од,СсылкаНаЭлемент) Тогда
ТекущаяЗапись.УстановитьНовыйКод();
КонецЕсли;
Если НЕ КодЭлементаУникален("Справочник."+ИмяОбъекта,ТекущаяЗапись.К од,СсылкаНаЭлемент) Тогда
// всеравно есть лишние проблемы не будем записывать
Сообщить(СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСт року(НСтр("ru='Не удалось записать объект справочника %1: %2, по причине того, что сгенерированный код был не уникален!'"), ИмяОбъекта, ТекущаяЗапись));
ФлагИзменений = Ложь;
КонецЕсли;
Конецесли;
Если ФлагИзменений Тогда
Попытка
ТекущаяЗапись.Записать();
Исключение
Сообщить(СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСт року(НСтр("ru='Не удалось записать объект справочника %1: %2!'"), ИмяОбъекта, ТекущаяЗапись));
КонецПопытки;
КонецЕсли;
КонецЕсли;

КонецЦикла;

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

Помогите как исправить, заранее благодарен, удачи