список работающих сотрудников на дату

"Как получить в программном модуле список работающих сотрудников на дату: а то все попадают?


СпрСот = СоздатьОбъект("Справочник.Сотрудники");    
СпрСот.ВыбратьЭлементы();
Пока СпрСот.ПолучитьЭлемент() = 1 Цикл
Если СпрСот.ГрафикРаботы.Получить(ДатаДок) = Граф Тогда
НоваяСтрока();
Сотрудник = СпрСот.ТекущийЭлемент();
   ТипЧасов = Типч;
КонецЕсли;
КонецЦикла;
"

"Попробуй так:
|Период ВыбДата по ВыбДата;
//ВыбДата - реквизит диалога; Я подобным образом получала наличие готовой продукции на складе на дату. У меня работает."

"Лучше проверять реквизит "СостояниеФизЛица", он периодический

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


"

У него справочник