Lua Requires Chilkat v11.0.0+

Peoplevox GetReportData

See more Peoplevox Examples

Demonstrates how to export data from a Peoplevox Warehouse Management System (WMS) using a system report template. 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/GetReportData
--     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:GetReportData>
--              <peop:getReportRequest>
--                 <peop:TemplateName>Item movement history</peop:TemplateName>
--                 <peop:PageNo>1</peop:PageNo>
--                 <peop:ItemsPerPage>20</peop:ItemsPerPage>
--                 <peop:OrderBy>[Date timestamp]</peop:OrderBy>
--                 <peop:Columns>[Item code],[Date timestamp],[From],[To],[Quantity],[Comments]</peop:Columns>
--                 <peop:SearchClause>([Date timestamp] > DateTime(2016,01,01,09,00,00))</peop:SearchClause>
--              </peop:getReportRequest>
--           </peop:GetReportData>
--        </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:GetReportData>\r\n")
sbSoapXml:append("         <peop:getReportRequest>\r\n")
sbSoapXml:append("            <peop:TemplateName>Item movement history</peop:TemplateName>\r\n")
sbSoapXml:append("            <peop:PageNo>1</peop:PageNo>\r\n")
sbSoapXml:append("            <peop:ItemsPerPage>20</peop:ItemsPerPage>\r\n")
sbSoapXml:append("            <peop:OrderBy>[Date timestamp]</peop:OrderBy>\r\n")
sbSoapXml:append("            <peop:Columns>[Item code],[Date timestamp],[From],[To],[Quantity],[Comments]</peop:Columns>\r\n")
sbSoapXml:append("            <peop:SearchClause>([Date timestamp] > DateTime(2016,01,01,09,00,00))</peop:SearchClause>\r\n")
sbSoapXml:append("         </peop:getReportRequest>\r\n")
sbSoapXml:append("      </peop:GetReportData>\r\n")
sbSoapXml:append("   </soap:Body>\r\n")
sbSoapXml:append("</soap:Envelope>")

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/GetReportData")
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())

local detail = xmlResponse:chilkat_path("soap:Body|GetReportDataResponse|GetReportDataResult|Detail|*")

local csv = chilkat.Csv.new()
csv.has_column_names = true
csv:load_from_string(detail)

print("NumRows = " .. csv.num_rows)
print("NumColumns = " .. csv.num_columns)

-- Iterate over the rows, getting the ItemCode, Name, and Barcode
local i = 0
local numRows = csv.num_rows
while i < numRows do
    print("Item code: " .. csv:get_cell_by_name(i, "Item code"))
    print("Date timestamp: " .. csv:get_cell_by_name(i, "Date timestamp"))
    print("From: " .. csv:get_cell_by_name(i, "From"))
    print("To: " .. csv:get_cell_by_name(i, "To"))
    print("Quantity: " .. csv:get_cell_by_name(i, "Quantity"))
    print("Comments: " .. csv:get_cell_by_name(i, "Comments"))
    print("-")
    i = i + 1
end