Как открыть файл pdf в мобильном клиенте 1с

Форум Программирование Мобильная разработка (MobileDev)

1. Jullis 30.10.19 11:37 Сейчас в теме

Создаю команду, которая формирует печатную форму, записываю ее в файл и открывает. Файл не открывается ошибка "Каталог не обнаружен '\storage\emulated\0\Android\data\com.e1c.mobile.client\files\Счет НФНФ-000606 от 2019-10-30.pdf'. 3(0x00000003): Системе не удается найти указанный путь". Посоветуйте , пожалуйста, что можно с этим сделать.
Кусок кода.

&НаКлиенте
Процедура ОтправитьЗаказВPDF(Команда)
	
	// Сбор статистики
	СборСтатистикиКлиентСерверПереопределяемый.ОтправитьДействиеВGA(ЭтаФорма.ИмяФормы + ".Команда." + Команда.Имя);
	// Конец Сбор статистики

	ЗаписатьЗаказ();
	СтруктураВозврата = ЗаписатьВPDF(КаталогДокументов());
	 
	ЗапуститьПриложение(СтруктураВозврата.ПолноеИмяФайла,,Истина);
	  	
	
	КонецПроцедуры

&НаСервере
Функция ЗаписатьВPDF(КаталогДокументов)
	
	ПечатнаяФорма = СформироватьПечатнуюФорму();
	
	ИмяФайла = НСтр("ru='Счет ';en='Invoice '")
	+ Объект.Номер + НСтр("ru=' от ';en=' of '")
	+ ОбщегоНазначенияКлиентСервер.ПолучитьФорматированнуюСтрокуДатыДляФайла(Объект.Дата) + ".pdf";
	ПолноеИмяФайла = ОбщегоНазначенияКлиентСервер.ПолучитьПолноеИмяФайла(КаталогДокументов, ИмяФайла);     
	ПечатнаяФорма.Записать(ПолноеИмяФайла, ТипФайлаТабличногоДокумента.PDF); 
		
	Возврат Новый Структура("ИмяФайла, ПолноеИмяФайла", ИмяФайла, ПолноеИмяФайла);
	 	
КонецФункции

Показать

По теме из базы знаний

Найденные решения

2. Jullis 30.10.19 16:02 Сейчас в теме

Проблема решилась на действия делать на &НаКлиенте

&НаКлиенте
Процедура ОтправитьЗаказВPDF(Команда)
	
	// Сбор статистики
	СборСтатистикиКлиентСерверПереопределяемый.ОтправитьДействиеВGA(ЭтаФорма.ИмяФормы + ".Команда." + Команда.Имя);
	// Конец Сбор статистики
	ЗаписатьЗаказ();
	//СтруктураВозврата = ЗаписатьВPDF(КаталогДокументов());
	
	
	ПечатнаяФорма = СформироватьПечатнуюФорму();
	ИмяФайла = НСтр("ru='Счет ';en='Invoice '")
	+ Объект.Номер + НСтр("ru=' от ';en=' of '")
	+ ОбщегоНазначенияКлиентСервер.ПолучитьФорматированнуюСтрокуДатыДляФайла(Объект.Дата) + ".pdf";
	//ПолноеИмяФайла = ОбщегоНазначенияКлиентСервер.ПолучитьПолноеИмяФайла(КаталогДокументов(), ИмяФайла); 
	
	ПолноеИмяФайла = ПолучитьИмяВременногоФайла("PDF");
	ПечатнаяФорма.Записать(ПолноеИмяФайла,ТипФайлаТабличногоДокумента.PDF);
	
	
	ЗапуститьПриложение(ПолноеИмяФайла,,Истина);
	  	
	
	КонецПроцедуры

Показать

Остальные ответы

Подписаться на ответы Инфостарт бот

Свернуть все

2. Jullis 30.10.19 16:02 Сейчас в теме

Проблема решилась на действия делать на &НаКлиенте

&НаКлиенте
Процедура ОтправитьЗаказВPDF(Команда)
	
	// Сбор статистики
	СборСтатистикиКлиентСерверПереопределяемый.ОтправитьДействиеВGA(ЭтаФорма.ИмяФормы + ".Команда." + Команда.Имя);
	// Конец Сбор статистики
	ЗаписатьЗаказ();
	//СтруктураВозврата = ЗаписатьВPDF(КаталогДокументов());
	
	
	ПечатнаяФорма = СформироватьПечатнуюФорму();
	ИмяФайла = НСтр("ru='Счет ';en='Invoice '")
	+ Объект.Номер + НСтр("ru=' от ';en=' of '")
	+ ОбщегоНазначенияКлиентСервер.ПолучитьФорматированнуюСтрокуДатыДляФайла(Объект.Дата) + ".pdf";
	//ПолноеИмяФайла = ОбщегоНазначенияКлиентСервер.ПолучитьПолноеИмяФайла(КаталогДокументов(), ИмяФайла); 
	
	ПолноеИмяФайла = ПолучитьИмяВременногоФайла("PDF");
	ПечатнаяФорма.Записать(ПолноеИмяФайла,ТипФайлаТабличногоДокумента.PDF);
	
	
	ЗапуститьПриложение(ПолноеИмяФайла,,Истина);
	  	
	
	КонецПроцедуры

Показать

Оставьте свое сообщение

E-mail: