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) Royal Mail OBA Web Service -- Get ContractsSee more Royal Mail OBA ExamplesRoyal Mail OBA Web Service -- Get the contracts for an account. For more information, see https://parcel.royalmail.com/eproimport.wsdl
#include <C_CkXmlW.h> #include <C_CkHttpW.h> #include <C_CkHttpResponseW.h> void ChilkatSample(void) { HCkXmlW xml; HCkHttpW http; const wchar_t *endpointUrl; HCkHttpResponseW resp; const wchar_t *serviceName; const wchar_t *serviceReg; const wchar_t *serviceLevel; const wchar_t *contract; int i; int numContracts; // This example requires the Chilkat API to have been previously unlocked. // See Global Unlock Sample for sample code. // Create the following XML: // <soapenv:Envelope xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:epro="urn:schemas-royalmail-com/webservice/epro"> // <soapenv:Header> // <epro:Authentication> // <epro:Username>my_username</epro:Username> // <epro:Password>my_password</epro:Password> // <epro:AccessCode>my_accessCode</epro:AccessCode> // <epro:Version>1.0</epro:Version> // <epro:SecurityToken>mysecuritytoken</epro:SecurityToken> // </epro:Authentication> // </soapenv:Header> // <soapenv:Body> // <epro:GetContracts> // <epro:Account>account_number</epro:Account> // </epro:GetContracts> // </soapenv:Body> // </soapenv:Envelope> xml = CkXmlW_Create(); CkXmlW_putEmitXmlDecl(xml,FALSE); CkXmlW_putTag(xml,L"soapenv:Envelope"); CkXmlW_AddAttribute(xml,L"xmlns:soapenv",L"http://schemas.xmlsoap.org/soap/envelope/"); CkXmlW_AddAttribute(xml,L"xmlns:epro",L"urn:schemas-royalmail-com/webservice/epro"); // Replace my_username, my_password, and my_accessCode with your actual values. Do not replace "mysecuritytoken". CkXmlW_UpdateChildContent(xml,L"soapenv:Header|epro:Authentication|epro:Username",L"my_username"); CkXmlW_UpdateChildContent(xml,L"soapenv:Header|epro:Authentication|epro:Password",L"my_password"); CkXmlW_UpdateChildContent(xml,L"soapenv:Header|epro:Authentication|epro:AccessCode",L"my_accessCode"); CkXmlW_UpdateChildContent(xml,L"soapenv:Header|epro:Authentication|epro:Version",L"1.0"); // Literally use the string "mysecuritytoken" here. CkXmlW_UpdateChildContent(xml,L"soapenv:Header|epro:Authentication|epro:SecurityToken",L"mysecuritytoken"); CkXmlW_UpdateChildContent(xml,L"soapenv:Body|epro:GetContracts|epro:Account",L"account_number"); http = CkHttpW_Create(); CkHttpW_SetRequestHeader(http,L"SOAPAction",L"urn:schemas-royalmail-com/webservice/epro/GetContracts"); CkHttpW_SetRequestHeader(http,L"Content-Type",L"text/xml; charset=utf-8"); // Use the sandbox endpoint: http://interfaces.oba-v.royalmail.com/legacyws/EProImport.asmx // The live endpoint would be: http://www.epro.royalmail.com/WebServices/import/eproimport.asmx endpointUrl = L"http://interfaces.oba-v.royalmail.com/legacyws/EProImport.asmx"; resp = CkHttpW_PostXml(http,endpointUrl,CkXmlW_getXml(xml),L"utf-8"); if (CkHttpW_getLastMethodSuccess(http) == FALSE) { wprintf(L"%s\n",CkHttpW_lastErrorText(http)); CkXmlW_Dispose(xml); CkHttpW_Dispose(http); return; } wprintf(L"response status code = %d\n",CkHttpResponseW_getStatusCode(resp)); wprintf(L"%s\n",CkHttpResponseW_bodyStr(resp)); // The response looks like this: // <?xml version="1.0" encoding="utf-8"?> // <SOAP-ENV:Envelope xmlns:SOAP-ENV="http://schemas.xmlsoap.org/soap/envelope/" xmlns:SOAP-ENC="http://schemas.xmlsoap.org/soap/encoding/" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"> // <SOAP-ENV:Header/> // <SOAP-ENV:Body> // <ns1:GetContractsResponse xmlns:ns1="urn:schemas-royalmail-com/webservice/epro"> // <ns1:GetContractsResult Version="1"> // <ns1:Contracts> // <ns1:ContractDetails ServiceName="ADV MAIL + RESPONSE UNSORTED 2C" ServiceReg="AC2" ServiceLevel="01" Contract="DEMOTEST1"/> // <ns1:ContractDetails ServiceName="PLANNED ENVELOPE POLL CARD MMK-2C " ServiceReg="AG0" ServiceLevel="01" Contract=""/> // ... // </ns1:Contracts> // </ns1:GetContractsResult> // </ns1:GetContractsResponse> // </SOAP-ENV:Body> // </SOAP-ENV:Envelope> // CkXmlW_LoadXml(xml,CkHttpResponseW_bodyStr(resp)); i = 0; numContracts = CkXmlW_NumChildrenHavingTag(xml,L"SOAP-ENV:Body|ns1:GetContractsResponse|ns1:GetContractsResult|ns1:Contracts|ns1:ContractDetails"); while (i < numContracts) { CkXmlW_putI(xml,i); serviceName = CkXmlW_chilkatPath(xml,L"SOAP-ENV:Body|ns1:GetContractsResponse|ns1:GetContractsResult|ns1:Contracts|ns1:ContractDetails[i]|(ServiceName)"); serviceReg = CkXmlW_chilkatPath(xml,L"SOAP-ENV:Body|ns1:GetContractsResponse|ns1:GetContractsResult|ns1:Contracts|ns1:ContractDetails[i]|(ServiceReg)"); serviceLevel = CkXmlW_chilkatPath(xml,L"SOAP-ENV:Body|ns1:GetContractsResponse|ns1:GetContractsResult|ns1:Contracts|ns1:ContractDetails[i]|(ServiceLevel)"); contract = CkXmlW_chilkatPath(xml,L"SOAP-ENV:Body|ns1:GetContractsResponse|ns1:GetContractsResult|ns1:Contracts|ns1:ContractDetails[i]|(Contract)"); wprintf(L"%s\n",serviceName); i = i + 1; } CkHttpResponseW_Dispose(resp); CkXmlW_Dispose(xml); CkHttpW_Dispose(http); } |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.