Функция ПодключениеКВебСервису(СтрЗапроса)   Экспорт 
      
        Попытка	
	    ВСОпределение = Новый WSОпределения("http://127.0.0.1/DemoTrd/ws/DataTransfer.1cws?wsdl", "Федоров (администратор)");
        Исключение
            Ошибка = ОписаниеОшибки;
        КонецПопытки

	ВСервис = ВСОпределение.Сервисы.Получить("DataTransfer","DataTransfer");
	ВТочкаВхода = ВСервис.ТочкиПодключения.Получить("DataTransferSoap");
	ВОперация = ВТочкаВхода.Интерфейс.Операции.Получить("Registration");
	
	ВСПрокси = Новый WSПрокси(ВСОпределение, "DataTransfer","DataTransfer","DataTransferSoap");
	ВСПрокси.Пользователь = "Федоров (администратор)";
	Тест = Новый Структура;
	Тест.Вставить("Стр", "Строка");
	
	Ответ =  ВСПрокси.Registration(СериализаторXDTO.ЗаписатьXDTO(СтрЗапроса));
	
	Возврат  СериализаторXDTO.ПрочитатьXDTO(Ответ);
	
	
КонецФункции // ПодключениеКВебСервису()


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

Сообщиение функции ОписаниеОшибки
{ОбщийМодуль.ОсновныеФункции.Модуль(5)}: Ошибка при вызове конструктора (WSОпределения): 
При создании описания сервиса произошла ошибка. 
http://%D0%A4%D0%B5%D0%B4%D0%BE%D1%80%D0%BE%D0%B2%20%28%D0%B0%D0%B4%D0%BC%D0%B8%D0%BD%D0%B8%D1%81%D1%82%D1%80%D0%B0%D1%82%D0%BE%D1%80%29:xxxxxxx@127.0.0.1/DemoTrd/ws/DataTransfer.1cws?wsdl: 
При создании описания сервиса произошла ошибка.
 http://%D0%A4%D0%B5%D0%B4%D0%BE%D1%80%D0%BE%D0%B2%20%28%D0%B0%D0%B4%D0%BC%D0%B8%D0%BD%D0%B8%D1%81%D1%82%D1%80%D0%B0%D1%82%D0%BE%D1%80%29:xxxxxxx@127.0.0.1/DemoTrd/ws/DataTransfer.1cws?wsdl