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

ВСОпределение = Новый WSОпределения("http://127.0.0.1/DemoTrd/ws/DataTransfer.1cws?wsdl","Adm");
ВСервис = ВСОпределение.Сервисы.Получить("DataTransfer","DataTransfer"); 
ВТочкаВхода = ВСервис.ТочкиПодключения.Получить("DataTransferSoap"); 
ВОперация = ВТочкаВхода.Интерфейс.Операции.Получить("Registration"); 
ВСПрокси = Новый WSПрокси(ВСОпределение, "DataTransfer","DataTransfer","DataTransferSoap"); 
ВСПрокси.Пользователь = "Adm"; 


Ответ = ВСПрокси.Registration(СериализаторXDTO.ЗаписатьXDTO(ПараметрДляОтправкиНаСервер));
Возврат СериализаторXDTO.ПрочитатьXDTO(Ответ);	

//Тест = Новый Структура;
//Тест.Вставить("Стр","Строка");
//Возврат ВСПрокси.Registration("1212")
КонецФункции // ПодключениеКВебСервису()

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

Функция ПолучитьИнфуОКонфигурации() Экспорт 
    СтрКонфы = Новый Структура; 
    СтрКонфы.Вставить("Конфигурация", Метаданные.Имя); 
    СтрКонфы.Вставить("ВерсияПриложения", Метаданные.Версия); 
    //Проверяем - если константа установленна, т.е. ID уже присвоен, то берем его, иначе - 
//создадим новый 
    СтрКонфы.Вставить("ID", 
?(ЗначениеЗаполнено(Константы.ID.Получить()),Константы.ID.Получить(),Новый 
УникальныйИдентификатор)); 
    Возврат СтрКонфы; 
КонецФункции