#Область ОбработчикиСобытийФормы
&НаКлиенте
Процедура ПриОткрытии(Отказ)
РазмерВМб = Цел(Параметры.МаксимальноДопустимыйРазмерОтображаемогоТекста/1024/1024);
Элементы.ТекстПредупреждения.Заголовок = СтрЗаменить(Элементы.ТекстПредупреждения.Заголовок, "%1", Строка(РазмерВМб));
КонецПроцедуры
#КонецОбласти
#Область ОбработчикиКомандФормы
&НаКлиенте
Процедура ПродолжитьОткрытие(Команда)
СохранитьОтветПользователяВоВременноеХранилище(Истина);
Закрыть(Истина);
КонецПроцедуры
&НаКлиенте
Процедура Отменить(Команда)
СохранитьОтветПользователяВоВременноеХранилище(Ложь);
Закрыть(Ложь);
КонецПроцедуры
#КонецОбласти
#Область СлужебныеПроцедурыИФункции
&НаСервереБезКонтекста
Процедура СохранитьОтветПользователяВоВременноеХранилище(Значение) Экспорт
ОбщегоНазначения.ХранилищеОбщихНастроекСохранить(
"ЭлектронныеПредставленияРегламентированныхОтчетов",
"БольшеНеПоказыватьПредупреждениеОБольшомРазмереФайла",
Значение,,
);
КонецПроцедуры
#КонецОбласти
