Создание документа по выборке результата запроса

[Foror]

Добрый день! В консоли запросов для управляемого приложения пытаюсь написать код, который по итогу создаст документ на основании выборки запроса.
По итогу код отрабатывает корректно, но документ не создается. Подскажите пожалуйста, в чем может быть ошибка.
Управление торговлей, редакция 11.1 (11.1.10.103) Толстый клиент
Скриншоты - запрос

Обработка в консоли -

Документ по итогу должен будет выглядеть так(нет обязательных реквизитов для заполнения) пример

Текст обработки

   //!!ТОЛЬКО ДЛЯ ВЫПОЛНЕНИЯ НА СЕРВЕРЕ (КНОПКА "Выполнить код на сервере")!!
   //РезультатЗапросаВрем.Выгрузить();
   ВыборкаИзРезультатаЗапроса = РезультатЗапросаВрем.Выбрать();
   ПодсортировкаРозницыОбъект = Документы.ПодсортировкаРозницы.СоздатьДокумент();
   ПодсортировкаРозницыОбъект.Дата           = ТекущаяДата();
   ПодсортировкаРозницыОбъект.СоздалДокумент = Пользователи.ТекущийПользователь();

   Пока ВыборкаИзРезультатаЗапроса.Следующий() Цикл
      ТекущаяСтрока = ПодсортировкаРозницыОбъект.СписокТовара.Добавить();
      ТекущаяСтрока.Номенклатура   = ВыборкаИзРезультатаЗапроса.Номенклатура;
      ТекущаяСтрока.Характеристика     = ВыборкаИзРезультатаЗапроса.Характеристика;
      ТекущаяСтрока.Количество         = ВыборкаИзРезультатаЗапроса.ВНаличииОстаток;
      ТекущаяСтрока.Упаковка          = Справочники.УпаковкиНоменклатуры.НайтиПоНаименованию("шт",Истина,,ТекущаяСтрока.Номенклатура);
   КонецЦикла;




------------------------
Добавление по выборке для регистра сведений к примеру, все работает
//!!ТОЛЬКО ДЛЯ ВЫПОЛНЕНИЯ НА СЕРВЕРЕ (КНОПКА "Выполнить код на сервере")!!
    //РезультатЗапросаВрем.Выгрузить();
    ВыборкаИзРезультатаЗапроса = РезультатЗапросаВрем.Выбрать();

    Пока ВыборкаИзРезультатаЗапроса.Следующий() Цикл
        НовыйМенеджерЗаписи = РегистрыСведений.СоответствиеНоменклатурыIDPLU.СоздатьМенеджерЗаписи();
        НовыйМенеджерЗаписи.Номенклатура   = ВыборкаИзРезультатаЗапроса.Номенклатура;
        НовыйМенеджерЗаписи.Характеристика = ВыборкаИзРезультатаЗапроса.Характеристика;
        НовыйМенеджерЗаписи.ID             = ВыборкаИзРезультатаЗапроса.ID;
     
        Попытка
            НовыйМенеджерЗаписи.Записать();
        Исключение
        КонецПопытки;
    КонецЦикла;

[АлександрВладимирович]

ПодсортировкаРозницыОбъект.Записать();