вот куски программы
PHP код:
// Закрытие счетов 44.1 и 44.2
БИ = СоздатьОбъект("БухгалтерскиеИтоги");
//Обработка счета 45
БИ.ИспользоватьСубконто(ВидыСубконто.Номенклатура);
БИ.ВключатьСубсчета(-1, -1);
БИ.ВыполнитьЗапрос(НачМесяца(ДатаДок),ДатаДок,"45","10.1, 10.2, 10.3",,3);
ДО45материалы = БИ.ДО("С");
Сальдо45товары = 0;
Сальдо45материалы = 0;
БИ.ВыбратьСубконто(1);
Пока БИ.ПолучитьСубконто(1)=1 Цикл
Если (Би.Субконто(1).ТипНоменклатуры = Перечисление.ТипыНоменклатуры.Товар) Тогда
Сальдо45товары = Сальдо45товары + БИ.СНД("С");
КонецЕсли;
Если (Би.Субконто(1).ТипНоменклатуры = Перечисление.ТипыНоменклатуры.Материал) Тогда
Сальдо45материалы = Сальдо45материалы + БИ.СНД("С");
КонецЕсли;
КонецЦикла;
PHP код:
//Учтем счет 45
МатериалыСумма = МатериалыСумма + ДО45материалы + Сальдо45материалы + Сальдо45товары;
КоэффициентСписания = ?(МатериалыСумма=0, 0, ТЗРСумма / МатериалыСумма);
Если КоэффициентСписания <> 0 Тогда