Процедура Заполнить()
           Ит = СоздатьОбъект("БухгалтерскиеИтоги");
           ТекДата = НачМесяца(ДатаДок);    
           Ит.ВыполнитьЗапрос(ТекДата, КонМесяца(ДатаДок), "ОВ", , , , "Месяц");
           Ит.ВыбратьСубконто(1);
      Если Ит.ПолучитьСубконто(1) = 1 Тогда
           Ит.ВыбратьПериоды();
      Пока Ит.ПолучитьПериод() = 1 Цикл
           ТекДата = КонМесяца(Ит.НачДата);
           НоваяСтрока();
Сотрудник = Ит.Субконто(1);
    Дней = Ит.ДО("К");
   Часов = Ит.ДО("С");
       КонецЦикла;
       КонецЕсли;
КонецПроцедуры

повторение  мать ученья?)))

ты с веткой определись