ЗапросСб = Новый Запрос; ЗапросСб.Текст = "ВЫБРАТЬ | Бюджетирование.СтатьяОборотов КАК СтатьяОборотов, | Бюджетирование.СуммаСценарий КАК Сумма, | Бюджетирование.СчетДт КАК СчетДт, | Бюджетирование.СчетКт КАК СчетКт, | Бюджетирование.СтатьяОборотов.Родитель КАК Родитель1, | Бюджетирование.СтатьяОборотов.Родитель.Родитель КАК Родитель2, | Бюджетирование.СтатьяОборотов.Родитель.Родитель.Родитель КАК Родитель3 |ИЗ | РегистрБухгалтерии.бит_Бюджетирование.ДвиженияССубконто( | &НачалоПериода, | &КонецПериода, | Активность = ИСТИНА | И СчетДт = &СчетДт | И (СчетКт = &СчетКт1 | ИЛИ СчетКт = &СчетКт2 | ИЛИ СчетКт = &СчетКт3 | ИЛИ СчетКт = &СчетКт4 | ИЛИ СчетКт = &СчетКт5 | ИЛИ СчетКт = &СчетКт6) | И (&Организация = ЗНАЧЕНИЕ(Справочник.Организации.ПустаяСсылка) | ИЛИ Организация = &Организация) | И (&СубконтоКт1 = ЗНАЧЕНИЕ(Справочник.Проекты.ПустаяСсылка) | ИЛИ СубконтоКт1 = &СубконтоКт1), | , | ) КАК Бюджетирование | |УПОРЯДОЧИТЬ ПО | СтатьяОборотов, | Сумма, | СчетДт, | СчетКт |ИТОГИ | СУММА(Сумма) |ПО | СтатьяОборотов"; ЗапросСб.УстановитьПараметр("СчетДт", ПланыСчетов.бит_Бюджетирование.НайтиПоКоду("90021")); ЗапросСб.УстановитьПараметр("СчетКт1", ПланыСчетов.бит_Бюджетирование.НайтиПоКоду("43")); ЗапросСб.УстановитьПараметр("СчетКт2", ПланыСчетов.бит_Бюджетирование.НайтиПоКоду("08341")); ЗапросСб.УстановитьПараметр("СчетКт3", ПланыСчетов.бит_Бюджетирование.НайтиПоКоду("19341")); ЗапросСб.УстановитьПараметр("СчетКт4", ПланыСчетов.бит_Бюджетирование.НайтиПоКоду("4101")); ЗапросСб.УстановитьПараметр("СчетКт5", ПланыСчетов.бит_Бюджетирование.НайтиПоКоду("2033")); ЗапросСб.УстановитьПараметр("СчетКт6", ПланыСчетов.бит_Бюджетирование.НайтиПоКоду("26")); ЗапросСб.УстановитьПараметр("Организация", Организация); ЗапросСб.УстановитьПараметр("СубконтоКт1", Проект); ЗапросСб.УстановитьПараметр("НачалоПериода", НачалоПериода); ЗапросСб.УстановитьПараметр("КонецПериода", КонецПериода); РезультатСб = ЗапросСб.Выполнить(); ВыборкаСБ = РезультатСб.Выбрать(); ОбластьАдминистративная.Параметры.АдмРасх = 0; Имя = "Административно-хозяйственные расходы"; Пока ВыборкаСБ.Следующий() Цикл СтатьяОборотов = ВыборкаСБ.СтатьяОборотов; Если ВыборкаСБ.Родитель1 = Справочники.бит_СтатьиОборотов.НайтиПоНаименованию(Имя) Тогда ОбластьАдминистративная.Параметры.АдмРасх = ОбластьАдминистративная.Параметры.АдмРасх + ВыборкаСБ.Сумма; ИначеЕсли ВыборкаСБ.Родитель2 = Справочники.бит_СтатьиОборотов.НайтиПоНаименованию(Имя) Тогда ОбластьАдминистративная.Параметры.АдмРасх = ОбластьАдминистративная.Параметры.АдмРасх + ВыборкаСБ.Сумма; ИначеЕсли ВыборкаСБ.Родитель3 = Справочники.бит_СтатьиОборотов.НайтиПоНаименованию(Имя) Тогда ОбластьАдминистративная.Параметры.АдмРасх = ОбластьАдминистративная.Параметры.АдмРасх + ВыборкаСБ.Сумма; КонецЕсли; КонецЦикла;
{"contextData":{},"contextMarkers":[]}