А зачем в БСП записывают версии объектов не отличающиеся от предыдущих?

так в чем и фишка - помню лазал в код года 4 назад - четко помню, что проверялось на совпадение и дубли не создавали
а сейчас создают, при этом проверка на дубль есть (и проходит)
просто не используется перед созданием новой записи



    Если ЗаписьОбычнойВерсии Тогда

        ИзмененаПроведенность = Ложь;

        Если СведенияОВерсииОбъекта.Свойство("ИзмененаПроведенность") Тогда

            ИзмененаПроведенность = СведенияОВерсииОбъекта.ИзмененаПроведенность;

        КонецЕсли;

        

        // Запись данных предыдущей версии.

        Если Не Объект.ЭтоНовый() И (ИзмененаПроведенность И СведенияОВерсииОбъекта.НомерВерсии > 1 Или ВерсияОтличаетсяОтРанееЗаписанной(Объект)) Тогда

            // Если версионирование включено после создания объекта, создаем предыдущую запись о версии.

            Если СведенияОВерсииОбъекта.НомерВерсии = 1 Тогда

                Если ОбъектВерсионируется(Объект.Ссылка, Ложь) Тогда

                    ПараметрыВерсии = Новый Структура;

                    ПараметрыВерсии.Вставить("НомерВерсии", 1);

                    ПараметрыВерсии.Вставить("Комментарий", НСтр("ru = 'Версия создана по уже имеющемуся объекту'"));

                    СоздатьВерсиюОбъекта(Объект.Ссылка.ПолучитьОбъект(), ПараметрыВерсии);

                    СведенияОВерсииОбъекта.НомерВерсии = 2;

                КонецЕсли;

            КонецЕсли;

            

            // Сохраняем предыдущую версию объекта.

            МенеджерЗаписи = РегистрыСведений.ВерсииОбъектов.СоздатьМенеджерЗаписи();

            МенеджерЗаписи.Объект = Объект.Ссылка;

            МенеджерЗаписи.НомерВерсии = НомерПредыдущейВерсии(Объект.Ссылка, СведенияОВерсииОбъекта.НомерВерсии);

            МенеджерЗаписи.Прочитать();

            Если МенеджерЗаписи.Выбран() И Не МенеджерЗаписи.ЕстьДанныеВерсии Тогда

                МенеджерЗаписи.ВерсияОбъекта = Новый ХранилищеЗначения(ДанныеДляХранения(Объект.Ссылка), Новый СжатиеДанных(9));

                МенеджерЗаписи.Записать();

            КонецЕсли;

        КонецЕсли;

        

        СсылкаНаОбъект = Объект.Ссылка;;

        Если СсылкаНаОбъект.Пустая() Тогда

            СсылкаНаОбъект = Объект.ПолучитьСсылкуНового();

            Если СсылкаНаОбъект.Пустая() Тогда

                СсылкаНаОбъект = ОбщегоНазначения.МенеджерОбъектаПоСсылке(Объект.Ссылка).ПолучитьСсылку();

                Объект.УстановитьСсылкуНового(СсылкаНаОбъект);

            КонецЕсли;

        КонецЕсли;

        

        // Запись текущей версии без данных.

        МенеджерЗаписи = РегистрыСведений.ВерсииОбъектов.СоздатьМенеджерЗаписи();

        МенеджерЗаписи.Объект = СсылкаНаОбъект;

        МенеджерЗаписи.НомерВерсии = СведенияОВерсииОбъекта.НомерВерсии;

ВерсияОтличаетсяОтРанееЗаписанной

просто может тут где-то собака порылась - и лучше хранить с избытком, чем пропускать