Lua
Lua
Panama Electronic Invoice Send (SOAP Request)
See more HTTP Misc Examples
Demonstrate sending an electronic invoice (XML) to http://demoemision.thefactoryhka.com.pa/ws/obj/v1.0/Service.svcChilkat Lua Downloads
local chilkat = require("chilkat")
local http = chilkat.Http.new()
-- 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.
-- --------------------------------------------------------------------------------
-- The SOAP XML will look like this:
-- <soapenv:Envelope xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:tem="http://tempuri.org/" xmlns:ser="http://schemas.datacontract.org/2004/07/Services.ObjComprobante.v1_0">
-- <soapenv:Header/>
-- <soapenv:Body>
-- <tem:Enviar>
-- <tem:tokenEmpresa>SOLICITAR</tem:tokenEmpresa>
-- <tem:tokenPassword>SOLICITAR</tem:tokenPassword>
-- <tem:documento>
-- <ser:codigoSucursalEmisor>0000</ser:codigoSucursalEmisor>
-- <ser:tipoSucursal>1</ser:tipoSucursal>
-- <ser:datosTransaccion>
-- <ser:tipoEmision>01</ser:tipoEmision>
-- <ser:tipoDocumento>01</ser:tipoDocumento>
-- <ser:numeroDocumentoFiscal>176</ser:numeroDocumentoFiscal>
-- <ser:puntoFacturacionFiscal>505</ser:puntoFacturacionFiscal>
-- <ser:fechaEmision>2019-05-15T07:49:27-05:00</ser:fechaEmision>
-- <ser:fechaSalida>2019-05-15T07:49:27-05:00</ser:fechaSalida>
-- <ser:naturalezaOperacion>01</ser:naturalezaOperacion>
-- <ser:tipoOperacion>1</ser:tipoOperacion>
-- <ser:destinoOperacion>1</ser:destinoOperacion> <!--1: Panama 2: Extranjero-->
-- <ser:formatoCAFE>1</ser:formatoCAFE>
-- <ser:entregaCAFE>1</ser:entregaCAFE>
-- <ser:envioContenedor>1</ser:envioContenedor>
-- <ser:procesoGeneracion>1</ser:procesoGeneracion>
-- <ser:tipoVenta>1</ser:tipoVenta>
-- <ser:informacionInteres>Informacion Interes</ser:informacionInteres>
-- <ser:cliente>
-- <ser:tipoClienteFE>02</ser:tipoClienteFE> <!--iTipoREC-->
-- <ser:tipoContribuyente>2</ser:tipoContribuyente>
-- <ser:numeroRUC>155596713-2-2015</ser:numeroRUC>
-- <ser:digitoVerificadorRUC>59</ser:digitoVerificadorRUC>
-- <ser:razonSocial>Ambiente de pruebas</ser:razonSocial>
-- <ser:direccion>Ave. La Paz</ser:direccion>
-- <ser:codigoUbicacion>1-1-1</ser:codigoUbicacion>
-- <ser:provincia>Bocas del Toro</ser:provincia>
-- <ser:distrito>Bocas del Toro</ser:distrito>
-- <ser:corregimiento>Bocas del Toro</ser:corregimiento>
-- <ser:tipoIdentificacion></ser:tipoIdentificacion>
-- <ser:nroIdentificacionExtranjero></ser:nroIdentificacionExtranjero>
-- <ser:paisExtranjero></ser:paisExtranjero>
-- <ser:telefono1>9999-9999</ser:telefono1>
-- <ser:correoElectronico1>usuario@pruebas.com</ser:correoElectronico1>
-- <ser:pais>PA</ser:pais>
-- <ser:paisOtro/>
-- </ser:cliente>
-- </ser:datosTransaccion>
-- <ser:listaItems>
-- <ser:item>
-- <ser:descripcion>Lapiz</ser:descripcion>
-- <ser:codigo>CA-001</ser:codigo>
-- <ser:unidadMedida>m</ser:unidadMedida>
-- <ser:cantidad>1.00</ser:cantidad>
-- <ser:fechaFabricacion>1999-05-10</ser:fechaFabricacion>
-- <ser:fechaCaducidad>2019-05-10</ser:fechaCaducidad>
-- <ser:unidadMedidaCPBS></ser:unidadMedidaCPBS>
-- <ser:infoItem>Lapiz con Goma</ser:infoItem>
-- <ser:precioUnitario>1234.12</ser:precioUnitario>
-- <ser:precioUnitarioDescuento></ser:precioUnitarioDescuento>
-- <ser:precioItem>1234.12</ser:precioItem>
-- <ser:valorTotal>1335.3384</ser:valorTotal> <!--dvalTotItem-->
-- <ser:codigoGTIN>0</ser:codigoGTIN>
-- <ser:cantGTINCom>0.99</ser:cantGTINCom>
-- <ser:codigoGTINInv>0</ser:codigoGTINInv>
-- <ser:cantGTINComInv>1.00</ser:cantGTINComInv>
-- <ser:tasaITBMS>01</ser:tasaITBMS>
-- <ser:valorITBMS>86.3884</ser:valorITBMS>
-- <ser:listaItemOTI>
-- <ser:oti>
-- <ser:tasaOTI>01</ser:tasaOTI>
-- <ser:valorTasa>14.81</ser:valorTasa>
-- </ser:oti>
-- <ser:oti>
-- <ser:tasaOTI>02</ser:tasaOTI>
-- <ser:valorTasa>0.02</ser:valorTasa>
-- </ser:oti>
-- </ser:listaItemOTI>
-- </ser:item>
-- </ser:listaItems>
-- <ser:totalesSubTotales>
-- <ser:totalPrecioNeto>1234.12</ser:totalPrecioNeto>
-- <ser:totalITBMS>86.39</ser:totalITBMS>
-- <ser:totalISC>0.00</ser:totalISC>
-- <ser:totalMontoGravado>101.22</ser:totalMontoGravado>
-- <ser:totalDescuento>0.00</ser:totalDescuento>
-- <ser:totalAcarreoCobrado/>
-- <ser:valorSeguroCobrado/>
-- <ser:totalFactura>1335.34</ser:totalFactura>
-- <ser:totalValorRecibido>1335.34</ser:totalValorRecibido>
-- <ser:tiempoPago>1</ser:tiempoPago>
-- <ser:nroItems>1</ser:nroItems>
-- <ser:totalTodosItems>1335.34</ser:totalTodosItems>
-- <ser:listaFormaPago>
-- <ser:formaPago>
-- <ser:formaPagoFact>02</ser:formaPagoFact>
-- <ser:descFormaPago/>
-- <ser:valorCuotaPagada>1335.34</ser:valorCuotaPagada>
-- </ser:formaPago>
-- </ser:listaFormaPago>
-- <ser:listaTotalOTI>
-- <ser:totalOti>
-- <ser:codigoTotalOTI>01</ser:codigoTotalOTI>
-- <ser:valorTotalOTI>14.81</ser:valorTotalOTI>
-- </ser:totalOti>
-- <ser:totalOti>
-- <ser:codigoTotalOTI>02</ser:codigoTotalOTI>
-- <ser:valorTotalOTI>0.02</ser:valorTotalOTI>
-- </ser:totalOti>
-- </ser:listaTotalOTI>
-- </ser:totalesSubTotales>
-- <ser:usoPosterior>
-- <ser:cufe></ser:cufe>
-- </ser:usoPosterior>
-- </tem:documento>
-- </tem:Enviar>
-- </soapenv:Body>
-- </soapenv:Envelope>
-- Use this online tool to generate code from sample XML:
-- Generate Code to Create XML
local xml = chilkat.Xml.new()
xml.tag = "soapenv:Envelope"
xml:add_attribute("xmlns:soapenv", "http://schemas.xmlsoap.org/soap/envelope/")
xml:add_attribute("xmlns:tem", "http://tempuri.org/")
xml:add_attribute("xmlns:ser", "http://schemas.datacontract.org/2004/07/Services.ObjComprobante.v1_0")
xml:update_child_content("soapenv:Header", "")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:tokenEmpresa", "SOLICITAR")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:tokenPassword", "SOLICITAR")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:codigoSucursalEmisor", "0000")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:tipoSucursal", "1")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:tipoEmision", "01")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:tipoDocumento", "01")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:numeroDocumentoFiscal", "176")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:puntoFacturacionFiscal", "505")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:fechaEmision", "2019-05-15T07:49:27-05:00")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:fechaSalida", "2019-05-15T07:49:27-05:00")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:naturalezaOperacion", "01")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:tipoOperacion", "1")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:destinoOperacion", "1")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:formatoCAFE", "1")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:entregaCAFE", "1")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:envioContenedor", "1")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:procesoGeneracion", "1")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:tipoVenta", "1")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:informacionInteres", "Informacion Interes")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:cliente|ser:tipoClienteFE", "02")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:cliente|ser:tipoContribuyente", "2")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:cliente|ser:numeroRUC", "155596713-2-2015")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:cliente|ser:digitoVerificadorRUC", "59")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:cliente|ser:razonSocial", "Ambiente de pruebas")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:cliente|ser:direccion", "Ave. La Paz")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:cliente|ser:codigoUbicacion", "1-1-1")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:cliente|ser:provincia", "Bocas del Toro")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:cliente|ser:distrito", "Bocas del Toro")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:cliente|ser:corregimiento", "Bocas del Toro")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:cliente|ser:tipoIdentificacion", "")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:cliente|ser:nroIdentificacionExtranjero", "")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:cliente|ser:paisExtranjero", "")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:cliente|ser:telefono1", "9999-9999")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:cliente|ser:correoElectronico1", "usuario@pruebas.com")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:cliente|ser:pais", "PA")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:cliente|ser:paisOtro", "")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:listaItems|ser:item|ser:descripcion", "Lapiz")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:listaItems|ser:item|ser:codigo", "CA-001")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:listaItems|ser:item|ser:unidadMedida", "m")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:listaItems|ser:item|ser:cantidad", "1.00")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:listaItems|ser:item|ser:fechaFabricacion", "1999-05-10")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:listaItems|ser:item|ser:fechaCaducidad", "2019-05-10")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:listaItems|ser:item|ser:unidadMedidaCPBS", "")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:listaItems|ser:item|ser:infoItem", "Lapiz con Goma")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:listaItems|ser:item|ser:precioUnitario", "1234.12")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:listaItems|ser:item|ser:precioUnitarioDescuento", "")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:listaItems|ser:item|ser:precioItem", "1234.12")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:listaItems|ser:item|ser:valorTotal", "1335.3384")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:listaItems|ser:item|ser:codigoGTIN", "0")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:listaItems|ser:item|ser:cantGTINCom", "0.99")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:listaItems|ser:item|ser:codigoGTINInv", "0")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:listaItems|ser:item|ser:cantGTINComInv", "1.00")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:listaItems|ser:item|ser:tasaITBMS", "01")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:listaItems|ser:item|ser:valorITBMS", "86.3884")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:listaItems|ser:item|ser:listaItemOTI|ser:oti|ser:tasaOTI", "01")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:listaItems|ser:item|ser:listaItemOTI|ser:oti|ser:valorTasa", "14.81")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:listaItems|ser:item|ser:listaItemOTI|ser:oti[1]|ser:tasaOTI", "02")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:listaItems|ser:item|ser:listaItemOTI|ser:oti[1]|ser:valorTasa", "0.02")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:totalesSubTotales|ser:totalPrecioNeto", "1234.12")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:totalesSubTotales|ser:totalITBMS", "86.39")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:totalesSubTotales|ser:totalISC", "0.00")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:totalesSubTotales|ser:totalMontoGravado", "101.22")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:totalesSubTotales|ser:totalDescuento", "0.00")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:totalesSubTotales|ser:totalAcarreoCobrado", "")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:totalesSubTotales|ser:valorSeguroCobrado", "")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:totalesSubTotales|ser:totalFactura", "1335.34")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:totalesSubTotales|ser:totalValorRecibido", "1335.34")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:totalesSubTotales|ser:tiempoPago", "1")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:totalesSubTotales|ser:nroItems", "1")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:totalesSubTotales|ser:totalTodosItems", "1335.34")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:totalesSubTotales|ser:listaFormaPago|ser:formaPago|ser:formaPagoFact", "02")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:totalesSubTotales|ser:listaFormaPago|ser:formaPago|ser:descFormaPago", "")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:totalesSubTotales|ser:listaFormaPago|ser:formaPago|ser:valorCuotaPagada", "1335.34")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:totalesSubTotales|ser:listaTotalOTI|ser:totalOti|ser:codigoTotalOTI", "01")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:totalesSubTotales|ser:listaTotalOTI|ser:totalOti|ser:valorTotalOTI", "14.81")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:totalesSubTotales|ser:listaTotalOTI|ser:totalOti[1]|ser:codigoTotalOTI", "02")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:totalesSubTotales|ser:listaTotalOTI|ser:totalOti[1]|ser:valorTotalOTI", "0.02")
xml:update_child_content("soapenv:Body|tem:Enviar|tem:documento|ser:usoPosterior|ser:cufe", "")
local strXml = xml:get_xml()
-- We'll need to add this in the HTTP header:
-- SOAPAction: http://tempuri.org/IService/Enviar
http:set_request_header("SOAPAction", "http://tempuri.org/IService/Enviar")
-- The endpoint for this soap service is:
local endPoint = "http://demoemision.thefactoryhka.com.pa/ws/obj/v1.0/Service.svc"
local resp = chilkat.HttpResponse.new()
local success = http:http_str("POST", endPoint, strXml, "utf-8", "text/xml", resp)
if not success then
print(http.last_error_text)
return
end
local responseStatusCode = resp.status_code
-- You may wish to verify that the responseStatusCode equals 200...
print("Response Status Code: " .. responseStatusCode)
-- You may examine the exact HTTP header sent with the POST like this:
print("LastHeader:")
print(http.last_header)
-- Examine the XML returned by the web service:
print("XML Response:")
local xmlResp = chilkat.Xml.new()
xmlResp:load_xml(resp.body_str)
print(xmlResp:get_xml())
-- Use this online tool to generate parsing code from response XML:
-- Generate Parsing Code from XML