День добрый!
Чёт я совсем запуталась [smile=:/]
Подбор:
Процедура ДобавитьИзСправочника() Фрм = ""; ОткрытьПодбор("Справочник.Номенклатура",,Фрм,1); Фрм.ВыборГруппы(1); КонецПроцедуры // ДобавитьИзСправочника
Обработка подбора:
Процедура ОбработкаПодбора(ВыбЗнач, Фрм) мВидЦенника = ВыбЗнач.ВидЦенника.ПорядковыйНомер(); мВитрина = ВыбЗнач.ВитриннаяПозиция; Поз = 0; Если ВыбЗнач.ЭтоГруппа() = 1 Тогда Если Вопрос("Добавить в таблицу все элементы из указанной папки?", "Да+Нет", 60) = "Да" Тогда ДобавитьВсюПапку(ВыбЗнач); Иначе Предупреждение("Выберите элемент."); Возврат; КонецЕсли; Иначе ДобавитьОдинЭлемент(ВыбЗнач, Поз, мВидЦенника, мВитрина); КонецЕсли; КонецПроцедуры // мОбработкаПодбора
Как закрыть форму подбора?