PHP使用NuSOAP调用Web服务的方法

<?php
require_once('./lib/nusoap.php');
$client = new soapclientnusoap('http://www.devtrackn.com/webservice/server.php');
$err = $client->geterror();
if ($err) {
  // display the error
  echo '<p><b>constructor error: ' . $err . '</b></p>';
  // at this point, you know the call that follows will fail
}
////////////////////////////////////////////////////////
////////////////////////////////////////////////////////
// update_location method parameter
$param = array(
    'device_number'   => '9910948357',
    'latitude'     => '40.727757',
    'longitude'     => '-73.984366',
    'battery_status'  => '30'
  );
// user_action method parameter
$param2 = array(
    'device_number'   => '27ab2026da5213ebd6c95e5fbe50965bdfaddf4b',
    'latitude'     => '40.727757',
    'longitude'     => '-73.984366',
    'user_action'    => 'meeting_test'
  );
// sos method parameter
$param3 = array(
    'device_number'   => '9910948357',
    'latitude'     => '40.727757',
    'longitude'     => '-73.984366',
  );
//$result = $client->call('update_location', $param);
//$result = $client->call('user_action', $param2);
//$result = $client->call('sos', $param3);
$result = $client->call('user_entity_status', array('device_number' => '27ab2026da5213ebd6c95e5fbe50965bdfaddf4b'));
////////////////////////////////////////////////////////
////////////////////////////////////////////////////////
// check for a fault
if ($client->fault) {
  echo '<p><b>fault: ';
  print_r($result);
  echo '</b></p>';
} else {
  // check for errors
  $err = $client->geterror();
  if ($err) {
    // display the error
    echo '<p><b>error: ' . $err . '</b></p>';
  } else {
    // display the result
    echo "<pre>";
    print_r($result);
    echo "</pre>";
  }
}
echo '<h2>request</h2>';
echo '<pre>' . htmlspecialchars($client->request, ent_quotes) . '</pre>';
echo '<h2>response</h2>';
echo '<pre>' . htmlspecialchars($client->response, ent_quotes) . '</pre>';
/*
// display the debug messages
echo '<h2>debug</h2>';
echo '<pre>' . htmlspecialchars($client->debug_str, ent_quotes) . '</pre>';
*/
?>