|
Выбор реквизита из запроса в код | ☑ | ||
|---|---|---|---|---|
|
0
Sympak
11.11.21
✎
07:37
|
1С 8.3
Доброе утро. &НаСервере Имеется запрос с выбранным документом. В нем выбираются реквизиты, которым присваивается параметр "Владелец",Объект.ИмяАбонентаДляПечати. После Возврат СтрукКонтакта; Переходит &НаКлиенте и ровняется СтрукКонтакта = ДанныеПаспорта (); В поле замены пишу СтрукКонтакта.Фамилия и вводимые пользователем данные подгружаются. Проблема заключается, что я забыл что я писал перед ЕСЛИ (////////////Тут был код///////////////). В эту сроку кода я вписывал реквизит запроса и его значение если он пуст ("Фамилия, Имя, Отчество", "", "", ""); &НаКлиенте Процедура Печать() СтрукКонтакта = ДанныеПаспорта (); ... Замена = ДокументВорд.Content.Find; Замена.Execute("[ФИО]", Ложь, Истина, Ложь, , , Истина, , Ложь, СтрукКонтакта.Фамилия); &НаСервере Функция ДанныеПаспорта () ////////////Тут был код/////////////// Если ТипЗнч(Объект.ИмяАбонентаДляПечати) <> Тип("ДокументСсылка.Документ") Тогда Сообщить("Данные не введены"); Отказ = Истина; КонецЕсли; Запрос = Новый Запрос ("ВЫБРАТЬ | Документ.Фамилия КАК Фамилия, | Документ.Имя КАК Имя, | Документ.Отчество КАК Отчество, | Документ.ДатаРождения КАК ДатаРождения, | Документ.СерияПаспорта КАК СерияПаспорта, | Документ.НомерПаспорта КАК НомерПаспорта, | Документ.ДатаВыдачи КАК ДатаВыдачи |ИЗ | Документ.Документ КАК Документ"); Запрос.УстановитьПараметр("Владелец",Объект.ИмяАбонентаДляПечати); Выборка = Запрос.Выполнить().Выбрать(); Если Выборка.Следующий() Тогда ЗаполнитьЗначенияСвойств(СтрукКонтакта,Выборка); КонецЕсли; Возврат СтрукКонтакта; |
|||
|
1
RomaH
naïve
11.11.21
✎
07:42
|
СтрукКонтакта = Новый Структура("Фамилия, Имя, Отчество", "", "", "");
|
|||
|
2
RomaH
naïve
11.11.21
✎
07:42
|
но лучше не программировать в состоянии опьянения
|
|||
|
3
Sympak
11.11.21
✎
07:49
|
RomaH
Cпасибо! Закодируюсь как только так сразу)) |
| Форум | Правила | Описание | Секции | Поиск |