v7: Не выводит актуальную должность со справочника назначения

на дату увольнения со справочника Назначения
Перем НачалоТекущегоПериода, КонецТекущегоПериода,ТекСотр1,Тек1;
НачалоТекущегоПериода = Дата1;
КонецТекущегоПериода = Дата2 + 1;
таб=СоздатьОбъект("Таблица");
таб.ИсходнаяТаблица("Результаты");
таб.ВывестиСекцию("Шапка");
ФизЛицо=СоздатьОбъект("Справочник.ФизическиеЛица");
Сотр=СоздатьОбъект("Справочник.Сотрудники");
СпрНазн=СоздатьОбъект("Справочник.Назначения");
Сотр.ВыбратьЭлементы();
кол=0;
//ТекСотр=Сотр.ТекущийЭлемент();

Пока Сотр.ПолучитьЭлемент()>0 Цикл
//Если (Сотр.Подразделение=Подразделение) Тогда

// Если (ПустоеЗначение(Сотр.ДатаОкончанияДействия)=1) и (Сотр.ДатаНачалаДействия<ВыбДата) Тогда

// Сотр.ФизическоеЛицо.ДатаРождения

//кол=кол+1;

//ТекСотр=Сотр.ТекущийЭлемент();

//СпрНазн.ТекущийЭлемент()

ФизЛицо.НайтиЭлемент(Сотр.ТекущийЭлемент().ФизическоеЛицо);
СпрНазн.ИспользоватьВладельца(Сотр);
// СпрНазн.ОбратныйПорядок();

//СпрНазн.ПорядокКодов();

//СпрНазн.ТекущийЭлемент().Должность

СпрНазн.ВыбратьЭлементы();
Пока СпрНазн.ПолучитьЭлемент()>0 Цикл
ТекСотр=Сотр.ТекущийЭлемент().ФизическоеЛицо;
Тек=Сотр.ТекущийЭлемент().ДатаОкончанияДействия;
Если (Сотр.Подразделение=Подразделение)
Тогда
Если ПустоеЗначение(Сотр.ДатаОкончанияДействия)=0 Тогда
Если ((Сотр.ДатаОкончанияДействия>=НачалоТекущегоПериода) И (Сотр.ДатаОкончанияДействия<КонецТекущегоПериода)) Тогда
Если (ТекСотр1<>ТекСотр) и (Тек1<>Тек) Тогда
кол=кол+1;
таб.ВывестиСекцию("Результат");
КонецЕсли;
КонецЕсли;
КонецЕсли;
КонецЕсли;
ТекСотр1=ТекСотр;
Тек1=Тек;
// КонецЕсли;

КонецЦикла;
КонецЦикла;
Таб.ПараметрыСтраницы(1,,,0,0,0,0,,,1,,);
Таб.Опции(0,0,1,0);
Таб.Защита(Константа.ФлагЗащитыТаблиц);
Таб.ТолькоПросмотр(1);
таб.Показать("Результаты");