еЖурналаРегистрации", СобытиеЖурналаРегистрации);
			Отбор.Вставить("Уровень",                   "Ошибка");
			Отбор.Вставить("ДатаНачала",                ДатаНачалаОтбораЖурналаРегистрации());
			
			ЖурналРегистрацииКлиент.ОткрытьЖурналРегистрации(Отбор, ЭтотОбъект);
		
		КонецЕсли;
		
	КонецЕсли;
	
КонецПроцедуры

#КонецОбласти

#Область ОбработчикиКомандФормы

&НаКлиенте
Процедура ОбновитьСписокНастроек(Команда)
	
	ПриНачалеПолученияВариантовНастроекОбменаДанными();
	
КонецПроцедуры

&НаКлиенте
Процедура ПодключитьИнтернетПоддержку(Команда)
	
	Если ОбщегоНазначенияКлиент.ПодсистемаСуществует("ИнтернетПоддержкаПользователей") Тогда
		ОповещениеОЗакрытии = Новый ОписаниеОповещения("ПодключитьИнтернетПоддержкуЗавершение", ЭтотОбъект);
		
		МодульИнтернетПоддержкаПользователейКлиент = ОбщегоНазначенияКлиент.ОбщийМодуль("ИнтернетПоддержкаПользователейКлиент");
		МодульИнтер
еЖурналаРегистрации ", СобытиеЖурналаРегистрации); 
			 Отбор. Вставить("Уровень ",                    " Ошибка "); 
			 Отбор. Вставить("ДатаНачала ",                 ДатаНачалаОтбораЖурналаРегистрации ()); 
			
			 ЖурналРегистрацииКлиент. ОткрытьЖурналРегистрации(Отбор, ЭтотОбъект); 
		
		 КонецЕсли; 
		
	 КонецЕсли; 
	
 КонецПроцедуры 

 # КонецОбласти 

 # Область ОбработчикиКомандФормы 

 & НаКлиенте 
 Процедура ОбновитьСписокНастроек(Команда) 
	
	 ПриНачалеПолученияВариантовНастроекОбменаДанными (); 
	
 КонецПроцедуры 

 & НаКлиенте 
 Процедура ПодключитьИнтернетПоддержку(Команда) 
	
	 Если ОбщегоНазначенияКлиент. ПодсистемаСуществует("ИнтернетПоддержкаПользователей ") Тогда 
		 ОповещениеОЗакрытии = Новый ОписаниеОповещения("ПодключитьИнтернетПоддержкуЗавершение ", ЭтотОбъект); 
		
		 МодульИнтернетПоддержкаПользователейКлиент = ОбщегоНазначенияКлиент. ОбщийМодуль("ИнтернетПоддержкаПользователейКлиент "); 
		 МодульИнтер
еЖурналаРегистрации", СобытиеЖурналаРегистрации);
			Отбор.Вставить("Уровень",                   "Ошибка");
			Отбор.Вставить("ДатаНачала",                ДатаНачалаОтбораЖурналаРегистрации());
			
			ЖурналРегистрацииКлиент.ОткрытьЖурналРегистрации(Отбор, ЭтотОбъект);
		
		КонецЕсли;
		
	КонецЕсли;
	
КонецПроцедуры

#КонецОбласти

#Область ОбработчикиКомандФормы

&НаКлиенте
Процедура ОбновитьСписокНастроек(Команда)
	
	ПриНачалеПолученияВариантовНастроекОбменаДанными();
	
КонецПроцедуры

&НаКлиенте
Процедура ПодключитьИнтернетПоддержку(Команда)
	
	Если ОбщегоНазначенияКлиент.ПодсистемаСуществует("ИнтернетПоддержкаПользователей") Тогда
		ОповещениеОЗакрытии = Новый ОписаниеОповещения("ПодключитьИнтернетПоддержкуЗавершение", ЭтотОбъект);
		
		МодульИнтернетПоддержкаПользователейКлиент = ОбщегоНазначенияКлиент.ОбщийМодуль("ИнтернетПоддержкаПользователейКлиент");
		МодульИнтер
еЖурналаРегистрации", СобытиеЖурналаРегистрации); Отбор.Вставить("Уровень", "Ошибка"); Отбор.Вставить("ДатаНачала", ДатаНачалаОтбораЖурналаРегистрации()); ЖурналРегистрацииКлиент.ОткрытьЖурналРегистрации(Отбор, КонецЕсли; #КонецОбласти #Область &НаКлиенте Процедура ОбновитьСписокНастроек(Команда) Если Тогда ОповещениеОЗакрытии = ОписаниеОповещения("ПодключитьИнтернетПоддержкуЗавершение", ЭтотОбъект); МодульИнтернетПоддержкаПользователейКлиент ОбщегоНазначенияКлиент.ОбщийМодуль("ИнтернетПоддержкаПользователейКлиент"); МодульИнтер
еЖурналаРегистрации", СобытиЕЖурналаРеГистрАциИ);
			ОтБоР.ВстАвитЬ("Уровень",                   "Ошибка");
			оТбор.вставить("ДатаНачала",                ДатаначалАОТБоражУрНалаРЕгистраЦИи());
			
			жУРнаЛРЕгИстРаЦИиклиенТ.ОтКрытьЖуРналРегистРацИи(отбор, ЭтотОбъЕКт);
		
		конецЕсли;
		
	КОнеЦЕсли;
	
КонецПрОцеДуры

#КоНеЦОбЛАсти

#ОБлаСть ОбРаботчИКиКомаНдФормы

&НаклИЕнте
ПрОЦедура ОБНОвИтьСПисокНастроек(КомаНДа)
	
	пРиНачалеПолучеНияВарИаНТоВнАстРоеКОбменаДанНыМи();
	
КонЕЦПроцедУРы

&нАкЛиеНТе
Процедура ПоДключитьИнтЕРнеТПоддеРжКу(КОМанда)
	
	ЕСли ОбЩеГОНаЗначенияКлиЕнт.ПОдсистемасущестВУет("ИнтеРНетПоддЕржкаПОльЗовАтелЕЙ") ТОгДа
		ОПоВЕщеНИеоЗаКРытИи = Новый ОПиСаНиеОпОвещЕНИЯ("подкЛючИтьИНтернЕтПоддержкуЗаВерШениЕ", этоТОбъеКт);
		
		МодУльИНтЕрнетподдерЖкаПоЛьЗователейКлиент = общеГоНазначеНияклИенТ.ОБщийМОДуль("ИнТерНетподдержКаПользОВатЕлЕЙкЛиЕнт");
		МодульИнтер
еЖурналаРегистрации", Собы тиеЖурнала Регис тра ции ); 
		Отбо р.Вставить("Ур о вень ",                   " Ошибк а" ) ;
	От бор.В ставить ( "Д а т аНа ча ла ",          ДатаН ачалаОтбор аЖу рн алаРегистрац и и( ));
			
		Жу рналРегистра ции Клиент .О ткр ы тьЖур нал Регис трации ( Отбор,  ЭтотОбъе кт ) ;
		
КонецЕс л и ;		
КонецЕсли;
	
Коне ц Пр о цедуры

#Конец Област и#О б л аст ь О бработчики Ко мандФ о рмы

&Н а Кл и е н теП роцедура Обно витьСписокН а стр оек(Ко ма нда ) 
	
	Пр иНача ле П олу ченияВариан товН астроекОб менаДа н ными(); 	
Конец Процед уры 

& НаКл и ен те 
Пр оц е дур а  П одк л ючи тьИнтерн ет По ддерж ку(К о м а н да)	
Если  Обще гоНазначенияК лие нт.П о дси стема Сущес твуе т( "Инте рнетПо ддерж ка Пользователей")  Тог да
		Опов еще ни еОЗ ак рытии = Новы й О пис аниеОпо вещения ( "По дк л ю ч ит ьИнтернетПоддержку За в е рш ение", Э тотОбъ е кт ); 		
		Мод ул ьИн терн е т Подде ржка П ол ьзовател ейКлие н т=ОбщегоН аз начени яК лие нт. Общий М одул ь("Инт ернетПод держк а ПользователейК л иент");
		Мод у ль И н те р 
еЖурналаРегистрации", СобытиеЖурналаРегистрации);
			Отбор.Вставить("Уровень",_ _   _ __ __  _  _"Ошибка");
			Отбор.Вставить("ДатаНачала",   _  __        ДатаНачалаОтбораЖурналаРегистрации());
			
			ЖурналРегистрацииКлиент.ОткрытьЖурналРегистрации(Отбор, ЭтотОбъект);
		
		КонецЕсли;
		
	КонецЕсли;
	
КонецПроцедуры

#КонецОбласти

#Область ОбработчикиКомандФормы

&НаКлиенте
Процедура ОбновитьСписокНастроек(Команда)
	
	ПриНачалеПолученияВариантовНастроекОбменаДанными();
	
КонецПроцедуры

&НаКлиенте
Процедура ПодключитьИнтернетПоддержку(Команда)
	
	Если ОбщегоНазначенияКлиент.ПодсистемаСуществует("ИнтернетПоддержкаПользователей")_Тогда
		ОповещениеОЗакрытии_= Новый_ОписаниеОповещения("ПодключитьИнтернетПоддержкуЗавершение",_ЭтотОбъект);
		
		МодульИнтернетПоддержкаПользователейКлиент_= ОбщегоНазначенияКлиент.ОбщийМодуль("ИнтернетПоддержкаПользователейКлиент");
		МодульИнтер