Здраствуйте у меня проблема как убрать "Быстрый выбор" при нажатии кнопки "Выбрать" у поля выбора в таблице значения.
Т.е. при нажатии на кнопку добавить у меня открывается форма выбора с отбором после выбранный элемент добавляется в таблицу значений, но при изменении этого элемента (Выбрать F4) у меня открывается эта же форма выбора с отбором, но у меня также появляется быстрый выбор элемента, как вот это быстрый выбор можно убрать у свойства поля "Номенклатура" БыстрыйВыбор выбрано значение Нет.
Вот ссылка на скрин:https://priscree.ru/img/26325861eeb375.jpg
Вот код:
Процедура ТаблицаНоменклатураНоменклатураНачалоВыбора(Элемент, ДанныеВыбора, СтандартнаяОбработка)//Обработка начало выбора
СтандартнаяОбработка = Ложь;
Если НЕ ЗначениеЗаполнено(Цех) Тогда
Сообщение = Новый СообщениеПользователю;
Сообщение.Текст = "Необходимо выбрать цех!";
Сообщение.Поле = "Цех";
Сообщение.УстановитьДанные(ЭтотОбъект);
Сообщение.Сообщить();
Возврат;
КонецЕсли;
НачалоВыбораНаСервере(ДанныеВыбора);
ФормаВыбора = ПолучитьФорму("Справочник.Номенклатура.ФормаВыбора",,Элемент);
ФормаВыбора.Масштаб = ЭтаФорма.Масштаб;
эОтбор = ФормаВыбора.Список.Отбор.Элементы.Добавить(Тип("ЭлементОтбораКомпоновкиДанных"));
эОтбор.ЛевоеЗначение = Новый ПолеКомпоновкиДанных("Ссылка");
эОтбор.ВидСравнения = ВидСравненияКомпоновкиДанных.ВСписке;
эОтбор.ПравоеЗначение = ДанныеВыбора;
эОтбор.Использование = Истина;
эОтбор.РежимОтображения = РежимОтображенияЭлементаНастройкиКомпоновкиДанных.Недоступный;
ФормаВыбора.Элементы.Список.Отображение = ОтображениеТаблицы.Список;
ФормаВыбора.Открыть();
КонецПроцедуры
&НаСервере
Процедура НачалоВыбораНаСервере(ДанныеВыбора)//Отбираем данные выбора
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
| ЗначенияСвойствОбъектов.Объект КАК Объект
|ИЗ
| РегистрСведений.ЗначенияСвойствОбъектов КАК ЗначенияСвойствОбъектов
|ГДЕ
| ЗначенияСвойствОбъектов.Свойство В
| (ВЫБРАТЬ
| СвойстваОбъектов.Ссылка КАК Ссылка
| ИЗ
| ПланВидовХарактеристик.СвойстваОбъектов КАК СвойстваОбъектов
| ГДЕ
| СвойстваОбъектов.Код = ""00000000004"")
| И ЗначенияСвойствОбъектов.Значение = &Значение";
Запрос.УстановитьПараметр("Значение", Цех);
Результат = Запрос.Выполнить().Выгрузить();
ДанныеВыбора = Новый СписокЗначений;
Если Результат.Количество() > 0 Тогда
ДанныеВыбора.ЗагрузитьЗначения(Результат.ВыгрузитьКолонку("Объект"));
КонецЕсли;
КонецПроцедуры
Требовать и эффективности, и гибкости от одной и той же программы — все равно, что искать очаровательную и скромную жену... по-видимому, нам следует остановиться на чем-то одном из двух. Фредерик Брукс-младший