Передача pdf файла с сервера на веб-клиент 8.3 Инвентаризация и управление имуществом 2.0

@UlianaUliana · Регистрация: 30.07.2021

Студворк — интернет-сервис помощи студентам

Пытаюсь передать файл PDF с сервера на веб-клиент. Передаю в виде двоичных данных, но появляется ошибка: "Ошибка при выполнении файловой операции 'e1cib/tempstorage/4144dbb3-925f-4d6e-b883-5d31701b5594?seanceId=8c967155-1ee0-494c-90f0-1d011d73d206&seanceId=8c967155-1ee0-494c-90f0-1d011d73d206'. Значение данного типа невозможно преобразовать для передачи как файл. (Неопределено)". Проблема в том , что передаю двоичные данные? в каком виде тогда передавать подскажите, пожалуйста.

1C
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
&НаКлиенте
Процедура Печать(ИдентификаторКоманды, МассивОбъектов) Экспорт
    АдресВременногоХранилища="";    
    ПечатьНаСервере(ИдентификаторКоманды,МассивОбъектов,АдресВременногоХранилища);    
    НачатьПолучениеФайлаССервера(АдресВременногоХранилища);     
КонецПроцедуры
 
&НаСервере
Процедура ПечатьНаСервере(ИдентификаторКоманды,МассивОбъектов,АдресВременногоХранилища)
        
        Для Каждого ДокОбъект Из МассивОбъектов Цикл
        Данные = ПолучитьДанные(ДокОбъект);
        
        Если данные <> Неопределено Тогда
            Word = Новый COMОбъект("Word.Application");
            Макет = ПолучитьМакетСервер(ИдентификаторКоманды);
            временныйПуть = КаталогВременныхФайлов();
            имяВременногоФайла = временныйПуть + "gph.docx";
            имяВременногоФайлаPDF = временныйПуть + "gph.pdf";
            Макет.Записать(имяВременногоФайла);
            ТекДок = Word.Documents.ADD(имяВременногоФайла);
            
            ЗначениеВЗакладку(ТекДок,"НомерДоговора", Данные.НомерДоговора);
            ЗначениеВЗакладку(ТекДок,"НомерДоговора2", Данные.НомерДоговора);
            ЗначениеВЗакладку(ТекДок,"НомерДоговора3", Данные.НомерДоговора);
            ЗначениеВЗакладку(ТекДок,"ДатаДокумента", Формат(Данные.Дата, "ДЛФ=ДД"));
            ЗначениеВЗакладку(ТекДок,"ДатаДокумента2", Формат(Данные.Дата, "ДЛФ=ДД"));
            ЗначениеВЗакладку(ТекДок,"ДатаДокумента3 ", Формат(Данные.Дата, "ДЛФ=ДД"));
            ЗначениеВЗакладку(ТекДок,"ДатаДокумента4", Формат(Данные.Дата, "ДЛФ=ДД"));
            ЗначениеВЗакладку(ТекДок,"ПолноеНаименованиеОрганизации", Данные.НаименованиеПолное);
            ЗначениеВЗакладку(ТекДок,"ПолноеНаименованиеОрганизации2", Данные.НаименованиеПолное);
            ЗначениеВЗакладку(ТекДок,"КраткоеНаименованиеОрганизации", Данные.НаименованиеСокращенное);
            КраткоеФИОФизЛица = ФамилияИнициалы(Строка(Данные.ФизическоеЛицо));
            ЗначениеВЗакладку(ТекДок,"КраткоеФИОФизЛица", КраткоеФИОФизЛица);
            ЗначениеВЗакладку(ТекДок,"КраткоеНаименованиеОрганизации2", Данные.НаименованиеСокращенное);            
            ЗначениеВЗакладку(ТекДок,"АдресОрганизации", Данные.ЮрАдрес);
            ЗначениеВЗакладку(ТекДок,"ИНН", Данные.ИНН);
            ЗначениеВЗакладку(ТекДок,"КПП", Данные.КПП);
            ЗначениеВЗакладку(ТекДок,"КраткоеФИОФизЛица2", КраткоеФИОФизЛица);
            ЗначениеВЗакладку(ТекДок,"КратФИОФизЛица", КраткоеФИОФизЛица);
            ЗначениеВЗакладку(ТекДок,"ФИОФизЛица", Данные.ФизическоеЛицо);
            ЗначениеВЗакладку(ТекДок,"АдресФизЛица", Данные.АдресФизЛица);  
            ЗначениеВЗакладку(ТекДок,"ИННФЛ", Данные.ИННФЛ);            
            ЗначениеВЗакладку(ТекДок,"ДанныеПаспортаФизЛица", Данные.Паспорт);
                    
            
            ТекДок.Tables(2).Select();
            СписокПодарков = СтруктураПодарки(ДокОбъект);
            I = 1;
            Для Каждого Подарок Из СписокПодарков Цикл
                word.selection.InsertRowsBelow(1);
                word.selection.rows(1).cells(1).Range.Text = I;
                word.selection.rows(1).cells(2).Range.Text = Строка(Подарок.Значение.Название);
                word.selection.rows(1).cells(3).Range.Text = Строка(Подарок.Значение.Количество);
                word.selection.rows(1).cells(4).Range.Text = Строка(Подарок.Значение.ИмуществоЦенаПоступления);
                word.selection.rows(1).cells(5).Range.Text = Строка(Подарок.Значение.Сумма);
                I = I + 1;
            КонецЦикла;
            
            Range = ТекДок.Range();
            Table = Range.Tables(5);
            СтрокаОбразец = Table.Rows(1);
            Для Каждого Подарок из СписокПодарков Цикл
                НоваяСтрока = Table.Rows.Add(СтрокаОбразец);
                НоваяСтрока.Cells(1).Range.Text = Строка(Подарок.Значение.Название);                
            КонецЦикла;            
            СтрокаОбразец.Delete();    
            
            ТекДок.Fields.Update();
            //ТекДок.ExportAsFixedFormat(имяВременногоФайлаPDF , 17);
            
            //Word.ActiveWindow.View.ShowFieldCodes = False;
            //Word.Visible=Истина;
            ТекДок.SaveAs2(имяВременногоФайлаPDF,17);
            ТекДок.Close(Ложь);
                        
            Word.Application.Quit(0);
            
            
            ДвоичныеДанные = Новый ДвоичныеДанные(имяВременногоФайлаPDF);
            АдресВременногоХранилища = ПоместитьВоВременноеХранилище(ДвоичныеДанные,КаталогВременныхФайлов()+"gph.pdf");
 
        КонецЕсли;
    КонецЦикла;    
 
    
        
 
КонецПроцедуры

@Dethmontt · 06.08.2021, 00:05

1C
1
АдресВременногоХранилища = ПоместитьВоВременноеХранилище(ДвоичныеДанные);

Новые блоги и статьи Все статьи Все блоги /
Расчёт токов в цепи постоянного тока igorrr37 05.01.2026 / * Дана цепь постоянного тока с сопротивлениями и напряжениями. Надо найти токи в ветвях. Программа составляет систему уравнений по 1 и 2 законам Кирхгофа и решает её. Последовательность действий:. . .	Новый CodeBlocs. Версия 25.03 palva 04.01.2026 Оказывается, недавно вышла новая версия CodeBlocks за номером 25. 03. Когда-то давно я возился с только что вышедшей тогда версией 20. 03. С тех пор я давно снёс всё с компьютера и забыл. Теперь. . .	Модель микоризы: классовый агентный подход anaschu 02.01.2026 Раньше это было два гриба и бактерия. Теперь три гриба, растение. И на уровне агентов добавится между грибами или бактериями взаимодействий. До того я пробовал подход через многомерные массивы,. . .	Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост. Programma_Boinc 28.12.2025 Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост. Налог на собак: https:/ / ********/ gallery/ V06K53e Финансовый отчет в Excel: https:/ / ********/ gallery/ bKBkQFf Пост отсюда. . .
Кто-нибудь знает, где можно бесплатно получить настольный компьютер или ноутбук? США. Programma_Boinc 26.12.2025 Нашел на реддите интересную статью под названием Anyone know where to get a free Desktop or Laptop? Ниже её машинный перевод. После долгих разбирательств я наконец-то вернула себе. . .	Thinkpad X220 Tablet — это лучший бюджетный ноутбук для учёбы, точка. Programma_Boinc 23.12.2025 Рецензия / Мнение/ Перевод Нашел на реддите интересную статью под названием The Thinkpad X220 Tablet is the best budget school laptop period . Ниже её машинный перевод. Thinkpad X220 Tablet —. . .	PhpStorm 2025.3: WSL Terminal всегда стартует в ~ and_y87 14.12.2025 PhpStorm 2025. 3: WSL Terminal всегда стартует в ~ (home), игнорируя директорию проекта Симптом: После обновления до PhpStorm 2025. 3 встроенный терминал WSL открывается в домашней директории. . .	Как объединить две одинаковые БД Access с разными данными VikBal 11.12.2025 Помогите пожалуйста !! Как объединить 2 одинаковые БД Access с разными данными.