Помощь - Поиск - Пользователи - Календарь
Полная версия этой страницы: Отбор в запросе данных формы
Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7 > Программисту > Программирование в 1С Предприятие 8.2 > Программирование обычных форм 1С 8.2 и не интерфейсной логики
Fitzgerald
обычные формы
1С:Предприятие 8.3 (8.3.12.1412)
Бухгалтерия для Украины, редакция 1.2. (1.2.48.1)

Добрый вечер форумчане , сразу извиняюсь за глупый вопрос

На форме есть поле ввода с видом сравнения "в списке" в него надо выбрать несколько договоров по одному контрагенту и передать выбранные поля в запрос

Процедура КнопкаВыполнитьНажатие(Кнопка)
    
    ЭтотОбъект.ДоговорыКонтрагентов = ЭтаФорма.ЭлементыФормы.ДоговорыКонтрагентов.Значение;
    
    
    Запрос = Новый Запрос;
    Запрос.УстановитьПараметр("ДоговорКонтрагента", ЭтотОбъект.ДоговорыКонтрагентов);
    Запрос.Текст =
        "ВЫБРАТЬ
        |    РеализацияТоваровУслуг.Контрагент,
        |    РеализацияТоваровУслуг.ДоговорКонтрагента
        |ИЗ
        |    Документ.РеализацияТоваровУслуг КАК РеализацияТоваровУслуг
        |ГДЕ
        |    РеализацияТоваровУслуг.ДоговорКонтрагента = &ДоговорКонтрагента";
        
    РезультатЗапроса = Запрос.Выполнить();
    
    ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать();
    
    Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
        Сообщить(ВыборкаДетальныеЗаписи.Контрагент);
        Сообщить(ВыборкаДетальныеЗаписи.ДоговорКонтрагента);
    КонецЦикла;
    
    //}}КОНСТРУКТОР_ЗАПРОСА_С_ОБРАБОТКОЙ_РЕЗУЛЬТАТА
    
КонецПроцедуры

Процедура ПередОткрытием(Отказ, СтандартнаяОбработка)
    
    СписокВыбора  = Новый СписокЗначений;
    СписокВыбора.Добавить(ВидСравнения.Равно);
    СписокВыбора.Добавить(ВидСравнения.ВСписке);


  
    ЭлементыФормы.ПолеВидаСравненияДоговорКонтрагента.СписокВыбора = СписокВыбора;
    ЭлементыФормы.ПолеВидаСравненияДоговорКонтрагента.Значение     = ВидСравнения.Равно;
    ЭлементыФормы.ДоговорыКонтрагентов.ТипЗначения = Новый ОписаниеТипов("СправочникСсылка.ДоговорыКонтрагентов");
    
КонецПроцедуры


вообщем как передать выбранный список в запрос?
nik389
Fitzgerald @ Сегодня, 15:57 необходимо зарегистрироваться для просмотра ссылки ,
как передать, очень просто:
Запрос.УстановитьПараметр("МойСписок",МойСписок);
awp
вместо
РеализацияТоваровУслуг.ДоговорКонтрагента = &ДоговорКонтрагента
используйте
РеализацияТоваровУслуг.ДоговорКонтрагента В (&МойСписок)

Fitzgerald
надо было сразу спросить, спасибо ребята , вы супер
Vofka
Fitzgerald, для спасибо у нас даже специальная кнопка есть.
Для просмотра полной версии этой страницы, пожалуйста, пройдите по ссылке.