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);

    }