Имя: Пароль:
1C
 
Выбор реквизита из запроса в код
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пасибо!
Закодируюсь как только так сразу))