Directory structure refactoring.

[siap.git] / ws / nusoap / samples / wsdlclient3b.php

diff --git a/ws/nusoap/samples/wsdlclient3b.php b/ws/nusoap/samples/wsdlclient3b.php
new file mode 100644 (file)
index 0000000..dc289a0
--- /dev/null
+++ b/ws/nusoap/samples/wsdlclient3b.php
@@ -0,0 +1,46 @@
+<?php
+/*
+ *     $Id: wsdlclient3b.php,v 1.1 2004/06/15 15:38:29 snichol Exp $
+ *
+ *     WSDL client sample.
+ *
+ *     Service: WSDL
+ *     Payload: rpc/encoded (params as an XML string; cf. wsdlclient3.php)
+ *     Transport: http
+ *     Authentication: none
+ */
+require_once('../lib/nusoap.php');
+$proxyhost = isset($_POST['proxyhost']) ? $_POST['proxyhost'] : '';
+$proxyport = isset($_POST['proxyport']) ? $_POST['proxyport'] : '';
+$proxyusername = isset($_POST['proxyusername']) ? $_POST['proxyusername'] : '';
+$proxypassword = isset($_POST['proxypassword']) ? $_POST['proxypassword'] : '';
+$client = new soapclient('http://www.scottnichol.com/samples/hellowsdl2.php?wsdl', true,
+                                               $proxyhost, $proxyport, $proxyusername, $proxypassword);
+$err = $client->getError();
+if ($err) {
+       echo '<h2>Constructor error</h2><pre>' . $err . '</pre>';
+}
+$params = '<person xsi:type="tns:Person"><firstname xsi:type="xsd:string">Willi</firstname><age xsi:type="xsd:int">22</age><gender xsi:type="xsd:string">male</gender></person>';
+$result = $client->call('hello', $params);
+// Check for a fault
+if ($client->fault) {
+       echo '<h2>Fault</h2><pre>';
+       print_r($result);
+       echo '</pre>';
+} else {
+       // Check for errors
+       $err = $client->getError();
+       if ($err) {
+               // Display the error
+               echo '<h2>Error</h2><pre>' . $err . '</pre>';
+       } else {
+               // Display the result
+               echo '<h2>Result</h2><pre>';
+               print_r($result);
+               echo '</pre>';
+       }
+}
+echo '<h2>Request</h2><pre>' . htmlspecialchars($client->request, ENT_QUOTES) . '</pre>';
+echo '<h2>Response</h2><pre>' . htmlspecialchars($client->response, ENT_QUOTES) . '</pre>';
+echo '<h2>Debug</h2><pre>' . htmlspecialchars($client->debug_str, ENT_QUOTES) . '</pre>';
+?>