- МЕНЮ
 - В избранное
Самые важные новости
 
Царьков Валерий
Зик 2.35 отбор в справочнике "Штатное расписание". (25.03.2003)

        В зик 2.35 справочник Штатное расписание не подчинен и имеет один уровень. По этой причине работать с ним, мягко говоря, неудобно. Особенно если количество элементов в нем исчисляется сотнями. Дабы здорово не коверкать конфигурацию, я решил воспользоваться отбором по справочнику.
        сначала нужно установить флаг отбор по реквизиту для реквизита Должнлсть (для реквизита Подразделение флаг уже установлен).


        Открываем форму справочник ШтатноеРасписание форму списка ФормаСписка. Сначала напишем процедуры (я поместил их в конец модуля).
//******************************************************************************
Процедура УстФильтра()
        Что=ВыбФильтр.ПолучитьЗначение(ВыбФильтр.ТекущаяСтрока());
        УстановитьОтбор(Что,ТекФильтр);
КонецПроцедуры

//******************************************************************************
Процедура ВыборФильтра()
        Что=ВыбФильтр.ПолучитьЗначение(ВыбФильтр.ТекущаяСтрока());
        Форма.ТекФильтр.Доступность(
1);
        Если
Что="Подразделение" тогда
               Форма.ТекФильтр.НазначитьТип("Справочник.Подразделения");
        ИначеЕсли
Что="Должность" тогда
               Форма.ТекФильтр.НазначитьТип("Справочник.Должности");
        Иначе
//Если Что="Отключить" тогда
               Форма.ТекФильтр.НазначитьТип("Строка",1);
               Форма.ТекФильтр.Доступность(0);
               ТекФильтр="";
        КонецЕсли;
        УстФильтра();
КонецПроцедуры

//******************************************************************************
ВыбФильтр.ДобавитьЗначение("","Отключить");
ВыбФильтр.ДобавитьЗначение("Подразделение");
ВыбФильтр.ДобавитьЗначение("Должность");

Текст модуля лежит здесь.

        Теперь нарисуем элементы формы.

        К списку ВыбФильтр привяжем процедуру УстФильтра(), а к элементу ТекФильтр - ВыборФильтра() и сохраняем изменения.
Вот что получилось:

наверх


Обсудить статью на форуме   всего просмотров: 
Используются технологии uCoz


© Царьков Валерий. 25 марта 2003