Unicode C

PEPPOL Document Validation

See more HTTP Misc Examples

Demonstrates how to call a Web service to validate your PEPPOL documents according to the latest PEPPOL rules. The validation service requires UBL files. Unicode C

#include <C_CkHttpW.h>
#include <C_CkStringBuilderW.h>
#include <C_CkXmlW.h>
#include <C_CkHttpResponseW.h>

void ChilkatSample(void)
    {
    BOOL success;
    HCkHttpW http;
    HCkStringBuilderW sbPeppolInvoiceXml;
    HCkXmlW xml;
    HCkHttpResponseW resp;
    HCkXmlW respXml;

    success = FALSE;

    //  This example assumes the Chilkat HTTP 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();

    //  We are sending the following POST:

    //  POST /wsdvs HTTP/1.1
    //  Host: peppol.helger.com
    //  Content-Type: application/soap+xml; charset=utf-8
    //  Content-Length: <length>
    //  
    //  <?xml version="1.0"?>
    //  <S:Envelope xmlns:S="http://schemas.xmlsoap.org/soap/envelope/">
    //  <S:Body>
    //  <validateRequestInput xmlns="http://peppol.helger.com/ws/documentvalidationservice/201701/" VESID="eu.peppol.bis2:t10:3.3.0" displayLocale="en">
    //  <XML>...ENTITY_ENCODED_INVOICE_XML_GOES_HERE...</XML>
    //  </validateRequestInput>
    //  </S:Body>
    //  </S:Envelope>

    //  Build the SOAP XML shown above.
    //  First load the PEPPOL invoice that will be the data contained in the <XML>...</XML> SOAP element.
    //  We are using the XML invoice obtained from https://github.com/austriapro/ebinterface-standards/blob/master/schemas/ebInterface5p0/samples/ebinterface_5p0_sample_ecosio.xml
    sbPeppolInvoiceXml = CkStringBuilderW_Create();
    success = CkStringBuilderW_LoadFile(sbPeppolInvoiceXml,L"qa_data/xml/peppol_invoice.xml",L"utf-8");

    xml = CkXmlW_Create();
    CkXmlW_putTag(xml,L"S:Envelope");
    CkXmlW_AddAttribute(xml,L"xmlns:S",L"http://schemas.xmlsoap.org/soap/envelope/");
    CkXmlW_UpdateAttrAt(xml,L"S:Body|validateRequestInput",TRUE,L"xmlns",L"http://peppol.helger.com/ws/documentvalidationservice/201701/");
    CkXmlW_UpdateAttrAt(xml,L"S:Body|validateRequestInput",TRUE,L"VESID",L"at.ebinterface:invoice:5.0");
    CkXmlW_UpdateAttrAt(xml,L"S:Body|validateRequestInput",TRUE,L"displayLocale",L"en");
    CkXmlW_UpdateChildContent(xml,L"S:Body|validateRequestInput|XML",CkStringBuilderW_getAsString(sbPeppolInvoiceXml));

    //  We don't need to specify the Content-Length or Host headers.  Chilkat automatically adds them.

    //  Send the request...
    resp = CkHttpResponseW_Create();
    success = CkHttpW_HttpStr(http,L"POST",L"https://peppol.helger.com/wsdvs",CkXmlW_getXml(xml),L"utf-8",L"text/xml",resp);
    if (success == FALSE) {
        wprintf(L"%s\n",CkHttpW_lastErrorText(http));
        CkHttpW_Dispose(http);
        CkStringBuilderW_Dispose(sbPeppolInvoiceXml);
        CkXmlW_Dispose(xml);
        CkHttpResponseW_Dispose(resp);
        return;
    }

    wprintf(L"Response Status Code = %d\n",CkHttpResponseW_getStatusCode(resp));

    respXml = CkXmlW_Create();
    CkXmlW_LoadXml(respXml,CkHttpResponseW_bodyStr(resp));

    wprintf(L"Response XML:\n");
    wprintf(L"%s\n",CkXmlW_getXml(respXml));

    //  A success repsonse looks like this:

    //  <?xml version="1.0" encoding="UTF-8"?>
    //  <S:Envelope xmlns:S="http://schemas.xmlsoap.org/soap/envelope/">
    //      <S:Body>
    //          <validateResponseOutput xmlns="http://peppol.helger.com/ws/documentvalidationservice/201701/" success="true" interrupted="false" mostSevereErrorLevel="SUCCESS">
    //              <Result success="true" artifactType="xsd" artifactPath="/schemas/ebinterface/ebinterface-5.0.xsd"/>
    //          </validateResponseOutput>
    //      </S:Body>
    //  </S:Envelope>


    CkHttpW_Dispose(http);
    CkStringBuilderW_Dispose(sbPeppolInvoiceXml);
    CkXmlW_Dispose(xml);
    CkHttpResponseW_Dispose(resp);
    CkXmlW_Dispose(respXml);

    }