Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
22 ноя 2024, 17:35

Метод НачатьПомещениеФайла перестал работать

Автор Natain14, 26 фев 2020, 14:36

0 Пользователей и 1 гость просматривают эту тему.

Natain14

Здравствуйте, обновили платформу на 8.3.15 и бухгалтерию на 3.0.75.93.
После этого перестал работать метод НачатьПомещениеФайла в форме обработки УниверсальныйОбменДаннымиXML.
Причем при таком вызове он отрабатывает
&НаКлиенте
Процедура ВыполнитьЗагрузкуИзФормы()

АдресФайла = "";
ИмяФайлаДляРасширения = "";

ДобавитьСтрокуКСпискуВыбора(Элементы.ИмяФайлаОбмена.СписокВыбора, ИмяФайлаОбмена, ЗагрузкаДанныхИхФайла);

Если ЭтоКлиент Тогда

ОписаниеОповещения = Новый ОписаниеОповещения("ВыполнитьЗагрузкуИзФормыЗавершение", ЭтотОбъект);
НачатьПомещениеФайла(ОписаниеОповещения, АдресФайла, , , УникальныйИдентификатор);

Иначе

Если ПустоеЗначениеРеквизита(ИмяФайлаОбмена, "ИмяФайлаОбмена", Элементы.ИмяФайлаОбмена.Заголовок) Тогда
Возврат;
КонецЕсли;

ВыполнитьЗагрузкуИзФормыЗавершение(Истина, АдресФайла, ИмяФайлаДляРасширения, Неопределено);

КонецЕсли;

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


А при таком выходит ошибка. "Перемещение файла невозможно, повторите попытку позднее."

&НаКлиенте
Процедура ВыполнитьЗагрузкуИзФормы()

АдресФайла = "";
ИмяФайлаДляРасширения = "";

ДобавитьСтрокуКСпискуВыбора(Элементы.ИмяФайлаОбмена.СписокВыбора, ИмяФайлаОбмена, ЗагрузкаДанныхИхФайла);

Если ЭтоКлиент Тогда

Режим = РежимДиалогаВыбораФайла.ВыборКаталога;
    ДиалогВыбораКаталога = Новый ДиалогВыбораФайла(Режим) ;
    ДиалогВыбораКаталога.Заголовок = "Выберите каталог";
    Если НЕ ДиалогВыбораКаталога.Выбрать() Тогда
        Сообщить("Каталог НЕ ВЫБРАН", СтатусСообщения.Внимание);
Возврат;
    Иначе   
        КаталогЗагрузки = ДиалогВыбораКаталога.Каталог;
КонецЕсли;

ОписаниеОповещения = Новый ОписаниеОповещения("ВыполнитьЗагрузкуИзФормыЗавершение", ЭтотОбъект);

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

Иначе

Если ПустоеЗначениеРеквизита(ИмяФайлаОбмена, "ИмяФайлаОбмена", Элементы.ИмяФайлаОбмена.Заголовок) Тогда
Возврат;
КонецЕсли;

ВыполнитьЗагрузкуИзФормыЗавершение(Истина, АдресФайла, ИмяФайлаДляРасширения, Неопределено);

КонецЕсли;

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



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

Natain14


Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск