#Если Сервер Или ТолстыйКлиентОбычноеПриложение Или ВнешнееСоединение Тогда
#Область ПрограммныйИнтерфейс
Функция ВариантыНастроек() Экспорт
Результат = Новый Массив;
Вариант = Новый Структура;
Вариант.Вставить("Имя", "РезультатРаботыПравилПоСтатьеБюджетов");
Вариант.Вставить("Представление", НСтр("ru = 'Результат работы правил по статье бюджетов'"));
Результат.Добавить(Вариант);
Вариант = Новый Структура;
Вариант.Вставить("Имя", "РезультатРаботыПравилПоПоказателюБюджетов");
Вариант.Вставить("Представление", НСтр("ru = 'Результат работы правил по показателю бюджетов'"));
Результат.Добавить(Вариант);
Вариант = Новый Структура;
Вариант.Вставить("Имя", "РезультатРаботыПравилПоСтатьямБюджетов");
Вариант.Вставить("Представление", НСтр("ru = 'Результат работы правил по статьям бюджетов'"));
Результат.Добавить(Вариант);
Вариант = Новый Структура;
Вариант.Вставить("Имя", "РезультатРаботыПравилПоПоказателямБюджетов");
Вариант.Вставить("Представление", НСтр("ru = 'Результат работы правил по показателям бюджетов'"));
Результат.Добавить(Вариант);
Вариант = Новый Структура;
Вариант.Вставить("Имя", "РезультатРаботыПравилПоСтатьямИПоказателямБюджетов");
Вариант.Вставить("Представление", НСтр("ru = 'Результат работы правил по статьям и показателям бюджетов'"));
Результат.Добавить(Вариант);
Возврат Результат;
КонецФункции
#Область КомандыПодменюОтчеты
Функция ДобавитьКомандуОтчетаПоСтатьеБюджетов(КомандыОтчетов) Экспорт
Если ПравоДоступа("Просмотр", Метаданные.Отчеты.РезультатРаботыПравилПолученияФактическихДанных)
И ПолучитьФункциональнуюОпцию("ИспользоватьБюджетирование") Тогда
КомандаОтчет = КомандыОтчетов.Добавить();
КомандаОтчет.Менеджер = Метаданные.Отчеты.РезультатРаботыПравилПолученияФактическихДанных.ПолноеИмя();
КомандаОтчет.Представление = НСтр("ru = 'Результат работы правил'");
КомандаОтчет.МножественныйВыбор = Ложь;
КомандаОтчет.Важность = "Обычное";
КомандаОтчет.ДополнительныеПараметры.Вставить("ИмяКоманды", "ПоСтатьеБюджетов");
КомандаОтчет.КлючВарианта = "РезультатРаботыПравилПоСтатьеБюджетов";
Возврат КомандаОтчет;
КонецЕсли;
Возврат Неопределено;
КонецФункции
Функция ДобавитьКомандуОтчетаПоСтатьямБюджетов(КомандыОтчетов) Экспорт
Если ПравоДоступа("Просмотр", Метаданные.Отчеты.РезультатРаботыПравилПолученияФактическихДанных)
И ПолучитьФункциональнуюОпцию("ИспользоватьБюджетирование") Тогда
КомандаОтчет = КомандыОтчетов.Добавить();
КомандаОтчет.Менеджер = Метаданные.Отчеты.РезультатРаботыПравилПолученияФактическихДанных.ПолноеИмя();
КомандаОтчет.Представление = НСтр("ru = 'Результат работы правил'");
КомандаОтчет.МножественныйВыбор = Истина;
КомандаОтчет.Важность = "Обычное";
КомандаОтчет.ДополнительныеПараметры.Вставить("ИмяКоманды", "ПоСтатьямБюджетов");
КомандаОтчет.КлючВарианта = "РезультатРаботыПравилПоСтатьямБюджетов";
Возврат КомандаОтчет;
КонецЕсли;
Возврат Неопределено;
КонецФункции
Функция ДобавитьКомандуОтчетаПоПоказателюБюджетов(КомандыОтчетов) Экспорт
Если ПравоДоступа("Просмотр", Метаданные.Отчеты.РезультатРаботыПравилПолученияФактическихДанных)
И ПолучитьФункциональнуюОпцию("ИспользоватьБюджетирование") Тогда
КомандаОтчет = КомандыОтчетов.Добавить();
КомандаОтчет.Менеджер = Метаданные.Отчеты.РезультатРаботыПравилПолученияФактическихДанных.ПолноеИмя();
КомандаОтчет.Представление = НСтр("ru = 'Результат работы правил'");
КомандаОтчет.МножественныйВыбор = Ложь;
КомандаОтчет.Важность = "Обычное";
КомандаОтчет.ДополнительныеПараметры.Вставить("ИмяКоманды", "ПоПоказателюБюджетов");
КомандаОтчет.КлючВарианта = "РезультатРаботыПравилПоПоказателюБюджетов";
Возврат КомандаОтчет;
КонецЕсли;
Возврат Неопределено;
КонецФункции
Функция ДобавитьКомандуОтчетаПоПоказателямБюджетов(КомандыОтчетов) Экспорт
Если ПравоДоступа("Просмотр", Метаданные.Отчеты.РезультатРаботыПравилПолученияФактическихДанных)
И ПолучитьФункциональнуюОпцию("ИспользоватьБюджетирование") Тогда
КомандаОтчет = КомандыОтчетов.Добавить();
КомандаОтчет.Менеджер = Метаданные.Отчеты.РезультатРаботыПравилПолученияФактическихДанных.ПолноеИмя();
КомандаОтчет.Представление = НСтр("ru = 'Результат работы правил'");
КомандаОтчет.МножественныйВыбор = Истина;
КомандаОтчет.Важность = "Обычное";
КомандаОтчет.ДополнительныеПараметры.Вставить("ИмяКоманды", "ПоПоказателямБюджетов");
КомандаОтчет.КлючВарианта = "РезультатРаботыПравилПоПоказателямБюджетов";
Возврат КомандаОтчет;
КонецЕсли;
Возврат Неопределено;
КонецФункции
#КонецОбласти
#Область ДляВызоваИзДругихПодсистем
Процедура НастроитьВариантыОтчета(Настройки, ВыводитьВариантыОтчетов) Экспорт
ОписаниеОтчета = ВариантыОтчетов.ОписаниеОтчета(Настройки, Метаданные.Отчеты.РезультатРаботыПравилПолученияФактическихДанных);
ОписаниеОтчета.ОпределитьНастройкиФормы = Истина;
ВариантыОтчетов.УстановитьРежимВыводаВПанеляхОтчетов(Настройки, ОписаниеОтчета, ВыводитьВариантыОтчетов);
ВариантыОтчетовУТПереопределяемый.ОтключитьВариантОтчета(Настройки, ОписаниеОтчета, "РезультатРаботыПравилПоСтатьеБюджетов");
ВариантыОтчетовУТПереопределяемый.ОтключитьВариантОтчета(Настройки, ОписаниеОтчета, "РезультатРаботыПравилПоПоказателюБюджетов");
ВариантыОтчетовУТПереопределяемый.ОтключитьВариантОтчета(Настройки, ОписаниеОтчета, "РезультатРаботыПравилПоСтатьямБюджетов");
ВариантыОтчетовУТПереопределяемый.ОтключитьВариантОтчета(Настройки, ОписаниеОтчета, "РезультатРаботыПравилПоПоказателямБюджетов");
ВариантыОтчетовУТПереопределяемый.ОтключитьВариантОтчета(Настройки, ОписаниеОтчета, "РезультатРаботыПравилПоСтатьямИПоказателямБюджетов");
КонецПроцедуры
#КонецОбласти
#КонецОбласти
#КонецЕсли