DataServiceEndpointSoapBinding / getNetworks

ASP AutoIt C C (Unicode) C++ C++ (Unicode) C# DataFlex Delphi Foxpro Go Java Node.js Objective-C Perl PHP Extension PowerBuilder Powershell PureBasic Python CkPython Ruby SQL Server Swift TCL VB.NET VB6 VBScript Xojo

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

void ChilkatSample(void)
    {
    HCkXmlW xml;
    const wchar_t *soapRequestBody;
    const wchar_t *endpoint;
    const wchar_t *soapAction;
    const wchar_t *contentType;
    HCkHttpW http;
    HCkHttpResponseW resp;
    HCkXmlW responseXml;
    int statusCode;
    const wchar_t *item;
    const wchar_t *sgNumber;
    const wchar_t *component_id;
    const wchar_t *instance_order;
    const wchar_t *text;
    const wchar_t *signal_id;
    const wchar_t *systemTypeId;
    const wchar_t *confirmationLink;
    const wchar_t *statusCode;

    xml = CkXmlW_Create();
    CkXmlW_putTag(xml,L"soapenv:Envelope");
    CkXmlW_AddAttribute(xml,L"xmlns:intf",L"http://data.webservice.workshop.vivid.nl");
    CkXmlW_AddAttribute(xml,L"xmlns:soapenv",L"http://schemas.xmlsoap.org/soap/envelope/");
    CkXmlW_UpdateChildContent(xml,L"soapenv:Header",L"");
    CkXmlW_UpdateChildContent(xml,L"soapenv:Body|intf:getNetworks|intf:vrid",L"xml");
    CkXmlW_UpdateChildContent(xml,L"soapenv:Body|intf:getNetworks|intf:system_types_ids",L"xml");
    CkXmlW_UpdateChildContent(xml,L"soapenv:Body|intf:getNetworks|intf:system_types_groups",L"xml");
    CkXmlW_UpdateChildContent(xml,L"soapenv:Body|intf:getNetworks|intf:car_type",L"xml");
    CkXmlW_UpdateChildContent(xml,L"soapenv:Body|intf:getNetworks|intf:language",L"xml");

    // In a SOAP HTTP request, including the XML declaration (<?xml version="1.0" encoding="UTF-8"?>) in the XML body is generally not required. 
    CkXmlW_putEmitXmlDecl(xml,FALSE);
    soapRequestBody = CkXmlW_getXml(xml);

    endpoint = L"http://www.haynespro-services.com/workshopServices3/services/DataServiceEndpoint";
    soapAction = L"";
    //  For SOAP requests, the standard Content-Type is usually set to "text/xml" or "application/soap+xml"
    contentType = L"text/xml";

    http = CkHttpW_Create();

    CkHttpW_ClearHeaders(http);
    CkHttpW_SetRequestHeader(http,L"Content-Type",contentType);
    CkHttpW_SetRequestHeader(http,L"SOAPAction",soapAction);

    resp = CkHttpW_PostXml(http,endpoint,soapRequestBody,L"utf-8");
    if (CkHttpW_getLastMethodSuccess(http) == FALSE) {
        wprintf(L"%s\n",CkHttpW_lastErrorText(http));
        wprintf(L"Failed to send SOAP request.\n");
        CkXmlW_Dispose(xml);
        CkHttpW_Dispose(http);
        return;
    }

    // Get the XML response body.
    responseXml = CkXmlW_Create();
    CkHttpResponseW_GetBodyXml(resp,responseXml);

    statusCode = CkHttpResponseW_getStatusCode(resp);
    wprintf(L"response status code: %d\n",statusCode);

    CkHttpResponseW_Dispose(resp);

    // If the status code does not indicate succcess, then show the response XML,
    // which probably contains error information.
    if (statusCode != 200) {
        wprintf(L"%s\n",CkXmlW_getXml(responseXml));
        CkXmlW_Dispose(xml);
        CkHttpW_Dispose(http);
        CkXmlW_Dispose(responseXml);
        return;
    }

    wprintf(L"%s\n",CkXmlW_getXml(responseXml));

    // Parse the successful SOAP response XML.

    // This is a sample of the response XML, but the namespace prefixes will be different.
    // We can parse the result using "*" for the namespace prefixes (see below).

    item = CkXmlW_getChildContent(responseXml,L"*:Body|*:getNetworksResponse|*:getNetworksReturn|*:networkArray|*:item|*:groupName|*:item");
    sgNumber = CkXmlW_getChildContent(responseXml,L"*:Body|*:getNetworksResponse|*:getNetworksReturn|*:networkArray|*:item|*:sgNumber");
    component_id = CkXmlW_getChildContent(responseXml,L"*:Body|*:getNetworksResponse|*:getNetworksReturn|*:networkArray|*:item|*:signals_in|*:item|*:instances|*:item|*:component_id");
    instance_order = CkXmlW_getChildContent(responseXml,L"*:Body|*:getNetworksResponse|*:getNetworksReturn|*:networkArray|*:item|*:signals_in|*:item|*:instances|*:item|*:instance_order");
    text = CkXmlW_getChildContent(responseXml,L"*:Body|*:getNetworksResponse|*:getNetworksReturn|*:networkArray|*:item|*:signals_in|*:item|*:instances|*:item|*:text");
    signal_id = CkXmlW_getChildContent(responseXml,L"*:Body|*:getNetworksResponse|*:getNetworksReturn|*:networkArray|*:item|*:signals_in|*:item|*:signal_id");
    item = CkXmlW_getChildContent(responseXml,L"*:Body|*:getNetworksResponse|*:getNetworksReturn|*:networkArray|*:item|*:signals_in|*:item|*:system_groups|*:item");
    text = CkXmlW_getChildContent(responseXml,L"*:Body|*:getNetworksResponse|*:getNetworksReturn|*:networkArray|*:item|*:signals_in|*:item|*:text");
    component_id = CkXmlW_getChildContent(responseXml,L"*:Body|*:getNetworksResponse|*:getNetworksReturn|*:networkArray|*:item|*:signals_out|*:item|*:instances|*:item|*:component_id");
    instance_order = CkXmlW_getChildContent(responseXml,L"*:Body|*:getNetworksResponse|*:getNetworksReturn|*:networkArray|*:item|*:signals_out|*:item|*:instances|*:item|*:instance_order");
    text = CkXmlW_getChildContent(responseXml,L"*:Body|*:getNetworksResponse|*:getNetworksReturn|*:networkArray|*:item|*:signals_out|*:item|*:instances|*:item|*:text");
    signal_id = CkXmlW_getChildContent(responseXml,L"*:Body|*:getNetworksResponse|*:getNetworksReturn|*:networkArray|*:item|*:signals_out|*:item|*:signal_id");
    item = CkXmlW_getChildContent(responseXml,L"*:Body|*:getNetworksResponse|*:getNetworksReturn|*:networkArray|*:item|*:signals_out|*:item|*:system_groups|*:item");
    text = CkXmlW_getChildContent(responseXml,L"*:Body|*:getNetworksResponse|*:getNetworksReturn|*:networkArray|*:item|*:signals_out|*:item|*:text");
    item = CkXmlW_getChildContent(responseXml,L"*:Body|*:getNetworksResponse|*:getNetworksReturn|*:networkArray|*:item|*:systemGroupId|*:item");
    systemTypeId = CkXmlW_getChildContent(responseXml,L"*:Body|*:getNetworksResponse|*:getNetworksReturn|*:networkArray|*:item|*:systemTypeId");
    text = CkXmlW_getChildContent(responseXml,L"*:Body|*:getNetworksResponse|*:getNetworksReturn|*:networkArray|*:item|*:text");
    confirmationLink = CkXmlW_getChildContent(responseXml,L"*:Body|*:getNetworksResponse|*:getNetworksReturn|*:status|*:confirmationLink");
    statusCode = CkXmlW_getChildContent(responseXml,L"*:Body|*:getNetworksResponse|*:getNetworksReturn|*:status|*:statusCode");


    CkXmlW_Dispose(xml);
    CkHttpW_Dispose(http);
    CkXmlW_Dispose(responseXml);

    }

Request XML

<soapenv:Envelope xmlns:intf="http://data.webservice.workshop.vivid.nl" xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/">
    <soapenv:Header/>
    <soapenv:Body>
        <intf:getNetworks>
            <intf:vrid>xml</intf:vrid>
            <intf:system_types_ids>xml</intf:system_types_ids>
            <intf:system_types_groups>xml</intf:system_types_groups>
            <intf:car_type>xml</intf:car_type>
            <intf:language>xml</intf:language>
        </intf:getNetworks>
    </soapenv:Body>
</soapenv:Envelope>

Response XML

<soapenv:Envelope xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:tns2="http://datatypes.webservice.elecdata.vivid.nl" xmlns:tns1="http://datamodel.webservice.elecdata.vivid.nl" xmlns:intf="http://data.webservice.workshop.vivid.nl">
    <soapenv:Header/>
    <soapenv:Body>
        <intf:getNetworksResponse>
            <intf:getNetworksReturn>
                <tns1:networkArray>
                    <intf:item>
                        <tns2:groupName>
                            <intf:item>xml</intf:item>
                        </tns2:groupName>
                        <tns2:sgNumber>xml</tns2:sgNumber>
                        <tns2:signals_in>
                            <intf:item>
                                <tns2:instances>
                                    <intf:item>
                                        <tns2:component_id>xml</tns2:component_id>
                                        <tns2:instance_order>xml</tns2:instance_order>
                                        <tns2:text>xml</tns2:text>
                                    </intf:item>
                                </tns2:instances>
                                <tns2:signal_id>xml</tns2:signal_id>
                                <tns2:system_groups>
                                    <intf:item>xml</intf:item>
                                </tns2:system_groups>
                                <tns2:text>xml</tns2:text>
                            </intf:item>
                        </tns2:signals_in>
                        <tns2:signals_out>
                            <intf:item>
                                <tns2:instances>
                                    <intf:item>
                                        <tns2:component_id>xml</tns2:component_id>
                                        <tns2:instance_order>xml</tns2:instance_order>
                                        <tns2:text>xml</tns2:text>
                                    </intf:item>
                                </tns2:instances>
                                <tns2:signal_id>xml</tns2:signal_id>
                                <tns2:system_groups>
                                    <intf:item>xml</intf:item>
                                </tns2:system_groups>
                                <tns2:text>xml</tns2:text>
                            </intf:item>
                        </tns2:signals_out>
                        <tns2:systemGroupId>
                            <intf:item>xml</intf:item>
                        </tns2:systemGroupId>
                        <tns2:systemTypeId>xml</tns2:systemTypeId>
                        <tns2:text>xml</tns2:text>
                    </intf:item>
                </tns1:networkArray>
                <tns1:status>
                    <intf:confirmationLink>xml</intf:confirmationLink>
                    <intf:statusCode>xml</intf:statusCode>
                </tns1:status>
            </intf:getNetworksReturn>
        </intf:getNetworksResponse>
    </soapenv:Body>
</soapenv:Envelope>