Имя: Пароль:
1C
1С v8
Как сделать отбор быстрого подбора (обычное приложение)
0 axuli
 
05.10.15
08:26
Есть задача: сделать возможность помещения номенклатуры в архив, чтобы пользователи её не видели.

В 1С есть уже такой функционал с сотрудниками, там можно помещать сотрудников в архив.

Вроде все переписал по аналогии, и для формы списка номенклатуры и для формы выбора, однако с быстрым отбором не получется, хотя для справочника сотрудники, отбор быстрого подбора работает.

Подскажите где настраивается отбор быстрого подбора.
1 Cyberhawk
 
05.10.15
08:31
Параметры выбора, не?
2 Cyberhawk
 
05.10.15
08:32
А, походу нет такого на обычных формах, глянул в древней УТ 10.2
3 Cyberhawk
 
05.10.15
08:33
Ну кодом тогда
4 axuli
 
05.10.15
09:32
У справочника сотрудники - работает.
5 aleks_default
 
05.10.15
09:34
Переходите на УФ
6 axuli
 
05.10.15
19:08
Что никто не в курсе?
7 axuli
 
07.10.15
06:12
Отбой оказывается подобный отбор настраивается не в српавочнике, а во всех местах где есть выбор сотрудника через событие ОкончаниеВводаТекста(

Если кому интересно:
//{факсофт
//2015 10 06
//Козлов
//Задача: Архив номенклатуры
//{Добавлено

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




//{факсофт
//2015 10 06
//Козлов
//Задача: Архив номенклатуры
//{Добавлено

Процедура факсофтИсходныеКомплектующиеНоменклатураОкончаниеВводаТекста(Элемент, Текст, Значение, СтандартнаяОбработка)
    // Вставить содержимое обработчика.
    Значение = факсофт_ОбщийМодуль.ПодборНоменклатурыПоТексту(Текст);    
    СтандартнаяОбработка = Ложь;
КонецПроцедуры
//Добавлено}
//факсофт}