Mam prośbę o przetłumaczenie tego poniżej na IdSoap, albo przynajmniej wytłumaczenie jak to zrobić.
http://axonsoftware.biz/working-with-currenex-web-services-from-perl-and-soaplite
Może przynajmniej ktoś wytłumaczy co się dzieje w pierwszym wierszu?
$service->service("https://pret-dl.currenex.com/webservice/xml/HubRetailService.wsdl");
$service->proxy("https://pret-dl.currenex.com/webservice/request/HubRetailService");
my @result = $service->GetAccountList(
SOAP::Data->name("hubUserID")->value($login),
SOAP::Header->name("cx:session" => \SOAP::Header->value(
SOAP::Header->name("cx:sessionTicket")->value($sessionId),
SOAP::Header->name("cx:userID")->value($login)
))
);
#Go through all accounts
foreach (@result) {
my $account = CNX::Account->new();
$account->account_id($_->{'accountID'});
$account->create_date($_->{'creationDate'});
my $settings = {
'marginStatus' => $_->{'marginStatus'}
};
$account->settings($settings);
push(@accounts, $account);
}
Czy adres na który zostanie to przekazane znajduje się w pliku: https://pret-dl.currenex.com/webservice/xml/HubRetailService.wsdl ?
Czy dopiero w tym pliku szukamy serwis o nazwie GetAccountList przy którym jest adres gdzie to zapytanie skierować?