// @strict-types #Если Сервер Или ТолстыйКлиентОбычноеПриложение Или ВнешнееСоединение Тогда #Область ОписаниеПеременных #КонецОбласти #Область ПрограммныйИнтерфейс // Код процедур и функций #КонецОбласти #Область ОбработчикиСобытий // Код процедур и функций #КонецОбласти #Область СлужебныйПрограммныйИнтерфейс // Код процедур и функций #КонецОбласти #Область СлужебныеПроцедурыИФункции // Код процедур и функций // Настройки общей формы отчета подсистемы "Варианты отчетов". // // Параметры: // Форма - ФормаКлиентскогоПриложения - Форма отчета. // КлючВарианта - Строка - Имя предопределенного варианта отчета или уникальный идентификатор пользовательского. // Настройки - см. ОтчетыКлиентСервер.НастройкиОтчетаПоУмолчанию Процедура ОпределитьНастройкиФормы(Форма, КлючВарианта, Настройки) Экспорт Настройки.События.ПередЗагрузкойНастроекВКомпоновщик = Истина; КонецПроцедуры // Вызывается перед загрузкой новых настроек. Используется для изменения схемы компоновки. // // Параметры: // Контекст - Произвольный - параметры контекста, в котором используется отчет. // КлючСхемы - Строка - идентификатор текущей схемы компоновщика настроек. // КлючВарианта - Строка - имя предопределенного или уникальный идентификатор пользовательского // варианта отчета. // - Неопределено - вызов для варианта расшифровки или без контекста. // НовыеНастройкиКД - НастройкиКомпоновкиДанных - настройки варианта отчета, которые будут загружены // в компоновщик настроек после его инициализации. // - Неопределено - настройки варианта не надо загружать (уже загружены ранее). // НовыеПользовательскиеНастройкиКД - ПользовательскиеНастройкиКомпоновкиДанных - пользовательские настройки, которые будут загружены в компоновщик // настроек после его инициализации. // - Неопределено - пользовательские настройки не надо загружать (уже загружены ранее). // Процедура ПередЗагрузкойНастроекВКомпоновщик(Контекст, КлючСхемы, КлючВарианта, НовыеНастройкиКД, НовыеПользовательскиеНастройкиКД) Экспорт Если ТипЗнч(Контекст) = Тип("ФормаКлиентскогоПриложения") Тогда ПараметрДанныеОтчета = СхемаКомпоновкиДанных.Параметры.Найти("ДанныеОтчета"); СписокВыбора = Новый СписокЗначений; СписокВыбора.Добавить(0, НСтр("ru = 'В валюте упр. учета с НДС'")); СписокВыбора.Добавить(1, НСтр("ru = 'В валюте упр. учета без НДС'")); СписокВыбора.Добавить(2, НСтр("ru = 'В валюте упр. учета'")); СписокВыбора.Добавить(3, НСтр("ru = 'В валюте бух. учета'")); //++ Локализация СписокВыбора.Добавить(4, НСтр("ru = 'В валюте нал. учета'")); //-- Локализация ПараметрДанныеОтчета.УстановитьДоступныеЗначения(СписокВыбора); Если НовыеНастройкиКД = Неопределено Или НовыеПользовательскиеНастройкиКД = Неопределено Тогда Возврат; КонецЕсли; ЗначениеПараметраДанныеОтчета = НовыеНастройкиКД.ПараметрыДанных.НайтиЗначениеПараметра(Новый ПараметрКомпоновкиДанных("ДанныеОтчета")); НастройкаДанныеОтчета = НовыеПользовательскиеНастройкиКД.Элементы.Найти(ЗначениеПараметраДанныеОтчета.ИдентификаторПользовательскойНастройки); Если Не НастройкаДанныеОтчета = Неопределено И СписокВыбора.НайтиПоЗначению(НастройкаДанныеОтчета.Значение) = Неопределено Тогда НастройкаДанныеОтчета.Значение = СписокВыбора[0].Значение; КонецЕсли; ОтчетыСервер.ПодключитьСхему(ЭтотОбъект, Контекст, СхемаКомпоновкиДанных, КлючСхемы); КонецЕсли; КонецПроцедуры #КонецОбласти #Область Инициализация #КонецОбласти #КонецЕсли