8.х Долго проводится документ

Документ "Сдельный Наряд" очень долго проводится
Сделал замер производительности
31%

Код:

Процедура ПроверкаСуществующихЗаписейРегистра(НаборЗаписей, СтруктураПараметров, Отказ)
   
    ИмяРегистра = СтруктураПараметров.МетаданныеНабора.ПолноеИмя();
   
    Запрос = Новый Запрос;
    Запрос.УстановитьПараметр("Регистратор", НаборЗаписей.Отбор.Регистратор.Значение);
   
    Запрос.Текст =
    "ВЫБРАТЬ ПЕРВЫЕ 1
    |    ИСТИНА КАК ЗначениеИстина
    |ИЗ
    |    &ТекущийРегистр КАК ТекущийРегистр
    |ГДЕ
    |    ТекущийРегистр.Регистратор = &Регистратор
    |    И &Условие";
   
    Запрос.Текст = СтрЗаменить(Запрос.Текст, "&ТекущийРегистр", ИмяРегистра);
    Запрос.Текст = СтрЗаменить(Запрос.Текст, "&Условие",
        "(" + УсловиеПроверкиСуществующихЗаписейРегистра(Запрос, СтруктураПараметров) + ")");
       
      
    Если НЕ Запрос.Выполнить().Пустой() Тогда
        Отказ = Истина;
    Иначе
        Отказ = Ложь;
    КонецЕсли;
   
КонецПроцедуры

и
43%

Код:

Процедура ЗарегистрироватьПерерасчетыПоФактическойВыработке()
   
    Запрос = Новый Запрос(
    "ВЫБРАТЬ РАЗЛИЧНЫЕ
    |    Основные.ФизЛицо,
    |    Основные.Регистратор КАК Регистратор,
    |    Основные.Организация,
    |    Основные.Сотрудник
    |ИЗ
    |    РегистрНакопления.ФактическаяВыработкаРаботниковОрганизаций КАК ФактическаяВыработка
    |        ЛЕВОЕ СОЕДИНЕНИЕ РегистрРасчета.ОсновныеНачисленияРаботниковОрганизаций КАК Основные
    |        ПО ФактическаяВыработка.Период >= Основные.ПериодДействияНачало
    |            И ФактическаяВыработка.Период <= Основные.ПериодДействияКонец
    |            И (Основные.ВидРасчета.СпособРасчета = ЗНАЧЕНИЕ(Перечисление.СпособыРасчетаОплатыТруда.СдельныйЗаработок))
    |            И ФактическаяВыработка.Сотрудник = Основные.Сотрудник
    |        ЛЕВОЕ СОЕДИНЕНИЕ РегистрРасчета.ОсновныеНачисленияРаботниковОрганизаций.ПерерасчетОсновныхНачислений КАК Перерасчеты
    |        ПО (Перерасчеты.ОбъектПерерасчета = Основные.Регистратор)
    |            И (Перерасчеты.ФизЛицо = Основные.ФизЛицо)
    |            И (Перерасчеты.ВидРасчета = ЗНАЧЕНИЕ(ПланВидовРасчета.ОсновныеНачисленияОрганизаций.ПустаяСсылка))
    |ГДЕ
    |    ФактическаяВыработка.Регистратор = &Регистратор
    |    И Перерасчеты.ФизЛицо ЕСТЬ NULL 
    |    И Основные.Регистратор ЕСТЬ НЕ NULL 
    |
    |УПОРЯДОЧИТЬ ПО
    |    Регистратор");
   
    Запрос.УстановитьПараметр("Регистратор", Отбор.Регистратор.Значение);
   
    Выборка = Запрос.Выполнить().Выбрать();
    ПроведениеРасчетов.ДописатьПерерасчетыОсновныхНачислений(Выборка);
   
КонецПроцедуры

УПП 1.3
8.3
клиент-сервер
по времени занимал раньше примерно 20 мин максимум ,после перехода с 8.2 на 8.3 проведение доков с большим объемом данных может длиться часами
может можно как то оптимизировать?

Сделал замер времени еще раз
На эту процедуру 97% времени теперь уходит

Код:

Процедура ЗаписатьНаборЗаписейНаСервере(ИмяРегистра, Регистратор, ТаблицаДвижений = Неопределено, ТипРегистра = "РегистрНакопления") Экспорт
  
    Если ТипРегистра = "РегистрНакопления" Тогда
        Набор = РегистрыНакопления[ИмяРегистра].СоздатьНаборЗаписей();
      
        Если ТаблицаДвижений <> Неопределено Тогда
            Набор.мТаблицаДвижений = ТаблицаДвижений;
            ОбщегоНазначения.ВыполнитьДвижениеПоРегистру(Набор);      
        КонецЕсли;
      
    Иначе
        Если ТипРегистра = "РегистрБухгалтерии" Тогда
            Набор = РегистрыБухгалтерии[ИмяРегистра].СоздатьНаборЗаписей();
        ИначеЕсли ТипРегистра = "РегистрСведений" Тогда
            Набор = РегистрыСведений[ИмяРегистра].СоздатьНаборЗаписей();
        ИначеЕсли ТипРегистра = "РегистрРасчета" Тогда
            Набор = РегистрыРасчета[ИмяРегистра].СоздатьНаборЗаписей();
        КонецЕсли;
      
        Если ТаблицаДвижений <> Неопределено Тогда
            Набор.Загрузить(ТаблицаДвижений);
        КонецЕсли;
    КонецЕсли;
  
    Набор.Отбор.Регистратор.Установить(Регистратор);
    Набор.Записать();
  
КонецПроцедуры

Конкретно Набор.Записать()

подскажите пожалуйста где это смотреть,я в администрировании плохо разбираюсь ,если можете со скринами,спасибо

лично я нет,админа спросил он не в курсе что это