Имя: Пароль:
1C
1С v8
Отключить быстрый выбор форма выбора
0 BoiSaOne
 
09.12.20
16:27
Здраствуйте у меня проблема как убрать "Быстрый выбор" при нажатии кнопки "Выбрать" у поля выбора в таблице значения.
Т.е. при нажатии на кнопку добавить у меня открывается форма выбора с отбором после выбранный элемент добавляется в таблицу значений, но при изменении этого элемента (Выбрать F4)  у меня открывается эта же форма выбора с отбором, но у меня также появляется быстрый выбор элемента, как вот это быстрый выбор можно убрать у свойства поля "Номенклатура" БыстрыйВыбор выбрано значение Нет.
Вот ссылка на скрин:https://priscree.ru/img/26325861eeb375.jpg
1 vicof
 
09.12.20
16:44
Отказ = Истина;
2 vicof
 
09.12.20
16:44
тьфу
СтандартнаяОбработка = Истина
3 vicof
 
09.12.20
16:44
тьфу = ЛОжь
4 vicof
 
09.12.20
16:44
Пальцы и мозги не слушаются)
5 BoiSaOne
 
09.12.20
16:59
Хорошо, но у меня в модуле формы уже стоит СтандартнаяОбработка = Ложь;
6 vicof
 
09.12.20
17:20
Ну я не вижу, что у тебя там в коде написано
7 BoiSaOne
 
09.12.20
17:43
Вот код:
Процедура ТаблицаНоменклатураНоменклатураНачалоВыбора(Элемент, ДанныеВыбора, СтандартнаяОбработка)//Обработка начало выбора
    СтандартнаяОбработка = Ложь;
    Если НЕ ЗначениеЗаполнено(Цех) Тогда
        Сообщение = Новый СообщениеПользователю;
        Сообщение.Текст = "Необходимо выбрать цех!";
        Сообщение.Поле = "Цех";
        Сообщение.УстановитьДанные(ЭтотОбъект);
        Сообщение.Сообщить();
        Возврат;
    КонецЕсли;
    НачалоВыбораНаСервере(ДанныеВыбора);
    ФормаВыбора = ПолучитьФорму("Справочник.Номенклатура.ФормаВыбора",,Элемент);
    ФормаВыбора.Масштаб = ЭтаФорма.Масштаб;
    эОтбор = ФормаВыбора.Список.Отбор.Элементы.Добавить(Тип("ЭлементОтбораКомпоновкиДанных"));
    эОтбор.ЛевоеЗначение = Новый ПолеКомпоновкиДанных("Ссылка");
    эОтбор.ВидСравнения = ВидСравненияКомпоновкиДанных.ВСписке;
    эОтбор.ПравоеЗначение = ДанныеВыбора;
    эОтбор.Использование = Истина;
    эОтбор.РежимОтображения = РежимОтображенияЭлементаНастройкиКомпоновкиДанных.Недоступный;
    ФормаВыбора.Элементы.Список.Отображение = ОтображениеТаблицы.Список;
    ФормаВыбора.Открыть();
КонецПроцедуры


&НаСервере
Процедура НачалоВыбораНаСервере(ДанныеВыбора)//Отбираем данные выбора
    Запрос = Новый Запрос;
    Запрос.Текст =
    "ВЫБРАТЬ
    |    ЗначенияСвойствОбъектов.Объект КАК Объект
    |ИЗ
    |    РегистрСведений.ЗначенияСвойствОбъектов КАК ЗначенияСвойствОбъектов
    |ГДЕ
    |    ЗначенияСвойствОбъектов.Свойство В
    |            (ВЫБРАТЬ
    |                СвойстваОбъектов.Ссылка КАК Ссылка
    |            ИЗ
    |                ПланВидовХарактеристик.СвойстваОбъектов КАК СвойстваОбъектов
    |            ГДЕ
    |                СвойстваОбъектов.Код = ""00000000004"")
    |    И ЗначенияСвойствОбъектов.Значение = &Значение";
    Запрос.УстановитьПараметр("Значение", Цех);
    
    Результат = Запрос.Выполнить().Выгрузить();
    ДанныеВыбора = Новый СписокЗначений;
    Если Результат.Количество() > 0 Тогда
        ДанныеВыбора.ЗагрузитьЗначения(Результат.ВыгрузитьКолонку("Объект"));
    КонецЕсли;
КонецПроцедуры
8 Дык ё
 
09.12.20
17:51
так ты определись - или данные выбора или форма