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