AlexD
Junior Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору tswanea Процедура Сформировать() Больничные = СоздатьОбъект("Справочник.ВидыНачислений"); Больничные.НайтиПоНаименованию("Больничный лист"); БухИт = СоздатьОбъект("БухгалтерскиеИтоги"); БухИт.ИспользоватьСубконто(Видысубконто.Сотрудники, Сотрудник,2); БухИт.ИспользоватьСубконто(Видысубконто.ВидыНачисленийВыплат, Больничные,2); БухИт.ВыполнитьЗапрос(НачДата,КонДата,"70",,,3,7,"С"); СуммаНаНачало = БухИт.СНК(); БухИт.ВыбратьПериоды(); Пока БухИт.ПолучитьПериод() = 1 Цикл Сообщить(БухИт.НачДата); Сообщить(БухИт.КО()); КонецЦикла; КонецПроцедуры Вот в таком виде это работает в типовой бухгалтерии для хозрасчета... в строке "БухИт.ВыполнитьЗапрос(,,,,,,) необходимо будет подставить свой счет вместо "70" и соответсвенно переписать все, что связано со справочниками и субконто на свой лад. В цикле вместо "сообщить" можно сразу выводить строку в отчет на печать либо записывать значение БухИт.КО() в таблицу значений. Удачи! |