0
Admin_Net_1C
13.02.22
✎
09:21
|
Добрый день народ.
Требуется помощь гуру по мобильной платформе. Имеется: мобильная платформа 8.3.18.1363, самописная конфигурация.
Есть заполненный ТабличныйДокумент. Нужно его сохранить в файл на мобильном устройстве.
Никак не могу понять, как правильно это делается.
Мой код:
ПутьКФайлу = КаталогВременныхФайлов() + ПолучитьИмяВременногоФайла("PDF");
Попытка
Результат.Записать(ПутьКФайлу, ТипФайлаТабличногоДокумента.PDF);
Исключение
Инф = ИнформацияОбОшибке();
ПредупреждениеАсинх("Ошибка при записи данных отчета: " + Инф.Описание);
КонецПопытки;
АдресВХ = ПоместитьВоВременноеХранилище(ПутьКФайлу);
НачатьПомещениеФайлаНаСервер(Новый ОписаниеОповещения("ПослеПомещеенияФайлаНаСервер", ЭтотОбъект, АдресВХ),,,,ПутьКФайлу, ЭтаФорма.УникальныйИдентификатор);
на последней строке получаю ошибку что файл не найден по пути (ПутьКФайлу)
|
|
1
Admin_Net_1C
13.02.22
✎
09:48
|
Разобрался.
&НаКлиенте
Процедура СохранитьОтчет(Команда)
Диалог = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.ВыборКаталога); // ВыборКаталога. Если указываем Сохранение, то ошибка!
Диалог.Заголовок = "Выберите место сохранения";
ОповещениеЗавершения = Новый ОписаниеОповещения("ПослеПомещеенияФайлаНаСервер", ЭтотОбъект);
Диалог.Показать(ОповещениеЗавершения);
КонецПроцедуры
&НаКлиенте
Процедура ПослеПомещеенияФайлаНаСервер(пРезультат, пАдресВХ) Экспорт
Если пРезультат <> Неопределено Тогда
Попытка
Результат.ПолеСлева = 5;
Результат.ПолеСправа = 5;
Результат.ПолеСверху = 5;
Результат.ПолеСнизу = 5;
Результат.АвтоМасштаб = Истина;
Результат.Записать(пРезультат[0]+"Выполненные работы.PDF", ТипФайлаТабличногоДокумента.PDF);
Исключение
Инф = ИнформацияОбОшибке();
ПредупреждениеАсинх("Ошибка при записи данных отчета: " + Инф.Описание);
КонецПопытки;
КонецЕсли;
КонецПроцедуры
|
|