Chilkat HOME .NET Core C# Android™ AutoIt C C# C++ Chilkat2-Python CkPython Classic ASP DataFlex Delphi ActiveX Delphi DLL Go Java Lianja Mono C# Node.js Objective-C PHP ActiveX PHP Extension Perl PowerBuilder PowerShell PureBasic Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ VB.NET VBScript Visual Basic 6.0 Visual FoxPro Xojo Plugin
(C) Panama Electronic Invoice Send (SOAP Request)Demonstrate sending an electronic invoice (XML) to http://demoemision.thefactoryhka.com.pa/ws/obj/v1.0/Service.svc
#include <C_CkHttp.h> #include <C_CkXml.h> #include <C_CkHttpResponse.h> void ChilkatSample(void) { HCkHttp http; BOOL success; HCkXml xml; const char *strXml; int responseStatusCode; const char *endPoint; HCkHttpResponse resp; HCkXml xmlResp; http = CkHttp_Create(); // 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 xml = CkXml_Create(); CkXml_putTag(xml,"soapenv:Envelope"); CkXml_AddAttribute(xml,"xmlns:soapenv","http://schemas.xmlsoap.org/soap/envelope/"); CkXml_AddAttribute(xml,"xmlns:tem","http://tempuri.org/"); CkXml_AddAttribute(xml,"xmlns:ser","http://schemas.datacontract.org/2004/07/Services.ObjComprobante.v1_0"); CkXml_UpdateChildContent(xml,"soapenv:Header",""); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:tokenEmpresa","SOLICITAR"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:tokenPassword","SOLICITAR"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:codigoSucursalEmisor","0000"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:tipoSucursal","1"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:tipoEmision","01"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:tipoDocumento","01"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:numeroDocumentoFiscal","176"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:puntoFacturacionFiscal","505"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:fechaEmision","2019-05-15T07:49:27-05:00"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:fechaSalida","2019-05-15T07:49:27-05:00"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:naturalezaOperacion","01"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:tipoOperacion","1"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:destinoOperacion","1"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:formatoCAFE","1"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:entregaCAFE","1"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:envioContenedor","1"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:procesoGeneracion","1"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:tipoVenta","1"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:informacionInteres","Informacion Interes"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:cliente|ser:tipoClienteFE","02"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:cliente|ser:tipoContribuyente","2"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:cliente|ser:numeroRUC","155596713-2-2015"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:cliente|ser:digitoVerificadorRUC","59"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:cliente|ser:razonSocial","Ambiente de pruebas"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:cliente|ser:direccion","Ave. La Paz"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:cliente|ser:codigoUbicacion","1-1-1"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:cliente|ser:provincia","Bocas del Toro"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:cliente|ser:distrito","Bocas del Toro"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:cliente|ser:corregimiento","Bocas del Toro"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:cliente|ser:tipoIdentificacion",""); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:cliente|ser:nroIdentificacionExtranjero",""); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:cliente|ser:paisExtranjero",""); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:cliente|ser:telefono1","9999-9999"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:cliente|ser:correoElectronico1","usuario@pruebas.com"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:cliente|ser:pais","PA"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:datosTransaccion|ser:cliente|ser:paisOtro",""); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:listaItems|ser:item|ser:descripcion","Lapiz"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:listaItems|ser:item|ser:codigo","CA-001"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:listaItems|ser:item|ser:unidadMedida","m"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:listaItems|ser:item|ser:cantidad","1.00"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:listaItems|ser:item|ser:fechaFabricacion","1999-05-10"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:listaItems|ser:item|ser:fechaCaducidad","2019-05-10"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:listaItems|ser:item|ser:unidadMedidaCPBS",""); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:listaItems|ser:item|ser:infoItem","Lapiz con Goma"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:listaItems|ser:item|ser:precioUnitario","1234.12"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:listaItems|ser:item|ser:precioUnitarioDescuento",""); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:listaItems|ser:item|ser:precioItem","1234.12"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:listaItems|ser:item|ser:valorTotal","1335.3384"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:listaItems|ser:item|ser:codigoGTIN","0"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:listaItems|ser:item|ser:cantGTINCom","0.99"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:listaItems|ser:item|ser:codigoGTINInv","0"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:listaItems|ser:item|ser:cantGTINComInv","1.00"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:listaItems|ser:item|ser:tasaITBMS","01"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:listaItems|ser:item|ser:valorITBMS","86.3884"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:listaItems|ser:item|ser:listaItemOTI|ser:oti|ser:tasaOTI","01"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:listaItems|ser:item|ser:listaItemOTI|ser:oti|ser:valorTasa","14.81"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:listaItems|ser:item|ser:listaItemOTI|ser:oti[1]|ser:tasaOTI","02"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:listaItems|ser:item|ser:listaItemOTI|ser:oti[1]|ser:valorTasa","0.02"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:totalesSubTotales|ser:totalPrecioNeto","1234.12"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:totalesSubTotales|ser:totalITBMS","86.39"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:totalesSubTotales|ser:totalISC","0.00"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:totalesSubTotales|ser:totalMontoGravado","101.22"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:totalesSubTotales|ser:totalDescuento","0.00"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:totalesSubTotales|ser:totalAcarreoCobrado",""); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:totalesSubTotales|ser:valorSeguroCobrado",""); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:totalesSubTotales|ser:totalFactura","1335.34"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:totalesSubTotales|ser:totalValorRecibido","1335.34"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:totalesSubTotales|ser:tiempoPago","1"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:totalesSubTotales|ser:nroItems","1"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:totalesSubTotales|ser:totalTodosItems","1335.34"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:totalesSubTotales|ser:listaFormaPago|ser:formaPago|ser:formaPagoFact","02"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:totalesSubTotales|ser:listaFormaPago|ser:formaPago|ser:descFormaPago",""); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:totalesSubTotales|ser:listaFormaPago|ser:formaPago|ser:valorCuotaPagada","1335.34"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:totalesSubTotales|ser:listaTotalOTI|ser:totalOti|ser:codigoTotalOTI","01"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:totalesSubTotales|ser:listaTotalOTI|ser:totalOti|ser:valorTotalOTI","14.81"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:totalesSubTotales|ser:listaTotalOTI|ser:totalOti[1]|ser:codigoTotalOTI","02"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:totalesSubTotales|ser:listaTotalOTI|ser:totalOti[1]|ser:valorTotalOTI","0.02"); CkXml_UpdateChildContent(xml,"soapenv:Body|tem:Enviar|tem:documento|ser:usoPosterior|ser:cufe",""); strXml = CkXml_getXml(xml); // We'll need to add this in the HTTP header: // SOAPAction: http://tempuri.org/IService/Enviar CkHttp_SetRequestHeader(http,"SOAPAction","http://tempuri.org/IService/Enviar"); CkHttp_SetRequestHeader(http,"Content-Type","text/xml; charset=utf-8"); // The endpoint for this soap service is: endPoint = "http://demoemision.thefactoryhka.com.pa/ws/obj/v1.0/Service.svc"; resp = CkHttp_PostXml(http,endPoint,strXml,"utf-8"); if (CkHttp_getLastMethodSuccess(http) != TRUE) { printf("%s\n",CkHttp_lastErrorText(http)); printf("LastHeader:\n"); printf("%s\n",CkHttp_lastHeader(http)); CkHttp_Dispose(http); CkXml_Dispose(xml); return; } responseStatusCode = CkHttpResponse_getStatusCode(resp); // You may wish to verify that the responseStatusCode equals 200... printf("Response Status Code: %d\n",responseStatusCode); // You may examine the exact HTTP header sent with the POST like this: printf("LastHeader:\n"); printf("%s\n",CkHttp_lastHeader(http)); // Examine the XML returned by the web service: printf("XML Response:\n"); xmlResp = CkXml_Create(); CkXml_LoadXml(xmlResp,CkHttpResponse_bodyStr(resp)); printf("%s\n",CkXml_getXml(xmlResp)); // Use this online tool to generate parsing code from response XML: // Generate Parsing Code from XML CkHttpResponse_Dispose(resp); CkHttp_Dispose(http); CkXml_Dispose(xml); CkXml_Dispose(xmlResp); } |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.