Sample code for 30+ languages & platforms
Xbase++

SOAP Request to Issue Documents in Facto.cl

See more HTTP Misc Examples

Demonstrates how to make a SOAP HTTP request to issue a document using the facto.cl webservice.

Chilkat Xbase++ Downloads

Xbase++
LOCAL nSuccess
LOCAL oXml
LOCAL oHttp
LOCAL oResp
LOCAL oXmlResp

nSuccess := 0

//  This example requires the Chilkat API to have been previously unlocked.
//  See Global Unlock Sample for sample code.

//  --------------------------------------------------------------------------------
//  Also see Chilkat's Online WSDL Code Generator
//  to generate code and SOAP Request and Response XML for each operation in a WSDL.
//  --------------------------------------------------------------------------------

//  Here is an example of an HTTP POST Request we'll be sending:

//  POST /documento.php HTTP/1.1
//  Content-Type: text/xml;charset=UTF-8
//  SOAPAction: https://conexion.facto.cl/documento.php/emitirDocumento
//  
//  <soapenv:Envelope xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema"  xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:urn="urn:server">
//     <soapenv:Header/>
//     <soapenv:Body>
//        <urn:emitirDocumento soapenv:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/">
//           <documento xsi:type="urn:emitir_dte">
//              <encabezado xsi:type="urn:encabezado">
//                 <tipo_dte xsi:type="xsd:string">39</tipo_dte>
//                 <fecha_emision xsi:type="xsd:date">2019-08-03</fecha_emision>
//                 <condiciones_pago xsi:type="xsd:string">0</condiciones_pago>
//                 <receptor_email xsi:type="xsd:string">example@gmail.com</receptor_email>
//              </encabezado>
//              <detalles xsi:type="urn:detalles">
//                 <detalle xsi:type="urn:detalle">
//                    <cantidad xsi:type="xsd:int">3</cantidad>
//                    <glosa xsi:type="xsd:string">Recarga Agua Purificada</glosa>
//                    <monto_unitario xsi:type="xsd:decimal">1932.773109</monto_unitario>
//                    <exento_afecto xsi:type="xsd:boolean">1</exento_afecto>
//                 </detalle>
//              </detalles>
//              <totales xsi:type="urn:totales">
//                 <total_exento xsi:type="xsd:int">0</total_exento>
//                 <total_afecto xsi:type="xsd:int">5798</total_afecto>
//                 <total_iva xsi:type="xsd:int">1102</total_iva>
//                 <total_final xsi:type="xsd:Int">6900</total_final>
//              </totales>
//           </documento>
//        </urn:emitirDocumento>
//     </soapenv:Body>
//  </soapenv:Envelope>

//  Use this online tool to generate code from sample XML: 
//  Generate Code to Create XML

oXml := CreateObject("Chilkat.Xml")
oXml:Tag := "soapenv:Envelope"
oXml:AddAttribute("xmlns:xsi", "http://www.w3.org/2001/XMLSchema-instance")
oXml:AddAttribute("xmlns:xsd", "http://www.w3.org/2001/XMLSchema")
oXml:AddAttribute("xmlns:soapenv", "http://schemas.xmlsoap.org/soap/envelope/")
oXml:AddAttribute("xmlns:urn", "urn:server")
oXml:UpdateChildContent("soapenv:Header", "")
oXml:UpdateAttrAt("soapenv:Body|urn:emitirDocumento", 1, "soapenv:encodingStyle", "http://schemas.xmlsoap.org/soap/encoding/")
oXml:UpdateAttrAt("soapenv:Body|urn:emitirDocumento|documento", 1, "xsi:type", "urn:emitir_dte")
oXml:UpdateAttrAt("soapenv:Body|urn:emitirDocumento|documento|encabezado", 1, "xsi:type", "urn:encabezado")
oXml:UpdateAttrAt("soapenv:Body|urn:emitirDocumento|documento|encabezado|tipo_dte", 1, "xsi:type", "xsd:string")
oXml:UpdateChildContent("soapenv:Body|urn:emitirDocumento|documento|encabezado|tipo_dte", "39")
oXml:UpdateAttrAt("soapenv:Body|urn:emitirDocumento|documento|encabezado|fecha_emision", 1, "xsi:type", "xsd:date")
oXml:UpdateChildContent("soapenv:Body|urn:emitirDocumento|documento|encabezado|fecha_emision", "2019-08-03")
oXml:UpdateAttrAt("soapenv:Body|urn:emitirDocumento|documento|encabezado|condiciones_pago", 1, "xsi:type", "xsd:string")
oXml:UpdateChildContent("soapenv:Body|urn:emitirDocumento|documento|encabezado|condiciones_pago", "0")
oXml:UpdateAttrAt("soapenv:Body|urn:emitirDocumento|documento|encabezado|receptor_email", 1, "xsi:type", "xsd:string")
oXml:UpdateChildContent("soapenv:Body|urn:emitirDocumento|documento|encabezado|receptor_email", "example@gmail.com")
oXml:UpdateAttrAt("soapenv:Body|urn:emitirDocumento|documento|detalles", 1, "xsi:type", "urn:detalles")
oXml:UpdateAttrAt("soapenv:Body|urn:emitirDocumento|documento|detalles|detalle", 1, "xsi:type", "urn:detalle")
oXml:UpdateAttrAt("soapenv:Body|urn:emitirDocumento|documento|detalles|detalle|cantidad", 1, "xsi:type", "xsd:int")
oXml:UpdateChildContent("soapenv:Body|urn:emitirDocumento|documento|detalles|detalle|cantidad", "3")
oXml:UpdateAttrAt("soapenv:Body|urn:emitirDocumento|documento|detalles|detalle|glosa", 1, "xsi:type", "xsd:string")
oXml:UpdateChildContent("soapenv:Body|urn:emitirDocumento|documento|detalles|detalle|glosa", "Recarga Agua Purificada")
oXml:UpdateAttrAt("soapenv:Body|urn:emitirDocumento|documento|detalles|detalle|monto_unitario", 1, "xsi:type", "xsd:decimal")
oXml:UpdateChildContent("soapenv:Body|urn:emitirDocumento|documento|detalles|detalle|monto_unitario", "1932.773109")
oXml:UpdateAttrAt("soapenv:Body|urn:emitirDocumento|documento|detalles|detalle|exento_afecto", 1, "xsi:type", "xsd:boolean")
oXml:UpdateChildContent("soapenv:Body|urn:emitirDocumento|documento|detalles|detalle|exento_afecto", "1")
oXml:UpdateAttrAt("soapenv:Body|urn:emitirDocumento|documento|totales", 1, "xsi:type", "urn:totales")
oXml:UpdateAttrAt("soapenv:Body|urn:emitirDocumento|documento|totales|total_exento", 1, "xsi:type", "xsd:int")
oXml:UpdateChildContent("soapenv:Body|urn:emitirDocumento|documento|totales|total_exento", "0")
oXml:UpdateAttrAt("soapenv:Body|urn:emitirDocumento|documento|totales|total_afecto", 1, "xsi:type", "xsd:int")
oXml:UpdateChildContent("soapenv:Body|urn:emitirDocumento|documento|totales|total_afecto", "5798")
oXml:UpdateAttrAt("soapenv:Body|urn:emitirDocumento|documento|totales|total_iva", 1, "xsi:type", "xsd:int")
oXml:UpdateChildContent("soapenv:Body|urn:emitirDocumento|documento|totales|total_iva", "1102")
oXml:UpdateAttrAt("soapenv:Body|urn:emitirDocumento|documento|totales|total_final", 1, "xsi:type", "xsd:Int")
oXml:UpdateChildContent("soapenv:Body|urn:emitirDocumento|documento|totales|total_final", "6900")

oHttp := CreateObject("Chilkat.Http")

oHttp:BasicAuth := 1
oHttp:Login := "9.999.999-9/mylogin"
oHttp:Password := "mypassword"

oHttp:SetRequestHeader("SoapAction", "https://conexion.facto.cl/documento.php/emitirDocumento")

oResp := CreateObject("Chilkat.HttpResponse")
nSuccess := oHttp:HttpStr("POST", "https://conexion.facto.cl/documento.php", oXml:GetXml(), "utf-8", "text/xml", oResp)
IF (nSuccess == 0)
    ? oHttp:LastErrorText
    oXml:destroy()
    oHttp:destroy()
    oResp:destroy()
    RETURN
ENDIF

//  A status code = 200 indicates success.
? "Response status code = " + Str(oResp:StatusCode)

oXmlResp := CreateObject("Chilkat.Xml")
oXmlResp:LoadXml(oResp:BodyStr)
? "Response body text:"
? oXmlResp:GetXml()

//  The response will look like this:

//  <?xml version="1.0" encoding="UTF-8"?>
//  <SOAP-ENV:Envelope SOAP-ENV:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/" xmlns:SOAP-ENV="http://schemas.xmlsoap.org/soap/envelope/" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:SOAP-ENC="http://schemas.xmlsoap.org/soap/encoding/">
//      <SOAP-ENV:Body>
//          <ns1:emitirDocumentoResponse xmlns:ns1="urn:server">
//              <return xsi:type="xsd:complexType">
//                  <resultado>
//                      <status>0</status>
//                      <mensaje_error/>
//                  </resultado>
//                  <encabezado>
//                      <tipo_dte>39</tipo_dte>
//                      <folio>109999</folio>
//                      <fecha_emision>2019-08-03</fecha_emision>
//                      <condiciones_pago>0</condiciones_pago>
//                      <receptor_email>example@gmail.com</receptor_email>
//                  </encabezado>
//                  <detalles>
//                      <cantidad>3</cantidad>
//                      <glosa>Recarga Agua Purificada</glosa>
//                      <monto_unitario>1932.773109</monto_unitario>
//                      <exento_afecto>1</exento_afecto>
//                  </detalles>
//                  <totales>
//                      <total_exento>0</total_exento>
//                      <total_afecto>5798</total_afecto>
//                      <total_iva>1102</total_iva>
//                      <total_final>6900</total_final>
//                  </totales>
//                  <enlaces>
//                      <dte_xml>https://temporal.facto.cl/2019/08/999993022aa9e0733174e87086ade7d4.xml</dte_xml>
//                      <dte_pdf>https://temporal.facto.cl/2019/08/99999f52cf80c8ffc1fc22338dae022.pdf</dte_pdf>
//                      <dte_timbre>https://temporal.facto.cl/2019/08/999999856c08b3d24a83bf29add5364a.png</dte_timbre>
//                  </enlaces>
//              </return>
//          </ns1:emitirDocumentoResponse>
//      </SOAP-ENV:Body>
//  </SOAP-ENV:Envelope>

oXml:destroy()
oHttp:destroy()
oResp:destroy()
oXmlResp:destroy()