8.х 1С:Документооборот. Загрузка файла в карточку документа

Конфигурация 1С:Документооборот.

Есть обработка, которая загружает файлы с ПК в карточку документа. Загрузка происходит напрямик в БД.

Код:

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

Эта штука хороша, когда файлы хранятся в базе.
Как мне переписать эту обработку, если файлы хранятся не в базе, а в томах на диске?

Справочники.Пользователи.НайтиПоНаименованию("Администратор") - надёжно

Надежнее не придумаешь. Тут недавно искал пользователя по наименованию и не нашел! Оказывается он был не "Администратор", а "Администратор__________" (тут типа куча пробелов) - это так КА считает, когда добавляешь нового пользователя в базу..

да, тоже сталкивался с этими пробелами