Процедура УслугиУслугаНачалоВыбора(Элемент, СтандартнаяОбработка)
СтандартнаяОбработка = Ложь;
ТипНоменклатуры = Перечисления.ТипыНоменклатуры.Услуга;
ФормаВыбора = Справочники.Номенклатура.ПолучитьФормуВыбора("ФормаВыбора");
ФормаВыбора.РежимВыбора = Истина;
ЭлементОтбора = ФормаВыбора.СправочникСписок.Отбор.ВидНоменклатуры;
ЭлементОтбора.Значение = Справочники.ВидыНоменклатуры.НайтиПоРеквизиту("ТипНоменклатуры", ТипНоменклатуры);
ЭлементОтбора.Использование = Истина;
ТекущиеДанные = ЭлементыФормы.Услуги.ТекущиеДанные;
Если ТекущиеДанные <> Неопределено Тогда
ТекНоменклатура = ТекущиеДанные.Номенклатура;
Если ЗначениеЗаполнено(ТекНоменклатура) Тогда
ФормаВыбора.ПараметрТекущаяСтрока = ТекНоменклатура;
КонецЕсли;
КонецЕсли;
Результат = ФормаВыбора.ОткрытьМодально();
Если Результат <> Неопределено Тогда
ЭлементыФормы.Услуги.ТекущиеДанные.Номенклатура = Результат;
КонецЕсли;
КонецПроцедуры
Подписаться на:
Комментарии к сообщению (Atom)
Комментариев нет:
Отправить комментарий