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
(Unicode C) SOAP e-factura.sunat.gob.pe getStatusCdrMake a SOAP call to https://e-factura.sunat.gob.pe/ol-it-wsconscpegem/billConsultService
#include <C_CkHttpW.h> #include <C_CkXmlW.h> #include <C_CkHttpResponseW.h> void ChilkatSample(void) { HCkHttpW http; BOOL success; HCkXmlW xml; const wchar_t *strXml; const wchar_t *endPoint; HCkHttpResponseW resp; int statusCode; HCkXmlW xmlResp; const wchar_t *S_Envelope_xmlns_S; const wchar_t *ns0_getStatusResponse_xmlns_ns0; const wchar_t *statusMessage; // 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. // -------------------------------------------------------------------------------- http = CkHttpW_Create(); // <soapenv:Envelope xmlns:ser="http://service.sunat.gob.pe" // xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" // xmlns:wsse="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-secext-1.0.xsd"> // <soapenv:Header> // <wsse:Security> // <wsse:UsernameToken> // <wsse:Username>MY_USERNAME</wsse:Username> // <wsse:Password>MY_PASSWORD</wsse:Password> // </wsse:UsernameToken> // </wsse:Security> // </soapenv:Header> // <soapenv:Body> // <ser:getStatus> // <rucComprobante>99999999999</rucComprobante> // <tipoComprobante>01</tipoComprobante> // <serieComprobante>F001</serieComprobante> // <numeroComprobante>55555</numeroComprobante> // </ser:getStatus> // </soapenv:Body> // </soapenv:Envelope> // xml = CkXmlW_Create(); CkXmlW_putTag(xml,L"soapenv:Envelope"); CkXmlW_AddAttribute(xml,L"xmlns:ser",L"http://service.sunat.gob.pe"); CkXmlW_AddAttribute(xml,L"xmlns:soapenv",L"http://schemas.xmlsoap.org/soap/envelope/"); CkXmlW_AddAttribute(xml,L"xmlns:wsse",L"http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-secext-1.0.xsd"); CkXmlW_UpdateChildContent(xml,L"soapenv:Header|wsse:Security|wsse:UsernameToken|wsse:Username",L"MY_USERNAME"); CkXmlW_UpdateChildContent(xml,L"soapenv:Header|wsse:Security|wsse:UsernameToken|wsse:Password",L"MY_PASSWORD"); CkXmlW_UpdateChildContent(xml,L"soapenv:Body|ser:getStatus|rucComprobante",L"99999999999"); CkXmlW_UpdateChildContent(xml,L"soapenv:Body|ser:getStatus|tipoComprobante",L"01"); CkXmlW_UpdateChildContent(xml,L"soapenv:Body|ser:getStatus|serieComprobante",L"F001"); CkXmlW_UpdateChildContent(xml,L"soapenv:Body|ser:getStatus|numeroComprobante",L"55555"); strXml = CkXmlW_getXml(xml); CkHttpW_SetRequestHeader(http,L"SOAPAction",L"urn:getStatusCdr"); CkHttpW_SetRequestHeader(http,L"Content-Type",L"text/xml; charset=utf-8"); endPoint = L"https://e-factura.sunat.gob.pe/ol-it-wsconscpegem/billConsultService"; resp = CkHttpW_PostXml(http,endPoint,strXml,L"utf-8"); if (CkHttpW_getLastMethodSuccess(http) != TRUE) { wprintf(L"%s\n",CkHttpW_lastErrorText(http)); CkHttpW_Dispose(http); CkXmlW_Dispose(xml); return; } statusCode = CkHttpResponseW_getStatusCode(resp); if (statusCode != 200) { wprintf(L"Non-success status code: %d\n",statusCode); wprintf(L"Response header: %s\n",CkHttpResponseW_header(resp)); wprintf(L"Response body: %s\n",CkHttpResponseW_bodyStr(resp)); wprintf(L"Unsuccessful.\n"); CkHttpResponseW_Dispose(resp); CkHttpW_Dispose(http); CkXmlW_Dispose(xml); return; } xmlResp = CkXmlW_Create(); CkXmlW_LoadXml(xmlResp,CkHttpResponseW_bodyStr(resp)); CkHttpResponseW_Dispose(resp); wprintf(L"%s\n",CkXmlW_getXml(xmlResp)); // A sample response: // <?xml version="1.0" encoding="UTF-8"?> // <S:Envelope xmlns:S="http://schemas.xmlsoap.org/soap/envelope/"> // <S:Body> // <ns0:getStatusResponse xmlns:ns0="http://service.sunat.gob.pe"> // <status> // <statusCode>0001</statusCode> // <statusMessage>El comprobante existe y est aceptado.</statusMessage> // </status> // </ns0:getStatusResponse> // </S:Body> // </S:Envelope> // // Parse the response... S_Envelope_xmlns_S = CkXmlW_getAttrValue(xml,L"xmlns:S"); ns0_getStatusResponse_xmlns_ns0 = CkXmlW_chilkatPath(xml,L"S:Body|ns0:getStatusResponse|(xmlns:ns0)"); statusCode = CkXmlW_GetChildIntValue(xml,L"S:Body|ns0:getStatusResponse|status|statusCode"); statusMessage = CkXmlW_getChildContent(xml,L"S:Body|ns0:getStatusResponse|status|statusMessage"); CkHttpW_Dispose(http); CkXmlW_Dispose(xml); CkXmlW_Dispose(xmlResp); } |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.