WebServices con NuSOAP en PHP - Ejemplo 4 - Vista

<?php

require_once('nusoap/lib/nusoap.php');
require_once('cliente.php');
require_once('clienteDAO.php');
require_once('soporte_obrea.php');

$miURL = 'http://pruebas.orlandobrea.com.ar/nusoap';
$server = new soap_server();
$server->configureWSDL('ws_orlando', $miURL);
$server->wsdl->schemaTargetNamespace=$miURL;

$soporteWS = new SoporteWS(); // Creo una instancia del objeto propio (SoporteWS)

// ---------------- Funciones usadas por el WS
function getCliente($id) {
    global $soporteWS;
    $dao = new ClienteDAO();
    $cliente = $dao->getCliente($id);
    $respuesta = $soporteWS->convertirAVectorParaWS($cliente);
    return new soapval('return', 'tns:Cliente', $respuesta);
}
function listarClientes() {
    $dao = new ClienteDAO();
    $listado = $dao->getList();
    $objSoporte = new SoporteWS();
    $respuesta = $objSoporte->convertirAVectorParaWS($listado);                 
    return new soapval('return', 'tns:listadoClientes', $respuesta);
}

// --------------- Definicion de las funciones y estructuras expuestas en el WS
$server->wsdl->addComplexType('Cliente',
    'complexType',
    'struct',
    'all',
    '',
    array(
        'id' => array('name' => 'id', 'type' => 'xsd:int'),
        'nombre' => array('name' => 'nombre',    'type' => 'xsd:string'),
        'apellido' => array('name' => 'apellido', 'type' => 'xsd:string'),
        'cuit' => array('name' => 'CUIT',    'type' => 'xsd:string')
    )
);
$server->wsdl->addComplexType('listadoClientes',
    'complexType',
    'array',
    '',
    '',
    array (array('ref'=>'SOAP-ENC:arrayType','wsdl:arrayType'=>'tns:Cliente[]'))
);

$server->register('getCliente', // Nombre de la funcion
                   array('id' => 'xsd:int'), // Parametros de entrada
                   array('return' => 'tns:Cliente'), // Parametros de salida
                   $miURL
                 );
$server->register('listarClientes', // Nombre de la funcion
                   array(), // Parametros de entrada
                   array('return' => 'tns:listadoClientes'), // Parametros de salida
                   $miURL
                 );

$server->service($HTTP_RAW_POST_DATA);
?>

<?php
require_once('nusoap/lib/nusoap.php');
require_once('cliente.php');
require_once('soporte_obrea.php');

// Crear un cliente apuntando al script del servidor (Creado con WSDL)
$serverURL = 'http://pruebas.orlandobrea.com.ar'; // Reemplazar por la URL de tu servidor
$serverScript = 'nusoap_server_ej4_view.php';
$soporteWS = new SoporteWS();

$cliente = new nusoap_client("$serverURL/$serverScript?wsdl", 'wsdl');
// Se pudo conectar?
$error = $cliente->getError();
if ($error) {
    echo '<pre style="color: red">' . $err . '</pre>';
    echo '<p style="color:red;'>htmlspecialchars($client->getDebug(), ENT_QUOTES).'</p>';
    die();
}

$listado = '';
$objCliente = '';
// Existe el parametro "view" en la URL con la cual se esta llamando a este script?
if ($_GET['view']) {
    // Si => debo mostrar los datos del cliente
    $metodoALlamar = 'getCliente';
    $result = $cliente->call(
        $metodoALlamar,                     // Funcion a llamar
        array($_GET['id']),    // Parametros pasados a la funcion
        "uri:$serverURL/$serverScript",                   // namespace
        "uri:$serverURL/$serverScript/$metodoALlamar"       // SOAPAction
    );
    // Verificacion que los parametros estan ok, y si lo estan. mostrar rta.
    if ($cliente->fault) {
        echo '<b>Error: ';
        print_r($result);
        echo '</b>';
    } else {
        $error = $cliente->getError();
        if ($error) {
            echo '<b style="color: red">Error: ' . $error . '</b>';
        } else {
            $objCliente = $soporteWS->convertirDeVectorDesdeWS($result, 'Cliente');
         }
    }
} else { // No fue llamado con el parametro "view" en la URL => debo mostrar el listado de clientes
    $metodoALlamar = 'listarClientes';
    $result = $cliente->call(
        $metodoALlamar,                     // Funcion a llamar
        array(),    // Parametros pasados a la funcion
        "uri:$serverURL/$serverScript",                   // namespace
        "uri:$serverURL/$serverScript/$metodoALlamar"       // SOAPAction
    );
    // Verificacion que los parametros estan ok, y si lo estan. mostrar rta.
    if ($cliente->fault) {
        echo '<b>Error: ';
        print_r($result);
        echo '</b>';
    } else {
        $error = $cliente->getError();
        if ($error) {
            echo '<b style="color: red">Error: ' . $error . '</b>';
        } else {
            $listado = $soporteWS->convertirDeVectorDesdeWS($result, 'Cliente');
         }
    }
}
// De aca en mas es la pagina HTML que muestra el listado de clientes o los datos de un cliente en particular (dependiendo
// si se llamo con view como parametro o no)
?>
<html>
<body>
    <? if ($listado) { ?>
    <!-- Listado de todos los clientes -->
    <h1>Listado</h1>
    <table>
        <tr><td>Nombre</td><td>Apellido</td><td>CUIT</td><td>Acciones</td></tr>
        <?php
            foreach ($listado as $objeto) {
                echo '<tr>';
                echo '<td>'.$objeto->nombre.'</td>';
                echo '<td>'.$objeto->apellido.'</td>';
                echo '<td>'.$objeto->cuit.'</td>';
                echo '<td><a href="nusoap_client_ej4_view.php?view=yes&id='.$objeto->id.'">Ver</a></td>';
                echo '</tr>';
            }
        ?>
    </table>
    <? } else { ?>
    <!-- Datos del cliente seleccionao -->
    <h1>Cliente</h1>
    <?php
        echo '<strong>ID:</strong> '.$objCliente->id.'<br/>';
        echo '<strong>Nombre:</strong> '.$objCliente->nombre.'<br/>';
        echo '<strong>Apellido:</strong> '.$objCliente->apellido.'<br/>';
        echo '<strong>CUIT:</strong> '.$objCliente->cuit.'<br/>';
    ?>
    <? } ?>
</body>
</html>