SOAP: Difference between revisions

=={{header|ActionScript}}==

{{works with|ActionScript|3.0}}

import mx.rpc.events.ResultEvent;

var ws:WebService = new WebService();

private function anotherSoapFunc_Result(event:ResultEvent):void {

// do another something

 

=={{header|AutoHotkey}}==

using embedded vb scripting.

{{libheader|ws4ahk}}

WS_Exec("Set client = CreateObject(""MSSOAP.SoapClient"")")

WS_Exec("client.MSSoapInit ""http://example.com/soap/wsdl""")

Msgbox % result . "`n" . result2

WS_Uninitialize()

 

=={{header|C}}==

Although this is a generic task to show that calling SOAP functions are possible, the following implementation is geared for the real world. In order to execute it, just choose an actual WSDL URL and construct the input XML files for the functions properly, this can also be done in C but requires libraries like xerces unless you want to really construct the XML from scratch.

{{libheader|libcurl}}

#include <curl/curl.h>

#include <string.h>

return 0;

}

Input XML for soapFunc()

<?xml version="1.0" encoding="UTF-8"?>

<soapenv:Envelope xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"

</soapenv:Body>

</soapenv:Envelope>

Input XML for anotherSoapFunc()

<?xml version="1.0" encoding="UTF-8"?>

<soapenv:Envelope xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"

</soapenv:Body>

</soapenv:Envelope>

 

=={{header|Clojure}}==

 

(let [client (soap/client-fn "http://example.com/soap/wsdl")]

(client :soapFunc)

 

=={{header|ColdFusion}}==

<cfset result = client.soapFunc("hello")>

 

=={{header|F Sharp|F#}}==

The availability of functions and the type of parameters is checked at compile time. The development environment supports auto-completion and parameter information just like for regular types.

 

 

type Wsdl = WsdlService<"http://example.com/soap/wsdl">

let result = Wsdl.soapFunc("hello")

 

=={{header|Go}}==

<br>

To make this example a bit more interesting we test against a publicly available working SOAP server at the date of posting.

 

import (

fmt.Println("Name : ", rv.Name)

fmt.Println("Address : ", rv.Address)

 

{{out}}

 

This code uses Unicon features not available in Icon.

 

procedure main(A)

write("soapFunc: ",soap.call("soapFunc"))

write("anotherSoapFunc: ",soap.call("anotherSoapFunc"))

 

A matching SOAP server can be implemented as:

 

 

procedure main()

every (s := " ") ||:= (!A || " ")

return "Goodbye" || s[1:-1]

 

=={{header|Julia}}==

{{trans|C}}

 

function callSOAP(url, infilename, outfilename)

println("Usage : $(@__FILE__) <URL of WSDL> <Input file path> <Output File Path>")

end

 

=={{header|Kotlin}}==

</pre>

Next, you need to compile the following Kotlin program, linking against libcurl.klib.

 

import kotlinx.cinterop.*

}

callSOAP(args[0], args[1], args[2])

Finally, the resulting .kexe file should be executed passing it similar command line arguments to the C entry.

 

=={{header|Mathematica}}/{{header|Wolfram Language}}==

soapFunc["Hello"];

 

=={{header|Perl}}==

{{libheader|SOAP::Lite}}

 

print SOAP::Lite

print SOAP::Lite

-> service('http://example.com/soap/wsdl')

 

=={{header|Phix}}==

{{libheader|Phix/libcurl}}

{{out}}

note: foo/bar/baz are shown properly escaped on the terminal.

=={{header|PHP}}==

{{works with|PHP|5.0.0+}}

//load the wsdl file

$client = new SoapClient("http://example.com/soap/definition.wsdl");

//list if SOAP Functions

print_r($client->__getFunctions());

 

=={{header|PureBasic}}==

XIncludeFile "COMatePLUS.pbi"

Define.COMateObject soapObject = COMate_CreateObject("MSSOAP.SoapClient")

result = soapObject\Invoke("soapFunc('hello')")

result2 = soapObject\Invoke("anotherSoapFunc(34234)")

 

=={{header|Python}}==

{{works with|Python|2.4 and 2.5}}

proxy = WSDL.Proxy("http://example.com/soap/wsdl")

result = proxy.soapFunc("hello")

 

'''Note:''' SOAPpy is a third-party module and can be found at [http://pywebsvcs.sourceforge.net/ Python Web Services]

=={{header|Raku}}==

(formerly Perl 6)

# https://github.com/retupmoca/P6-SOAP

# http://wiki.dreamfactory.com/DreamFactory/Tutorials/Temp_Conversion_SOAP_API

say $request.call('CelsiusToFahrenheit', Celsius => 100 ) or die;

 

{{out}}

<pre>{CelsiusToFahrenheitResult => [212]}

=={{header|Ruby}}==

{{works with|Ruby|1.8}}

 

wsdl = SOAP::WSDLDriverFactory.new("http://example.com/soap/wsdl")

 

response2 = soap.anotherSoapFunc(:aNumber => 42)

 

=={{header|Smalltalk}}==

{{works with|Smalltalk/X}} {{works with|Dolphin Smalltalk}} (not sure about Pharo and VW)

(assuming that the open source [http://www.mars.dti.ne.jp/~umejava/smalltalk/soapOpera/index.html SOAPSpray] package has been loaded.)

 

service := SprayWSDLService onUrl: 'http://example.com/soap/wsdl'.

client := service createClient.

response1 := client send: 'soapFunc' withArguments:{ 'hello' }.

 

=={{header|Tcl}}==

{{works with|Tcl|8.5+}}

Uses the <code>[http://code.google.com/p/tclws/ tclws]</code> package.

 

# Grok the service, and generate stubs

# Do the calls

set result1 [ExampleService::soapFunc "hello"]

 

=={{header|Uniface}}==

Assuming http://example.com/soap/wsdl has been imported into repository and, as result, exists a new component called "webservice"

 

variables

string result1, result2

activate "webservice".soapFunc("hello", result1)

activate "webservice".anotherSoapFunc(34234, result2)

 

=={{header|VBScript}}==

 

Dim result

Set client = CreateObject("MSSOAP.SoapClient")

client.MSSoapInit "http://example.com/soap/wsdl"

result = client.soapFunc("hello")

 

=={{header|Visual Objects}}==

 

LOCAL cUrl AS STRING

LOCAL uResult AS USUAL

uResult := oSoapClient:soapFunc("hello")

uResult := oSoapClient:anotherSoapFunc(34234)

 

=={{header|Wren}}==

{{libheader|libcurl}}

An embedded program so we can ask the C host to communicate with libcurl for us.

 

var CURLOPT_URL = 10002

}

 

<br>

We now embed this in the following C program, compile and run it.

#include <stdlib.h>

#include <string.h>

WrenVM* vm = wrenNewVM(&config);

const char* module = "main";

char *script = readFile(fileName);

WrenInterpretResult result = wrenInterpret(vm, module, script);

free(script);

return 0;

 

{{omit from|Batch File|Does not have network access.}}