
Процедура КнопкаВыполнитьНажатие(Кнопка)

	Если ЗначениеЗаполнено(КаталогЖурналаСервера) Тогда
		Если Не ирОбщий.ЛиКаталогДоступенЛкс(КаталогЖурналаСервера) Тогда
			Возврат;
		КонецЕсли; 
	КонецЕсли; 
	ирОбщий.СохранитьЗначениеЛкс("ирАнализТехножурнала.АвтоочисткаТехножурнала", АвтоочисткаТехножурнала);
	ирОбщий.СохранитьЗначениеЛкс("ирАнализТехножурнала.ВыраниватьДатуПоСерверу", ВыраниватьДатуПоСерверу);
	ирОбщий.СохранитьЗначениеЛкс("ирАнализТехножурнала.КаталогЖурналаСервера", КаталогЖурналаСервера);
	Закрыть(Истина);
	
КонецПроцедуры

Процедура ПриОткрытии()
	
	ЭтаФорма.АвтоочисткаТехножурнала = ирОбщий.ВосстановитьЗначениеЛкс("ирАнализТехножурнала.АвтоочисткаТехножурнала");
	ЭтаФорма.ВыраниватьДатуПоСерверу = ирОбщий.ВосстановитьЗначениеЛкс("ирАнализТехножурнала.ВыраниватьДатуПоСерверу");
	ЭтаФорма.КаталогЖурналаСервера = ирОбщий.ВосстановитьЗначениеЛкс("ирАнализТехножурнала.КаталогЖурналаСервера");
	ЭлементыФормы.КаталогЖурналаСервера.ТолькоПросмотр = ирКэш.Получить().ЭтоФайловаяБаза;
	Если Не ЭлементыФормы.КаталогЖурналаСервера.Доступность Тогда
		ЭтаФорма.КаталогЖурналаСервера = "";
	КонецЕсли; 
	
КонецПроцедуры

Процедура КаталогЖурналаТрассыПриИзменении(Элемент)
	
	ирОбщий.ПолеВводаСИсториейВыбора_ПриИзмененииЛкс(Элемент, ЭтаФорма);

КонецПроцедуры

Процедура КаталогЖурналаТрассыНачалоВыбора(Элемент, СтандартнаяОбработка)
	
	ирОбщий.ПолеФайловогоКаталога_НачалоВыбораЛкс(Элемент, СтандартнаяОбработка);

КонецПроцедуры

Процедура КаталогЖурналаТрассыНачалоВыбораИзСписка(Элемент, СтандартнаяОбработка)
	
	ирОбщий.ПолеВводаСИсториейВыбора_НачалоВыбораИзСпискаЛкс(Элемент, ЭтаФорма);

КонецПроцедуры

Процедура КаталогЖурналаТрассыОткрытие(Элемент, СтандартнаяОбработка)
	
	СтандартнаяОбработка = Ложь;
	ЗапуститьПриложение(Элемент.Значение);

КонецПроцедуры

ирОбщий.ИнициализироватьФормуЛкс(ЭтаФорма, "Обработка.ирАнализТехножурнала.Форма.НастройкаЧтения");
