Создание SOAP-клиента в Delphi: пошаговое решение проблемы с отсутствием типов из WSDL и анализ результата вызова метода RequestSecurityToken

Delphi , Программа и Интерфейс , Процессы и Сервисы

Введение

В данной статье рассматривается процесс создания SOAP-клиента в среде разработки Delphi, который позволяет вызывать удаленные процедуры через протокол SOAP. Особое внимание уделяется ситуации, когда сгенерированный код из WSDL-файла не содержит полного списка необходимых типов данных, что может вызвать ошибки при выполнении запросов к веб-сервису. Рассмотрим, как можно решить данную проблему, а также как анализировать и обрабатывать результат вызова метода RequestSecurityToken.

Шаг 1: Понимание проблемы

Разработчик столкнулся с проблемой, что сгенерированный WSDL клиент для SOAP сервиса в Delphi XE10 не содержит полного набора типов данных, необходимых для работы с сервисом. Это привело к тому, что разработчик решил создать интерфейсный модуль вручную, что является сложной задачей, требующей глубоких знаний о структуре XML-сообщений и WSDL.

Шаг 2: Ручная кодировка интерфейсного модуля

Разработчик создал классы, которые отражают структуру типов данных, используемых в запросах и ответах SOAP. Это включает в себя типы данных, такие как BinarySecurityToken, Security, TokenType, RequestType, RequestSecurityToken, RequestSecurityTokenResponse и другие.

Шаг 3: Регистрация интерфейсов и классов

Дополнительно разработчик зарегистрировал определенные классы и интерфейсы в реестрах InvRegistry и RemClassRegistry. Это необходимо для того, чтобы система могла корректно обрабатывать типы данных во время выполнения запросов SOAP.

Шаг 4: Написание клиентского кода

Код клиента для выполнения запроса к сервису был написан вручную, что включает создание запроса, отправку заголовочных данных и вызов метода RequestSecurityToken.

Шаг 5: Анализ ответа от сервиса

Разработчик успешно отправил запрос и получил ответ от сервиса, но столкнулся с проблемой, что результат вызова функции RequestSecurityToken был значением nil.

Шаг 6: Понимание причин ошибки и их устранение

Проблема заключалась в неправильном определении интерфейса метода RequestSecurityToken. Вместо возврата значения метод должен был принимать параметры по ссылке, так как в ответе от сервиса присутствовали несколько сложных типов данных, которые нужно было заполнить. Следовательно, интерфейс должен был быть изменен на процедуру с передачей параметров по ссылке:

SecurityTokenServicePortType = interface(IInvokable)
['{FE7EBD83-56D0-4542-5A4D-662805285ED8}']
  procedure RequestSecurityToken(TokenType: TokenType; RequestType: RequestType;
    out Lifetime: Lifetime;
    out RequestedSecurityToken: RequestedSecurityToken;
    out BiPROVersion: BiPROVersion); stdcall;
end;

После изменения интерфейса метода на процедуру и корректной передачи параметров по ссылке, проблема с nil значением была решена.

Шаг 7: Альтернативный метод генерации WSDL

В качестве альтернативного варианта разработчик рассматривает возможность генерации WSDL на основе XML-запросов и ответов. Однако это выходит за рамки стандартных инструментов Delphi и требует дополнительного программирования.

Рекомендации

• Всегда убедитесь, что интерфейс метода соответствует формату ответа от сервиса.
• Используйте отладку и логирование для анализа запросов и ответов SOAP.
• Не забывайте о необходимости освобождения ресурсов (например, FreeAndNil), чтобы избежать утечек памяти.

Заключение

Создание SOAP-клиента в Delphi может быть сложной задачей, особенно если WSDL не содержит всех необходимых типов данных. Однако, с правильным подходом и вниманием к деталям, можно успешно реализовать клиент, способный обращаться к удаленным процедурам и корректно обрабатывать результаты их работы.

Создано по материалам из источника по ссылке.

Разработчик столкнулся с проблемой создания полнофункционального SOAP-клиента в Delphi из-за отсутствия необходимых типов в сгенерированном коде из WSDL и решил эту проблему, создав интерфейсный модуль вручную, а также анализирова

Комментарии и вопросы

Получайте свежие новости и обновления по Object Pascal, Delphi и Lazarus прямо в свой смартфон. Подпишитесь на наш Telegram-канал delphi_kansoftware и будьте в курсе последних тенденций в разработке под Linux, Windows, Android и iOS

:: Главная :: Процессы и Сервисы ::