1с vs. МТС Мобильные сотрудники (SOAP запросы в 1С 8.2)

14.01.16

Разработка - Запросы

Пример использования SOAP запроса в 1С 8.2

Недавно передо мной стояла задача узнать: осуществимо ли получать данные в 1С из программного продукта МТС Мобильные сотрудники.


Как, оказалось, достучаться к данным МТС необходимо через soap запрос. МТС вам пришлет трактат с описаниями функций и адреса сервисов. В первую очередь предстоит авторизоваться на сервере, вот на этом примере и рассмотрим получение данных в 1С из МТС Мобильные сотрудники B2B XML API


Создаем форму с кнопкой Выполнить и прописываем следующий код. Не забываем в соап запросе продублировать кавычки.

Процедура КнопкаВыполнитьНажатие(Кнопка)
Запрос = СформироватьЗапрос();
ПослатьЗапрос(Запрос);
Сообщить (ПослатьЗапрос(Запрос));
КонецПроцедуры

Функция СформироватьЗапрос()
    Запрос = "<?xml version=""1.0"" encoding=""utf-8""?> <soap:Envelope xmlns:xsi=""http://www.w3.org/2001/XMLSchema-instance"" xmlns:xsd=""http://www.w3.org/2001/XMLSchema"" xmlns:soap=""http://schemas.xmlsoap.org/soap/envelope/""> <soap:Body> <Login xmlns=""ХТТП_сервак""> <login>логин</login> <password>пароль</password> </Login> </soap:Body> </soap:Envelope>";
    Возврат Запрос;
КонецФункции 

Функция ПослатьЗапрос(ЗапросXML)
        АдресСервиса = "ХТТП_b2b";
        ИмяСервера = "ХТТП_сервак";
                              
        MSXML = Новый COMОбъект("MSXML2.XMLHTTP");
        MSXML.open("POST", АдресСервиса, 0);
        MSXML.setRequestHeader("Content-Type", "text/xml; charset=utf-8");
        MSXML.setRequestHeader("Content-Length", СтрДлина(ЗапросXML));
        MSXML.setRequestHeader("SOAPAction", "ХТТП_сервак");
        MSXML.send(ЗапросXML);
        ОтветПолучен = Ложь;
        Для НомерЦикла = 1 по 100 Цикл
            Если MSXML.readyState >3 Тогда
                ОтветПолучен = Истина;
                Прервать;
            КонецЕсли;      
        КонецЦикла;  
              
        Если ОтветПолучен Тогда
            возврат MSXML.responseXML.xml;
            
        Иначе
            Возврат неопределено;
        КонецЕсли;
КонецФункции
 

Теперь открываем форму в толстом клиенте, и после нажатия кнопки на форме в ответ нам вернется примерно вот такой соап-ответ.

<?xml version="1.0"?>
<soap:Envelope xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema">
<soap:Body><LoginResponse xmlns="ХТТП_сервак">
<LoginResult>
<Token>Ключ</Token>
<ID>ИД</ID>
<Name>Имя</Name>
<IsAdmin>ДаНет</IsAdmin>
<RegionID>Регион</RegionID>
<CustomerName>ИмяФИрмы</CustomerName>
<TimeOffset>240</TimeOffset>
</LoginResult></LoginResponse>
</soap:Body></soap:Envelope>

Теперь необходимо вычленить Ключ подключения из соап-ответа, и можно дальше веселиться с различными функциями от МТС Мобильные сотрудники.

SOAP запросы МТС Мобильные сотрудники

См. также

SALE! %

Инструментарий разработчика Роли и права Запросы СКД Программист Платформа 1С v8.3 Управляемые формы Запросы Система компоновки данных Конфигурации 1cv8 Платные (руб)

Набор инструментов программиста и специалиста 1С для всех конфигураций на управляемых формах. В состав входят инструменты: Консоль запросов, Консоль СКД, Консоль кода, Редактор объекта, Анализ прав доступа, Метаданные, Поиск ссылок, Сравнение объектов, Все функции, Подписки на события и др. Редактор запросов и кода с раскраской и контекстной подсказкой. Доработанный конструктор запросов тонкого клиента. Продукт хорошо оптимизирован и обладает самым широким функционалом среди всех инструментов, представленных на рынке.

12000 10000 руб.

02.09.2020    161345    893    399    

873

Запросы Программист Бесплатно (free)

Увидел cheatsheet по SQL и захотелось нарисовать подобное, но про запросы.

18.10.2024    10279    sergey279    18    

64

Запросы Программист Платформа 1С v8.3 Запросы Конфигурации 1cv8 Бесплатно (free)

Столкнулся с интересной ситуацией, которую хотел бы разобрать, ввиду её неочевидности. Речь пойдёт про использование функции запроса АВТОНОМЕРЗАПИСИ() и проблемы, которые могут возникнуть.

11.10.2024    5466    XilDen    36    

81

Запросы Программист Запросы Бесплатно (free)

Отлаживая взаимодействие с базой данных, мы регулярно сталкиваемся с зависающими или подозрительно долго выполняющимися обращениями, негативно влияющими на производительность. О том, как в PostgreSQL выявить подозрительные запросы, основываясь на доступной о них информации, расскажем в статье.

16.08.2024    8164    user1840182    5    

28

Математика и алгоритмы Запросы Программист Платформа 1С v8.3 Запросы Бесплатно (free)

Рассмотрим быстрый алгоритм поиска дублей с использованием hash функции по набору полей шапки и табличных частей.

08.07.2024    2485    ivanov660    9    

22

Запросы СКД Программист Стажер Система компоновки данных Россия Бесплатно (free)

Часто при разработке отчетов в СКД возникает ситуация, когда не совсем понятно, почему отчет выводит не те данные, которые нужны, либо не выводит вовсе. Возникает потребность увидеть конечный запрос, который формирует СКД. Как это сделать, рассмотрим в этой статье.

15.05.2024    9075    implecs_team    6    

47

Запросы Программист Стажер Платформа 1С v8.3 Конфигурации 1cv8 Бесплатно (free)

Часто поступают задачи по произвольному распределению общих сумм. После распределения иногда пропадают копейки. Суть решения добавить АвтоНомерЗаписи() в ВТ распределения, и далее используя функции МАКСИМУМ или МИНИМУМ можем положить разницу копеек в первую или последнюю строку знаменателя распределения.

11.04.2024    3451    andrey_sag    10    

36
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. Гарин 1 15.01.16 02:10 Сейчас в теме
Для работы с soap удобнее использовать объекты WSПрокси и ФабрикаXDTO
gradi; WizaXxX; Светлый ум; +3 Ответить
2. Трактор 1254 21.01.16 10:51 Сейчас в теме
После слова COMОбъект перестал читать. У меня линукс.
tarassov; dzhenn; +2 Ответить
3. ToJIuK 02.03.16 14:56 Сейчас в теме
Переделал обработку под 1с 77 .
Получить Токен у меня получилось, а вот дальше не могу разобраться почему не работает.

SOAPAction: "http://locator.ru/LBS/GetSettings"

<?xml version="1.0" encoding="utf-8"?>
<soap:Envelope xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"xmlns:xsd="http://www.w3.org/2001/XMLSchema"xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/"> 
<soap:Header> 
<SecurityHeader xmlns="http://locator.ru/LBS"> 
<SessionToken>ТОКЕН</SessionToken> 
</SecurityHeader>
</soap:Header>	
<soap:Body> 
<GetSettings xmlns="http://locator.ru/LBS" />
</soap:Body>
</soap:Envelope>
Показать


Пишет
Bad Request
4. Wilka 106 02.03.16 20:58 Сейчас в теме
(3) ToJIuK, У меня сейчас к сожалению нету методички которую присылал МТС, что это за функция GetSettings.?
Вот что у нас было далее для функции GetLocations

ЗапросLocations = СформироватьЗапросLocation(Токен, ИДабонента ,Формат(УбытФакт,"ДФ=""yyyy-MM-ddTЧЧ:мм:сс"""),Формат(ПрибФакт,"ДФ=""yyyy-MM-ddTЧЧ:мм:сс"""))  ;     
	ОтветLocations = ПослатьЗапрос("https://b2b.locator.ru/mts/ws/me_b2b_53/gps.asmx?wsdl","http://locator.ru/LBS/GetLocations",ЗапросLocations);

Функция СформироватьЗапросLocation(Token,subscriberID,dateStart,dateEnd)      
	Запрос = "<?xml version=""1.0"" encoding=""utf-8""?>
	|<soap:Envelope xmlns:xsi=""http://www.w3.org/2001/XMLSchema-instance"" xmlns:xsd=""http://www.w3.org/2001/XMLSchema"" xmlns:soap=""http://schemas.xmlsoap.org/soap/envelope/"">
	|<soap:Header>
	|<SecurityHeader xmlns=""http://locator.ru/LBS"">
	|<SessionToken>"+Token+"</SessionToken></SecurityHeader>
	|</soap:Header>
	|<soap:Body>
	|<GetLocations xmlns=""http://locator.ru/LBS"">
	|<subscriberID>"+subscriberID+"</subscriberID>
	|<dateStart>"+dateStart+"</dateStart>
	|<dateEnd>"+dateEnd+"</dateEnd>
	|</GetLocations>
	|</soap:Body>
	|</soap:Envelope>";
	Возврат Запрос;
КонецФункции


Функция ПослатьЗапрос(АдресСервиса,ИмяСервера,ЗапросXML) 
	
	MSXML = Новый COMОбъект("MSXML2.XMLHTTP");
	MSXML.open("POST", АдресСервиса, 0);
	MSXML.setRequestHeader("Content-Type", "text/xml; charset=utf-8");
	MSXML.setRequestHeader("Content-Length", СтрДлина(ЗапросXML));
	MSXML.setRequestHeader("SOAPAction", ИмяСервера);
	
	//сообщить(ЗапросXML);
	MSXML.send(ЗапросXML);
	ОтветПолучен = Ложь;
	Для НомерЦикла = 1 по 100 Цикл
		Если MSXML.readyState >3 Тогда
			ОтветПолучен = Истина;
			Прервать;
		КонецЕсли;      
	КонецЦикла;  
	
	Если ОтветПолучен Тогда
		возврат MSXML.responseXML;  
		
	иначе
		возврат неопределено;
	конецЕсли;
КонецФункции


Показать
5. bserge88 28.02.17 16:46 Сейчас в теме
А где получить ИД Абонентов?
6. ToJIuK 28.02.17 18:05 Сейчас в теме
(5)смотри метод GetSubscribers, я с начало завел всех сотрудников , потом сделал запрос и просто скопировал данные в справочник (добавил реквизит)
bserge88; Wilka; +2 Ответить
7. bserge88 28.02.17 22:52 Сейчас в теме
(6)Спасибо большое, то что надо!
Оставьте свое сообщение