una consulta sobre error en consumir WS soap

[Marcelo Barberis]

bueno tratando de generar procesos para consumir WS soap para obtener informacion pero como recien comienzo y al mismo tiempo recien haciendo porque no me queda de otra la renta implementa un sistema de factura diferente a lo que estaba haciendo y ahora usa WS para todos sus procesos, me sale este error. pense que era que estaba desactualizado pero acturalize al que tenia a una version msxml6 pero sigue igual

ahora nose si alguie me quiere colaborar en revisar mi armado de WS para ver si esta bien hecho o si cometi algunos o varios errores, le paso el prg donde arme el WS, 

Desde ya agradesco si me colaboran y por su tiempo de poder mirar el codigo.

--

Marcelo Barberis Gutierrez
Sistemas Informaticos
Villa Montes - Bolivia
Telef.: +591-76830544

[HernanCano]

Probablemente usas Win7 o WinXP y --según recuerdo-- hay algo en Windows que no facilita la ejecución de servicios web HTTPS.

Debieras consultar con el proveedor de tu servicio web, pues seguramente ellos tendrán la solución a ese impasse.

Aunque probablemente por aquí ya está y es posible que dentro de poco te la rueden....

[Zarlu]

Buenos días alexmarce !

Con éste código se obtiene respuesta del WS como "usuario no encontrado".

No sé si ese WS está en fase de prueba.

Mi sugerencia es obtener desde la página del Siat el Token. El manual menciona tener la opción.

https://siatinfo.impuestos.gob.bo/index.php/facturacion-en-linea/emision-y-envio-de-facturas/solicitud-token

Cuando puedas, de esa forma, obtener el token considero que ya podrás obtenerlo por código.

CLEAR
*-variables
lcNit=""
lcLogin=""&&usuario
lcPass=""&&contraseña
lcURL="https://pilotosiatservicios.impuestos.gob.bo/v1/ServicioAutenticacionSoap"
*-xml de peticion
TEXT TO lcXMLRequest TEXTMERGE PRETEXT 7 NOSHOW
<soapenv:Envelope xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:siat="https://siat.impuestos.gob.bo/">
   <soapenv:Header/>
   <soapenv:Body>
      <siat:token>
         <DatosUsuarioRequest>
            <!--Optional:-->
            <client>0</client>
            <!--Optional:-->
            <ip>""</ip>
            <login><<lcLogin>></login>
            <!--Optional:-->
            <nit><<lcNit>></nit>
            <password><<lcPass>></password>
            <!--Optional:-->
            <tipoClienteId>0</tipoClienteId>
            <!--Optional:-->
            <tipoUsuarioId>0</tipoUsuarioId>
         </DatosUsuarioRequest>
      </siat:token>
   </soapenv:Body>
</soapenv:Envelope>
ENDTEXT
*-consulta web service
lcRespuesta=""
TRY
    oHTTP = CREATEOBJECT('Microsoft.XMLHTTP')
    oHTTP.OPEN("POST", lcURL, .f.)
    oHTTP.setRequestHeader("Content-Type", "text/xml;charset=utf-8")
    oHTTP.SEND(lcXMLRequest)
    lcRespuesta=oHTTP.responsetext
     CATCH TO loErr
      lcError="Error: " + TRANSFORM(loErr.ErrorNo) +  " Mensaje: " + loErr.Message
       MESSAGEBOX(lcError,16,"Error")
ENDTRY
? lcRespuesta

Suerte

zarlu

Chetumal, Quintana Roo, México