Отчет по сотрудникам - иностранцам

Добрый день! Нужна ваша помощь! Создан вот такой отчет но он собирает все приказы о приеме (сотрудник работает по срочным договорам) и задваевает(затраивает...) сотрудника, а надо данные только из последнего приказа

Процедура Сформировать8()

Таб = СоздатьОбъект("Таблица");
Таб.ИсходнаяТаблица("ОкончаниеДоговораОбщ");
Таб.ВывестиСекцию("Заголовок");
Таб.ВывестиСекцию("Шапка");

Запрос = СоздатьОбъект("Запрос");
ТекстЗапроса =
"//{{ЗАПРОС(сформировать)
|с (НачГода(ДатаДок)-365) по (ДатаДок);
|ОбрабатыватьДокументы Проведенные;
|Сотрудник = Документ.ПриказОПриемеНаРаботу.Сотрудник;
|СостояниеФизлица = Документ.ПриказОПриемеНаРаботу.Сотрудник.СостояниеФизлица;
|ДатаОкончанияДог = Документ.ПриказОПриемеНаРаботу.ДатаОкончанияДог;
|Функция Итог = Счётчик(Сотрудник);
|"//}}Запрос
;


Если Сортировка.ТекущаяСтрока()=1 Тогда
ТекстЗапроса = ТекстЗапроса + "Группировка Сотрудник без групп;Группировка ДатаОкончанияДог;";
ИначеЕсли Сортировка.ТекущаяСтрока()=2 Тогда
ТекстЗапроса = ТекстЗапроса + "Группировка ДатаОкончанияДог;Группировка Сотрудник без групп;";
КонецЕсли;

Если Запрос.Выполнить(ТекстЗапроса)=0 Тогда
Возврат;
КонецЕсли;

Ном=0;

Пока Запрос.Группировка(1)=1 Цикл
Пока Запрос.Группировка(2)=1 Цикл

Если (ПустоеЗначение(Запрос.СостояниеФизЛица)=1) Тогда
Продолжить;
КонецЕсли;

Если (ПустоеЗначение(Запрос.ДатаОкончанияДог)<>0)Тогда
Продолжить;
КонецЕсли;


Ном=Ном+1;

Таб.ВывестиСекцию("Сотрудник");

КонецЦикла;
КонецЦикла;

Таб.ВывестиСекцию("Подвал");

Таб.Опции(0,0,0,0);
Таб.ТолькоПросмотр(0);
Таб.ПараметрыСтраницы(1,,,10,10,10,10,10,10,1);
Таб.Показать("Отчет по трудовым договорам с иностранцами");


КонецПроцедуры