Сообщения, отправленные пользователем: ladonium

Jupiter wrote:Пытаюсь отправить запрос для метода getRussianEnterpriseList
Подскажите, пожалуйста, что здесь не так?

Процедура на Delphi:

Получается запрос:

И ответ:

<soapenv:Envelope xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/">
   <SOAP-ENV:Header xmlns:SOAP-ENV="http://schemas.xmlsoap.org/soap/envelope/"/>
   <SOAP-ENV:Body xmlns:SOAP-ENV="http://schemas.xmlsoap.org/soap/envelope/">
      <v2:getRussianEnterpriseListResponse xmlns:bs="http://api.vetrf.ru/schema/cdm/base" xmlns:dt="http://api.vetrf.ru/schema/cdm/dictionary/v2" xmlns:v2="http://api.vetrf.ru/schema/cdm/registry/ws-definitions/v2">
         <dt:enterpriseList count="1" total="318" offset="0">
            <dt:enterprise>
               <bs:uuid>033deb59-6624-bd86-4ebe-113fbdca6e21</bs:uuid>
               <bs:guid>f2b62342-7608-65f8-c10c-e7fd40172fa9</bs:guid>
               <bs:active>true</bs:active>
               <bs:last>true</bs:last>
               <bs:status>200</bs:status>
               <bs:createDate>2014-02-14T10:20:17+04:00</bs:createDate>
               <bs:updateDate>2014-02-14T10:20:17+04:00</bs:updateDate>
               <bs:previous>c90d2b92-d1ff-f535-a830-ff762a813756</bs:previous>
               <dt:name>ООО "МЕТРО Кэш энд Керри"</dt:name>
               <dt:numberList/>
               <dt:address>
                  <dt:country>
                     <bs:guid>74a3cbb1-56fa-94f3-ab3f-e8db4940d96b</bs:guid>
                  </dt:country>
                  <dt:region>
                     <bs:guid>fee76045-fe22-43a4-ad58-ad99e903bd58</bs:guid>
                  </dt:region>
                  <dt:locality>
                     <bs:guid>bebfd75d-a0da-4bf9-8307-2e2c85eac463</bs:guid>
                  </dt:locality>
                  <dt:street>
                     <bs:guid>53ddd15c-5555-4c0a-bcf2-fd0a62aa3e57</bs:guid>
                  </dt:street>
                  <dt:house>100</dt:house>
                  <dt:addressView>Российская Федерация, Ульяновская обл., г. Ульяновск, Урицкого ул., д. 100</dt:addressView>
               </dt:address>
            </dt:enterprise>
         </dt:enterpriseList>
      </v2:getRussianEnterpriseListResponse>
   </SOAP-ENV:Body>
</soapenv:Envelope>

Имеется производственная компания (база на MS SQL)
Задача написать шлюз на Delphi.
Не могу понять с чего начать... прошу помочь.

Создал проект в Delphi, через WDSL Importer подключил "ApplicationManagementService_v1.4_pilot.wsdl"

получил:
unit ApplicationManagementService_v1;
interface
uses InvokeRegistry, SOAPHTTPClient, Types, XSBuiltIns, ApplicationManagementService_v11;
type
ApplicationManagementServicePortType = interface(IInvokable)
['{213A10CA-FD9C-F272-69D2-780E0712873A}']
function submitApplicationRequest(const request: submitApplicationRequest): submitApplicationResponse; stdcall;
function receiveApplicationResult(const request: receiveApplicationResultRequest): receiveApplicationResultResponse; stdcall;
end;
function GetApplicationManagementServicePortType(UseWSDL: Boolean=System.False; Addr: string=''; HTTPRIO: THTTPRIO = nil): ApplicationManagementServicePortType;
.....................

создал кнопку на форме
procedure TForm1.Button1Click(Sender: TObject);
var
ws: ApplicationManagementServicePortType;
begin
ws := GetApplicationManagementServicePortType();
end;

А вот что дальше с этим делать?
Куда вносить APIKey, ServiceID, IssuerID?
Как обратится к серверу и пройти авторизацию?
Как отправить хоть какой то запрос и увидеть ответ от сервера?

Скиньте, пожалуйста, код на Delphi у кого есть.