1С 8.x : Как в ЗУПе выбрать всех сотрудников, когда-либо работавших в выбранном подразделении?

 Запрос=Новый Запрос;

Запрос.Текст="

|ВЫБРАТЬ РАЗЛИЧНЫЕ

|	РаботникиОрганизаций.Сотрудник,

|	РаботникиОрганизаций.Сотрудник.Физлицо КАК Физлицо,

|	РаботникиОрганизаций.ПодразделениеОрганизации КАК ПодразделениеОрганизации,

|	РаботникиОрганизаций.Период

|ИЗ

|	РегистрСведений.РаботникиОрганизаций КАК РаботникиОрганизаций

|ГДЕ

|	РаботникиОрганизаций.Сотрудник.Физлицо В

|			(ВЫБРАТЬ РАЗЛИЧНЫЕ

|				РаботникиОрганизаций.Сотрудник.Физлицо

|			ИЗ

|				РегистрСведений.РаботникиОрганизаций КАК РаботникиОрганизаций

|			ГДЕ

|				РаботникиОрганизаций.ПодразделениеОрганизации В ИЕРАРХИИ (&ПодразделениеОрганизации))

|	И РаботникиОрганизаций.ЗанимаемыхСтавок > 0

|	И РаботникиОрганизаций.ПодразделениеОрганизации В ИЕРАРХИИ(&ПодразделениеОрганизации)

|

|УПОРЯДОЧИТЬ ПО

|	Физлицо

|АВТОУПОРЯДОЧИВАНИЕ

|";

Запрос.УстановитьПараметр("ПодразделениеОрганизации",Справочники.ПодразделенияОрганизаций.НайтиПоНаименованию("Дирекция");

Результат = Запрос.Выполнить();

Результат = Результат.Выбрать();

н=0;

Пока Результат.Следующий() Цикл

	//Получим элемент справочника для изменения

	ОбъектСотр=Результат.Сотрудник.ПолучитьОбъект(); 

	//Изменим реквизит

	ОбъектСотр.КлассПринадлежности = Перечисления.КлассСотрудников.АппаратУправления;

	//Запишем результат

	ОбъектСотр.Записать();

	//Выведем сообщение для пользователя о том, что обработали

	н=н+1;

	Сообщить(строка(н)+" "+Строка(ОбъектСотр));

КонецЦикла;