Загрузка картинок через Мобильный клиент

[romgrom]

Загрузка картинок в 1с вот такой код отрабатывает на ура в Тонком клиенте в Толстом клиенте, а В Веб и Мобильном клиенте теряется имя и расширение файла.
Версия платформы 8.3.13
Вот что нашел по данному вопросу в просторах интернета

Значение переменной "Файл" это ещё одна особенность данного способа. Здесь стоит обратить внимание на "ИмяФайла". Дело в том, что помещая файл во временное хранилище, информация о его имени и расширении теряется. Поэтому не забудьте где-нибудь сохранять корректное имя файла, или хотя бы его расширение, чтобы потом не мучатся с вопросом "А это вордовский документ или мп3?"

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

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

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

&НаКлиенте
Процедура ОбработатьВыборФайла(ПомещенныеФайлы, ДополнительныеПараметры) Экспорт

   Если Параметры.Ключ.Пустая() Тогда
      ПоказатьПредупреждение(, "Документ необходимо предварительно записать!");
      
   КонецЕсли;
   
    Если ПомещенныеФайлы = Неопределено Тогда
        Возврат;
    КонецЕсли;

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


         КонецЕсли;
         
      КонецЕсли;
      
    КонецЦикла;
   
      


КонецПроцедуры // ()

[AIFrame]

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

Перем
реквизиты формы
Что-то еще.