Sample code for 30+ languages & platforms
Lua Requires Chilkat v11.0.0+

Peoplevox SaveData

See more Peoplevox Examples

Demonstrates how to call the Peoplevox SaveData SOAP method. This example adds a new carrier (DHL) to the system.

Chilkat Lua Downloads

Lua
local chilkat = require("chilkat")

-- This example requires the Chilkat API to have been previously unlocked.
-- See Global Unlock Sample for sample code.

-- Sends a POST that looks like this:

--     POST /PEOPLEVOX_CLIENT_ID/resources/integrationservicev4.asmx HTTP/1.1
--     Content-Type: text/xml;charset=UTF-8
--     SOAPAction: http://www.peoplevox.net/SaveData
--     Content-Length: (automatically computed and added by Chilkat)
--     Host: qac.peoplevox.net
--
--     <soap:Envelope xmlns:soap="http://www.w3.org/2003/05/soap-envelope" xmlns:peop="http://www.peoplevox.net/">
--        <soap:Header>
--           <peop:UserSessionCredentials>
--              <peop:UserId>PEOPLEVOX_USER_ID</peop:UserId>
--              <peop:ClientId>PEOPLEVOX_CLIENT_ID</peop:ClientId>
--              <peop:SessionId>PEOPLEVOX_SESSION_ID</peop:SessionId>
--           </peop:UserSessionCredentials>
--        </soap:Header>
--         <soap:Body>
--           <peop:SaveData>
--              <peop:saveRequest>
--                 <peop:TemplateName>Carriers</peop:TemplateName>
--                 <peop:CsvData>CSV_DATA</peop:CsvData>
--                 <peop:Action>0</peop:Action>
--              </peop:saveRequest>
--           </peop:SaveData>
--        </soap:Body>
--     </soap:Envelope>
--

-- Notice that a UserId is needed here.  This is different than the username required for Peoplevox authentication.
--    The UserId for the admin account is 1.
--
local sbSoapXml = chilkat.StringBuilder.new()
sbSoapXml:append("<?xml version=\"1.0\" encoding=\"utf-8\"?>\r\n")
sbSoapXml:append("<soap:Envelope xmlns:soap=\"http://www.w3.org/2003/05/soap-envelope\" xmlns:peop=\"http://www.peoplevox.net/\">\r\n")
sbSoapXml:append("   <soap:Header>\r\n")
sbSoapXml:append("      <peop:UserSessionCredentials>\r\n")
sbSoapXml:append("         <peop:UserId>PEOPLEVOX_USER_ID</peop:UserId>\r\n")
sbSoapXml:append("         <peop:ClientId>PEOPLEVOX_CLIENT_ID</peop:ClientId>\r\n")
sbSoapXml:append("         <peop:SessionId>PEOPLEVOX_SESSION_ID</peop:SessionId>\r\n")
sbSoapXml:append("      </peop:UserSessionCredentials>\r\n")
sbSoapXml:append("   </soap:Header>\r\n")
sbSoapXml:append("   <soap:Body>\r\n")
sbSoapXml:append("      <peop:SaveData>\r\n")
sbSoapXml:append("         <peop:saveRequest>\r\n")
sbSoapXml:append("            <peop:TemplateName>Carriers</peop:TemplateName>\r\n")
sbSoapXml:append("            <peop:CsvData>CSV_DATA</peop:CsvData>\r\n")
sbSoapXml:append("            <peop:Action>0</peop:Action>\r\n")
sbSoapXml:append("         </peop:saveRequest>\r\n")
sbSoapXml:append("      </peop:SaveData>\r\n")
sbSoapXml:append("   </soap:Body>\r\n")
sbSoapXml:append("</soap:Envelope>")

local sbCsvData = chilkat.StringBuilder.new()
sbCsvData:append("Name,Reference\r\n")
sbCsvData:append("DHL,D0001")
local numReplacements = sbSoapXml:replace("CSV_DATA", sbCsvData:get_as_string())

local req = chilkat.HttpRequest.new()
req.http_verb = "POST"
req.send_charset = true
req.charset = "utf-8"
req:add_header("Content-Type", "text/xml")
req:add_header("SOAPAction", "http://www.peoplevox.net/SaveData")
req.path = "/PEOPLEVOX_CLIENT_ID/resources/integrationservicev4.asmx"
local success = req:load_body_from_string(sbSoapXml:get_as_string(), "utf-8")

local http = chilkat.Http.new()
http.follow_redirects = true

local resp = chilkat.HttpResponse.new()
success = http:http_sreq("qac.peoplevox.net", 443, true, req, resp)
if not success then
    print(http.last_error_text)
    return
end

-- We should expect a 200 response if successful.
if resp.status_code ~= 200 then
    print("Response StatusCode = " .. resp.status_code)
    print("Response StatusLine: " .. resp.status_line)
    print("Response Header:")
    print(resp.header)
    print(resp.body_str)
    return
end

local xmlResponse = chilkat.Xml.new()
success = xmlResponse:load_xml(resp.body_str)
print(xmlResponse:get_xml())

-- A successful response is shown below.
-- To parse a successful response:
local reference = xmlResponse:chilkat_path("soap:Body|SaveDataResponse|SaveDataResult|Statuses|IntegrationStatusResponse|Reference|*")
print("Reference = " .. reference)
local status = xmlResponse:chilkat_path("soap:Body|SaveDataResponse|SaveDataResult|Statuses|IntegrationStatusResponse|Status|*")
print("Status = " .. status)

-- <?xml version="1.0" encoding="utf-8" ?>
-- <soap:Envelope xmlns:soap="http://www.w3.org/2003/05/soap-envelope" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema">
--     <soap:Body>
--         <SaveDataResponse xmlns="http://www.peoplevox.net/">
--             <SaveDataResult>
--                 <ResponseId>0</ResponseId>
--                 <TotalCount>1</TotalCount>
--                 <Detail />
--                 <Statuses>
--                     <IntegrationStatusResponse>
--                         <Reference>D0001</Reference>
--                         <Status>Success</Status>
--                         <LineNo>0</LineNo>
--                     </IntegrationStatusResponse>
--                 </Statuses>
--                 <ImportingQueueId>0</ImportingQueueId>
--                 <SalesOrdersToDespatchIds />
--             </SaveDataResult>
--         </SaveDataResponse>
--     </soap:Body>
-- </soap:Envelope>