soapAction WSDL

Доброго времени суток!
Имею проблему написать soap-сервис по уже предоставленной wsdl. Сам сервис описан, но его описание не совпадает с предоставленным. Основная проблема с описанием soapAction, в дельфовой wsdl он выглядит как

<operation name="sendResponse">
<operation xmlns="http://schemas.xmlsoap.org/wsdl/soap/" soapAction="urn:HIVRegistryIntf-Callback#sendResponse" style="rpc"/>
....
</operation>

а надо

<operation name="sendResponse">
<operation xmlns="http://schemas.xmlsoap.org/wsdl/soap/" soapAction="sendResponse" style="rpc"/>
....
</operation>

можно поменять в OnAfterPublishingWSDL на нужное, но тогда при обращении к серверу выходит ошибка unknown soap action.
Как сделать описание нужным и работающим?

Вы использовали встроенный в Delphi WSDLImporter и он неверно сгенерировал Action?

АА.. вы делаете сервер, но подгоняете под готовую wsdl? какой ужас...
Попробуйте
InvRegistry.RegisterDefaultSOAPAction(TypeInfo(IAAA), 'zzz');

но он выставит его для всех операций

Еще можно вот так, для каждой операции задать свой..

InvRegistry.RegisterAllSOAPActions(TypeInfo(IAAA), '|MyAction1|MyAction2|MyAction3|MyAction4');

X-Cite,

Спасибо за ответ. Но не помогло, изменений в wsdl нет

Покажите код региастрации сервиса
и приложите wsdl что-ли

  TCallback = class(TInvokableClass, Callback)
  public
    function sendResponse(const id: string; const oid: string; const response: string): Status; stdcall;
  end;

 TSOAPCredentials = class(TSoapHeader)
 private
   fMessageID:string;
 public
   constructor Create; overload; override;
   constructor Create(AMessageID:string);  overload;

   function ObjectToSOAP(RootNode, ParentNode: IXMLNode;
                            const ObjConverter: IObjConverter;
                            const NodeName, NodeNamespace, ChildNamespace: InvString; ObjConvOpts: TObjectConvertOptions;
                            out RefID: InvString): IXMLNode; override;
 end;

.....

 
initialization
  InvRegistry.RegisterInvokableClass(TCallback);
  InvRegistry.RegisterHeaderClass(TypeInfo(TCallback), TSOAPCredentials);
  InvRegistry.RegisterDefaultSOAPAction(TypeInfo(TCallback), 'sendResponse');

сам wsdl висит на http://92.255.206.241:8100/wsdl/Callback

Den94,

InvRegistry.RegisterDefaultSOAPAction нужен TypeInfo интерфейса а не класса.
Какой интерфейс у вас отвечает за сервис, тот и нужно указать

X-Cite
Den94, InvRegistry.RegisterDefaultSOAPAction нужен TypeInfo интерфейса а не класса. Какой интерфейс у вас отвечает за сервис, тот и нужно указать

Заработало вроде как, спасибо. Не подскажите какие-нибудь ресурсы по теме? Ато гугл упорно не хочет открывать мне этих секретов