Веб-сервис клиентов расположен по адресу https://ltl-ws.major-express.ru/mega/clients.asmx?wsdl. Доступ к веб-сервису осуществляется только с авторизацией пользователя. Тип аутентификации - Basic. Запросы на предоставление параметров учетной записи веб-сервиса направляются менеджеру клиента.
При возникновении ошибки в работе функций и процедур веб-сервиса вызываются исключения. Им посвящена страница "Об исключениях".
Применяемое в тексте сокращение ДШВ означает длина-ширина-высота.
ТЕСТОВАЯ СРЕДА
Версия веб-сервиса клиентов для тестирования размещена по адресу https://ltl-ws.major-express.ru/test-mega/clients.asmx?wsdl.
Примеры кода инициализации клиента веб-сервиса
Классический клиент:Dim m_WebService As New WebServices.MEGA.ClientsWebService
m_WebService.EnableDecompression = True
m_WebService.Credentials = New System.Net.NetworkCredential("login", "password")
Пример кода обработки исключения с помощью клиента веб-сервиса в DLLCatch ex As System.Web.Services.Protocols.SoapException
Dim ErrorMessage As String = String.Empty
Dim exx As Exception = ex
Do
ErrorMessage &= exx.Message
exx = exx.InnerException
If exx IsNot Nothing Then ErrorMessage &= vbNewLine
Loop Until exx Is Nothing
Console.WriteLine(ErrorMessage)
Dim wpe As New MajorExpress.LTL.WebServiceException(ex)
Console.WriteLine("Код: {0}" & vbNewLine & "Сообщение: {1}", wpe.Code, wpe.Description)
If wpe.PackagesErrors IsNot Nothing Then
Console.WriteLine("Дополнительные ошибки:" & vbNewLine)
For Each pke As MajorExpress.LTL.PackageError In wpe.PackagesErrors
Console.WriteLine("Код: {0}"& vbNewLine & "Сообщение: {1}"& vbNewLine & "Номер места: {2}"& vbNewLine & "Номер накладной: {3}"& vbNewLine, pke.Code, pke.Description, pke.PackageID, pke.WBID)
Next
End If
If wpe.WBID.HasValue Then Console.WriteLine("Накладная: {0}", wpe.WBID)