v7: ЗиК. Пожалуйста Ваши идеи. Установить период работы сотр-ка в данном квартале.

Всем здрасьте.
Я сделал в цикле, но хотелось бы знать другой вариант или запросом.
(так сказать для общего развития)

Допустим указан период квартала I, т.е. 01.01.2016 по 31.03.2016

Короче,
сотрудник может устроиться на работу и уволиться и опять вернуться, то ему делаем два или более периода,
то есть
15.01.2016 по 20.01.2016 (пришёл, ушёл)
01.03.2016 по 31.03.2016 (пришёл, остался)

сотрудник может уже давно работать и не собирается увольняться пока не выгонят его в шею,
то есть весь квартал он работал
01.01.2016 по 31.03.2016

сотрудник может давно работать, но в этом квартале он на всех обиделся и ушёл
то есть
01.01.2016 по 24.02.2016

я прочитал приказ о приёме и приказ об увольнении
и сделал в цикле:

    НачРаботы_в_Квартале = ВыбНачПериода;
    КонРаботы_в_Квартале = ВыбКонПериода;

    т12.ВыбратьСтроки();
    Пока т12.ПолучитьСтроку() = 1 Цикл
        НачРаботы_в_Квартале = Дата(0);
        КонРаботы_в_Квартале = Дата(0);
        Если (т12.ДатаПриема > т12.ДатаУвольн) Тогда
              т12.ДатаУвольн = Дата(0);
        КонецЕсли;
        Если (т12.ДатаПриема = Дата(0)) Тогда
            НачРаботы_в_Квартале = ВыбНачПериода;
        Иначе
            Если т12.ДатаПриема < ВыбНачПериода Тогда
                НачРаботы_в_Квартале = ВыбНачПериода;
            Иначе
                НачРаботы_в_Квартале = т12.ДатаПриема;
            КонецЕсли;
        КонецЕсли;
        Если (т12.ДатаУвольн = Дата(0)) Тогда
            КонРаботы_в_Квартале = ВыбКонПериода;
        Иначе
            Если (т12.ДатаУвольн < ВыбКонПериода) и (т12.ДатаУвольн > ВыбНачПериода) Тогда
                КонРаботы_в_Квартале = т12.ДатаУвольн;
            ИначеЕсли т12.ДатаУвольн >= ВыбКонПериода Тогда
                КонРаботы_в_Квартале = ВыбКонПериода;
            КонецЕсли;
        КонецЕсли;
        т12.ДатаПриема = НачРаботы_в_Квартале;
        т12.ДатаУвольн = КонРаботы_в_Квартале;
    КонецЦикла;