Hola, buenos dias
lo envio de nuevo pxq no sé si llego.

quizas alguien pueda ayudarme.
necesito conectarme a un ws de jerarquicos salud y no logro por el momento traer los datos.

el ws de test se encuentra en: http://servicios.jerarquicos.com:10500/AgenteServicios.svc?wsdl
y debo usar el siguente objecto para verificar si un usuario es valido.
DeterminarElegibilidadSocioServiciosSalud al cual hay que pasarles parametros, yo hago:

loWSPrueba = CREATEOBJECT("MSSOAP.SoapClient30")
loWSPrueba.MSSoapInit("http://servicios.jerarquicos.com:10500/AgenteServicios.svc?wsdl";)

y se conecta,
pero no sé como deberia pasar los parametros que son ya que me da error de parametros:

FechaDeReferencia '2013-12-24T00:00:00'
NumeroSocio         62707
OrdenSocio         0
IdTipoDocumento        null
NumeroDocumento        null


ellos,  me enviaron un ejemplo en PHP que aqui abajo lo reproduzco:
si alguno se le ocurre como traducirlo al zorro.
desde ya muchas gracias.
Saludos
Carlos Morandin



<?php

try {

$client = new SoapClient("http://servicios.jerarquicos.com:10500/AgenteServicios.svc?wsdl";,

array('cache_wsdl' => WSDL_CACHE_NONE, 'trace' => TRUE));

//IMPRIME LAS FUNCIONES

echo "<h4>Funciones WS</h4>";

print_r($client->__getFunctions());

echo "<hr/>";

//echo "antes";

$CriterioElegibilidadSocioServiciosSalud = array('FechaDeReferencia' => '2013-12-24T00:00:00',

'NumeroSocio' => 62707,

'OrdenSocio' => 0,

'IdTipoDocumento' => null,

'NumeroDocumento' => null);

$SolicitudElegibilidadSocioServiciosSalud = array('CriterioElegibilidadSocioServiciosSalud' => $CriterioElegibilidadSocioServiciosSalud);

//Llamada al servicio pasando el parámetro

$ready = $client->DeterminarElegibilidadSocioServiciosSalud(array('solicitudElegibilidadSocioServiciosSalud' => $SolicitudElegibilidadSocioServiciosSalud));

echo "<h4>Resultado WS</h4>";

print_r($ready);

    echo "<hr/>";

$res = $ready->DeterminarElegibilidadSocioServiciosSaludResult->DTOSerializado;

    $obj = json_decode($res);

print $obj->{'Numero'} . '  ' . $obj->{'Apellido'} . ' ' . $obj->{'Nombre'};

} catch (Exception $e) {

trigger_error($e->getMessage(), E_USER_WARNING);

}

echo '<hr>' . "Test Finalizado";

?>



Responder a