PowerBuilder
PowerBuilder
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 PowerBuilder Downloads
integer li_rc
long li_Success
oleobject loo_Xml
oleobject loo_Http
oleobject loo_Resp
oleobject loo_XmlResp
li_Success = 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
loo_Xml = create oleobject
li_rc = loo_Xml.ConnectToNewObject("Chilkat.Xml")
if li_rc < 0 then
destroy loo_Xml
MessageBox("Error","Connecting to COM object failed")
return
end if
loo_Xml.Tag = "soapenv:Envelope"
loo_Xml.AddAttribute("xmlns:xsi","http://www.w3.org/2001/XMLSchema-instance")
loo_Xml.AddAttribute("xmlns:xsd","http://www.w3.org/2001/XMLSchema")
loo_Xml.AddAttribute("xmlns:soapenv","http://schemas.xmlsoap.org/soap/envelope/")
loo_Xml.AddAttribute("xmlns:urn","urn:server")
loo_Xml.UpdateChildContent("soapenv:Header","")
loo_Xml.UpdateAttrAt("soapenv:Body|urn:emitirDocumento",1,"soapenv:encodingStyle","http://schemas.xmlsoap.org/soap/encoding/")
loo_Xml.UpdateAttrAt("soapenv:Body|urn:emitirDocumento|documento",1,"xsi:type","urn:emitir_dte")
loo_Xml.UpdateAttrAt("soapenv:Body|urn:emitirDocumento|documento|encabezado",1,"xsi:type","urn:encabezado")
loo_Xml.UpdateAttrAt("soapenv:Body|urn:emitirDocumento|documento|encabezado|tipo_dte",1,"xsi:type","xsd:string")
loo_Xml.UpdateChildContent("soapenv:Body|urn:emitirDocumento|documento|encabezado|tipo_dte","39")
loo_Xml.UpdateAttrAt("soapenv:Body|urn:emitirDocumento|documento|encabezado|fecha_emision",1,"xsi:type","xsd:date")
loo_Xml.UpdateChildContent("soapenv:Body|urn:emitirDocumento|documento|encabezado|fecha_emision","2019-08-03")
loo_Xml.UpdateAttrAt("soapenv:Body|urn:emitirDocumento|documento|encabezado|condiciones_pago",1,"xsi:type","xsd:string")
loo_Xml.UpdateChildContent("soapenv:Body|urn:emitirDocumento|documento|encabezado|condiciones_pago","0")
loo_Xml.UpdateAttrAt("soapenv:Body|urn:emitirDocumento|documento|encabezado|receptor_email",1,"xsi:type","xsd:string")
loo_Xml.UpdateChildContent("soapenv:Body|urn:emitirDocumento|documento|encabezado|receptor_email","example@gmail.com")
loo_Xml.UpdateAttrAt("soapenv:Body|urn:emitirDocumento|documento|detalles",1,"xsi:type","urn:detalles")
loo_Xml.UpdateAttrAt("soapenv:Body|urn:emitirDocumento|documento|detalles|detalle",1,"xsi:type","urn:detalle")
loo_Xml.UpdateAttrAt("soapenv:Body|urn:emitirDocumento|documento|detalles|detalle|cantidad",1,"xsi:type","xsd:int")
loo_Xml.UpdateChildContent("soapenv:Body|urn:emitirDocumento|documento|detalles|detalle|cantidad","3")
loo_Xml.UpdateAttrAt("soapenv:Body|urn:emitirDocumento|documento|detalles|detalle|glosa",1,"xsi:type","xsd:string")
loo_Xml.UpdateChildContent("soapenv:Body|urn:emitirDocumento|documento|detalles|detalle|glosa","Recarga Agua Purificada")
loo_Xml.UpdateAttrAt("soapenv:Body|urn:emitirDocumento|documento|detalles|detalle|monto_unitario",1,"xsi:type","xsd:decimal")
loo_Xml.UpdateChildContent("soapenv:Body|urn:emitirDocumento|documento|detalles|detalle|monto_unitario","1932.773109")
loo_Xml.UpdateAttrAt("soapenv:Body|urn:emitirDocumento|documento|detalles|detalle|exento_afecto",1,"xsi:type","xsd:boolean")
loo_Xml.UpdateChildContent("soapenv:Body|urn:emitirDocumento|documento|detalles|detalle|exento_afecto","1")
loo_Xml.UpdateAttrAt("soapenv:Body|urn:emitirDocumento|documento|totales",1,"xsi:type","urn:totales")
loo_Xml.UpdateAttrAt("soapenv:Body|urn:emitirDocumento|documento|totales|total_exento",1,"xsi:type","xsd:int")
loo_Xml.UpdateChildContent("soapenv:Body|urn:emitirDocumento|documento|totales|total_exento","0")
loo_Xml.UpdateAttrAt("soapenv:Body|urn:emitirDocumento|documento|totales|total_afecto",1,"xsi:type","xsd:int")
loo_Xml.UpdateChildContent("soapenv:Body|urn:emitirDocumento|documento|totales|total_afecto","5798")
loo_Xml.UpdateAttrAt("soapenv:Body|urn:emitirDocumento|documento|totales|total_iva",1,"xsi:type","xsd:int")
loo_Xml.UpdateChildContent("soapenv:Body|urn:emitirDocumento|documento|totales|total_iva","1102")
loo_Xml.UpdateAttrAt("soapenv:Body|urn:emitirDocumento|documento|totales|total_final",1,"xsi:type","xsd:Int")
loo_Xml.UpdateChildContent("soapenv:Body|urn:emitirDocumento|documento|totales|total_final","6900")
loo_Http = create oleobject
li_rc = loo_Http.ConnectToNewObject("Chilkat.Http")
loo_Http.BasicAuth = 1
loo_Http.Login = "9.999.999-9/mylogin"
loo_Http.Password = "mypassword"
loo_Http.SetRequestHeader("SoapAction","https://conexion.facto.cl/documento.php/emitirDocumento")
loo_Resp = create oleobject
li_rc = loo_Resp.ConnectToNewObject("Chilkat.HttpResponse")
li_Success = loo_Http.HttpStr("POST","https://conexion.facto.cl/documento.php",loo_Xml.GetXml(),"utf-8","text/xml",loo_Resp)
if li_Success = 0 then
Write-Debug loo_Http.LastErrorText
destroy loo_Xml
destroy loo_Http
destroy loo_Resp
return
end if
// A status code = 200 indicates success.
Write-Debug "Response status code = " + string(loo_Resp.StatusCode)
loo_XmlResp = create oleobject
li_rc = loo_XmlResp.ConnectToNewObject("Chilkat.Xml")
loo_XmlResp.LoadXml(loo_Resp.BodyStr)
Write-Debug "Response body text:"
Write-Debug loo_XmlResp.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>
destroy loo_Xml
destroy loo_Http
destroy loo_Resp
destroy loo_XmlResp