Нужно в печатную форму засунуть объект, который находится в другом документе
По теме из базы знаний
Ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
(4) Документ ворд
И вот как пытался получить "НомерДоговора" из другого документа
&НаКлиенте
Процедура НапечататьДокумент(Объект)
Word = Новый COMОбъект("Word.Application");
Макет = ПолучитьМакетНаСервере();
ВременныйПуть = КаталогВременныхФайлов();
ИмяВременногоФайла = ВременныйПуть + "Приложение2.docx";
Макет.Записать(ИмяВременногоФайла);
ТекДок = Word.Documents.ADD(ИмяВременногоФайла);
//СтруктураДоверенности = ПолучитьДанныеДоверенности(СсылкаНаОбъект.Менеджер);
//НомерДатаДоверенности = "№ " + СтруктураДоверенности.Номер + " от " + СтруктураДоверенности.Дата;
ТекДок.Variables("NomerPrilojen").Value = Объект.Номер;
ТекДок.Variables("NomerDogovora").Value = НомерДоговора();
ТекДок.Variables("Data").Value = Строка(Формат(Объект.Дата,"ДЛФ = ДД"));
ТекДок.Variables("Kontragent").Value = Строка(Объект.Контрагент);
//ТекДок.Variables("Director").Value = Строка(Объект.Директо
ТекДок.Variables("Kontragent").Value = Строка(Объект.Контрагент);
ТекДок.Variables("Data").Value = Строка(Формат(Объект.Дата ,"ДЛФ = ДД"));
ТекДок.Fields.Update();
Word.ActiveWindow.View.ShowFieldCodes = False;
Word.Visible = True;
КонецПроцедуры
ПоказатьИ вот как пытался получить "НомерДоговора" из другого документа
&НаСервере
Функция НомерДоговора()
Запрос = Новый Запрос;
Запрос.Текст = "ВЫБРАТЬ
| АРБИС_ДоговорНаКомплексноеОбслуживание.НомерДоговора
|ИЗ
| Документ.АРБИС_ДоговорНаКомплексноеОбслуживание КАК АРБИС_ДоговорНаКомплексноеОбслуживание
|ГДЕ
| АРБИС_ДоговорНаКомплексноеОбслуживание.НомерДоговора = &НомерДоговора";
Запрос.УстановитьПараметр("НомерДоговор",ЭтотОбъект.НомерДоговора);
КонецФункции
Показать
(5)
Пс, сервер. Мне нужен номер договора, у которого вот такой номер.
Если я понял правильно,
меняем на
Запрос.Текст = "ВЫБРАТЬ
| АРБИС_ДоговорНаКомплексноеОбслуживание.НомерДоговора
|ИЗ
| Документ.АРБИС_ДоговорНаКомплексноеОбслуживание КАК АРБИС_ДоговорНаКомплексноеОбслуживание
|ГДЕ
| АРБИС_ДоговорНаКомплексноеОбслуживание.НомерДоговора = &НомерДоговора"
Пс, сервер. Мне нужен номер договора, у которого вот такой номер.
Если я понял правильно,
ТекДок.Variables("NomerDogovora").Value = НомерДоговора();
меняем на
ТекДок.Variables("NomerDogovora").Value = Объект.Договор.Номер;
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот