Имя: Пароль:
1C
1С v8
Отбор
,
0 Uchenica74
 
05.06.13
11:55
Добрый день, помогите пожалуйсто! Никак не могу понять как делать отборы, в документе реквизит с ссылкой на подразделения, создаю список значений, в котором храняться те подразделения, которые пользователь может видеть при выборе подразделения в документе.
(в свойстве реквизита документа "ПодразделениеОрганизацииНачалоВыбора" )

ФЗ = УправлениеПользователями.ПолучитьЗначениеПоУмолчанию(глЗначениеПеременной("глТекущийПользователь"), "ОсновнойОтветственный");
   
   СЗ = Новый СписокЗначений;
   
   Запрос       = Новый Запрос;
   Запрос.Текст = "ВЫБРАТЬ
                  |    ПодразделенияОрганизаций.Табельщик,
                  |    ПодразделенияОрганизаций.Ссылка
                  |ИЗ
                  |    Справочник.ПодразделенияОрганизаций КАК ПодразделенияОрганизаций
                  |ГДЕ
                  |    ПодразделенияОрганизаций.Табельщик = &Табельщик"
   ;
   
   Запрос.УстановитьПараметр("Табельщик", ФЗ);              
   
   Результат = Запрос.Выполнить().Выбрать();
   
   Пока Результат.Следующий() Цикл
       СЗ.Добавить(Результат.Ссылка);
   КонецЦикла;
   
   
   //ЭлементыФормы.ПодразделениеОрганизации.Значение.Отбор.Ссылка.Использование=Истина;
   //ЭлементыФормы.ПодразделениеОрганизации.Значение.Отбор.Ссылка.ВидСравнения=ВидСравнения.ВСписке;
   //ЭлементыФормы.ПодразделениеОрганизации.Значение.Отбор.Ссылка.Значение=СЗ;
   
    ЭлементыФормы.ПодразделениеОрганизации.СписокВыбора.НайтиПоЗначению(СЗ);
1 lxndr
 
05.06.13
11:58
1. Для поля ввода поставь
РежимВыбораИзСписка = Истина;

2. Последнюю строку замени на
 ЭлементыФормы.ПодразделениеОрганизации.СписокВыбора = СЗ;
2 lxndr
 
05.06.13
11:59
(1) только перенеси код куданить, например в "ПриОткрытии"
3 Uchenica74
 
05.06.13
12:00
при открытии чего: справочника подразделений?
4 vicof
 
05.06.13
12:00
(3) документа
5 Uchenica74
 
05.06.13
12:02
а, поняла, причем тут справочник то
6 Uchenica74
 
05.06.13
12:08
спасибо огромное!!!
7 salvator
 
05.06.13
12:09
(7) пожалуйстО
8 Uchenica74
 
05.06.13
14:36
еще вопрос возник, когда я открываю проведенный документ, у меня подразделение стоит не заполненное, ТипЗначения  у реквизита пустое, подскажите пожалуйсто как мне сейчас правильно указать тип реквизита?
9 Nenaviwu1c20
 
05.06.13
14:38
Новы ОписаниеТипов
10 Nenaviwu1c20
 
05.06.13
14:38
Новый ОписаниеТипов
11 Nenaviwu1c20
 
05.06.13
14:39
Массив = Новый Массив;
Массив.Добавить(Тип("СправочникСсылка.Подразделения"));

ДопустимыеТипы = Новый ОписаниеТипов(Массив, , );
СписокЗн = Элемент.Значение;    
   
   
   ЭлементыФормы.Подразделение.ТипЗначения = ДопустимыеТипы;