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