Lua Requires Chilkat v11.0.0+
Lua
Hungary NAV Manage Invoice Request
See more Hungary NAV Invoicing Examples
Demonstrates the manageInvoice request for the Hungarian NAV Online Invoicing System REST API v2.0.Chilkat Lua Downloads
local chilkat = require("chilkat")
-- This example assumes the Chilkat API to have been previously unlocked.
-- See Global Unlock Sample for sample code.
-- Build the following XML:
-- Use this online tool to generate code from sample XML:
-- Generate Code to Create XML
-- <?xml version="1.0" encoding="UTF-8"?>
-- <ManageInvoiceRequest xmlns="http://schemas.nav.gov.hu/OSA/2.0/api">
-- <header>
-- <requestId>RID181837288942</requestId>
-- <timestamp>2019-09-11T12:44:55.442Z</timestamp>
-- <requestVersion>2.0</requestVersion>
-- <headerVersion>1.0</headerVersion>
-- </header>
-- <user>
-- <login>lwilsmn0uqdxe6u</login>
-- <passwordHash>2F43840A882CFDB7DB0FEC07D419D030D864B47B6B541DC280EF81B937B7A176E33C052B0D26638CC18A7A2C08D8D311733078A774BF43F6CA57FE8CD74DC28E</passwordHash>
-- <taxNumber>11111111</taxNumber>
-- <requestSignature>E4D191A48EE8828A1E84C1F841A2B4E1699ECB49C4CDA1DC7A057765FD935872219644CC2B5A93B8A344404E4FD8ECA4902B5DBCF993E768DC558B0F0281E775</requestSignature>
-- </user>
-- <software>
-- <softwareId>123456789123456789</softwareId>
-- <softwareName>string</softwareName>
-- <softwareOperation>LOCAL_SOFTWARE</softwareOperation>
-- <softwareMainVersion>string</softwareMainVersion>
-- <softwareDevName>string</softwareDevName>
-- <softwareDevContact>string</softwareDevContact>
-- <softwareDevCountryCode>HU</softwareDevCountryCode>
-- <softwareDevTaxNumber>string</softwareDevTaxNumber>
-- </software>
-- <exchangeToken>b1aca173-d9e8-4561-9237-0511eed99eaa2P0ZHLXBRI2U</exchangeToken>
-- <invoiceOperations>
-- <compressedContent>false</compressedContent>
-- <invoiceOperation>
-- <index>1</index>
-- <invoiceOperation>CREATE</invoiceOperation>
-- <invoiceData>base64 contents of invoiceData1 XML file</invoiceData>
-- </invoiceOperation>
-- <invoiceOperation>
-- <index>2</index>
-- <invoiceOperation>CREATE</invoiceOperation>
-- <invoiceData>base64 contents of invoiceData2 XML file</invoiceData>
-- </invoiceOperation>
-- <invoiceOperation>
-- <index>3</index>
-- <invoiceOperation>CREATE</invoiceOperation>
-- <invoiceData>base64 contents of invoiceData3 XML file</invoiceData>
-- </invoiceOperation>
-- </invoiceOperations>
-- </ManageInvoiceRequest>
--
-- First load the invoiceData for the 3 XML invoice files we'll be sending.
local bdInvoiceData1 = chilkat.BinData.new()
local bdInvoiceData2 = chilkat.BinData.new()
local bdInvoiceData3 = chilkat.BinData.new()
local success = bdInvoiceData1:load_file("qa_data/nav_invoicing/invoiceData1.xml")
success = bdInvoiceData2:load_file("qa_data/nav_invoicing/invoiceData2.xml")
success = bdInvoiceData3:load_file("qa_data/nav_invoicing/invoiceData3.xml")
if not success then
print("Failed to load invoice data.")
return
end
local crypt = chilkat.Crypt2.new()
local dtNow = chilkat.DateTime.new()
dtNow:set_from_current_system_time()
print(dtNow:get_as_timestamp(false))
-- The hash algorithm for the password is SHA512 (not SHA3-512).
crypt.hash_algorithm = "sha512"
crypt.encoding_mode = "hex"
local myPassword = "my-password"
local passwordHash = crypt:hash_string_enc(myPassword)
-- Generate a random request ID like "RID215118906689"
local prng = chilkat.Prng.new()
local sbRequestId = chilkat.StringBuilder.new()
sbRequestId:append("RID")
sbRequestId:append(prng:random_string(12, true, false, false))
print("generated requestId = " .. sbRequestId:get_as_string())
-- Calculate the requestSignature
crypt.hash_algorithm = "sha3-512"
local signatureKey = "ce-8f5e-215119fa7dd621DLMRHRLH2S"
local sbFinalHashBase = chilkat.StringBuilder.new()
-- First append the timestamp because we are going to remove certain chars/parts.
sbFinalHashBase:append(dtNow:get_as_timestamp(false))
local numReplaced = sbFinalHashBase:replace("Z", "")
numReplaced = sbFinalHashBase:replace("-", "")
numReplaced = sbFinalHashBase:replace(":", "")
numReplaced = sbFinalHashBase:replace("T", "")
-- Prepend the requestId and append the signatureKey
sbFinalHashBase:prepend(sbRequestId:get_as_string())
sbFinalHashBase:append(signatureKey)
-- Calculate each index hash and add it to the sbFinalHashBase
local sbHashBase = chilkat.StringBuilder.new()
sbHashBase:append("CREATE")
sbHashBase:append(bdInvoiceData1:get_encoded("base64"))
local indexHash = crypt:hash_string_enc(sbHashBase:get_as_string())
sbFinalHashBase:append(indexHash)
sbHashBase:clear()
sbHashBase:append("CREATE")
sbHashBase:append(bdInvoiceData2:get_encoded("base64"))
indexHash = crypt:hash_string_enc(sbHashBase:get_as_string())
sbFinalHashBase:append(indexHash)
sbHashBase:clear()
sbHashBase:append("CREATE")
sbHashBase:append(bdInvoiceData3:get_encoded("base64"))
indexHash = crypt:hash_string_enc(sbHashBase:get_as_string())
sbFinalHashBase:append(indexHash)
-- Get our request signature (using sha3-512 because our HashAlgorithm was set to "sha3-512" up above...)
local requestSignature = crypt:hash_string_enc(sbFinalHashBase:get_as_string())
-- Load our recently obtained exchange token.
-- See Hungary NAV Invoicing Token Exchange Sample Code
local xmlExchangeToken = chilkat.Xml.new()
success = xmlExchangeToken:load_xml_file("qa_data/tokens/nav_exchange_token.xml")
if not success then
print(xmlExchangeToken.last_error_text)
return
end
-- Get the base64 encoded/encrypted exchange token.
-- IMPORTANT: Make sure to use the exchange token before it expires.
-- If it expired, then get a new one..
local encodedEncryptedExchangeToken = xmlExchangeToken:get_child_content("encodedExchangeToken")
-- Decode to binary.
local bdExchangeToken = chilkat.BinData.new()
bdExchangeToken:append_encoded(encodedEncryptedExchangeToken, "base64")
-- Decrypt using your 16-digit replacement key:
crypt.crypt_algorithm = "aes"
crypt.cipher_mode = "ecb"
crypt.key_length = 128
crypt.encoding_mode = "base64"
-- Pass your 16-digit replacement key here:
crypt:set_encoded_key("99952BBAAAAA8XYZ", "ascii")
crypt:decrypt_bd(bdExchangeToken)
local exchangeToken = bdExchangeToken:get_string("utf-8")
print("exchange token = " .. exchangeToken)
-- Now build the XML..
local xml = chilkat.Xml.new()
xml.tag = "ManageInvoiceRequest"
xml:add_attribute("xmlns", "http://schemas.nav.gov.hu/OSA/2.0/api")
xml:update_child_content("header|requestId", sbRequestId:get_as_string())
xml:update_child_content("header|timestamp", dtNow:get_as_timestamp(false))
xml:update_child_content("header|requestVersion", "2.0")
xml:update_child_content("header|headerVersion", "1.0")
xml:update_child_content("user|login", "lwilsmn0uqdxe6u")
xml:update_child_content("user|passwordHash", passwordHash)
xml:update_child_content("user|taxNumber", "11111111")
xml:update_child_content("user|requestSignature", requestSignature)
xml:update_child_content("software|softwareId", "123456789123456789")
xml:update_child_content("software|softwareName", "string")
xml:update_child_content("software|softwareOperation", "LOCAL_SOFTWARE")
xml:update_child_content("software|softwareMainVersion", "string")
xml:update_child_content("software|softwareDevName", "string")
xml:update_child_content("software|softwareDevContact", "string")
xml:update_child_content("software|softwareDevCountryCode", "HU")
xml:update_child_content("software|softwareDevTaxNumber", "string")
xml:update_child_content("exchangeToken", exchangeToken)
xml:update_child_content("invoiceOperations|compressedContent", "false")
xml:update_child_content("invoiceOperations|invoiceOperation|index", "1")
xml:update_child_content("invoiceOperations|invoiceOperation|invoiceOperation", "CREATE")
xml:update_child_content("invoiceOperations|invoiceOperation|invoiceData", bdInvoiceData1:get_encoded("base64"))
xml:update_child_content("invoiceOperations|invoiceOperation[1]|index", "2")
xml:update_child_content("invoiceOperations|invoiceOperation[1]|invoiceOperation", "CREATE")
xml:update_child_content("invoiceOperations|invoiceOperation[1]|invoiceData", bdInvoiceData2:get_encoded("base64"))
xml:update_child_content("invoiceOperations|invoiceOperation[2]|index", "3")
xml:update_child_content("invoiceOperations|invoiceOperation[2]|invoiceOperation", "CREATE")
xml:update_child_content("invoiceOperations|invoiceOperation[2]|invoiceData", bdInvoiceData3:get_encoded("base64"))
-- POST the XML to https://api-test.onlineszamla.nav.gov.hu/invoiceService/v2/manageInvoice
local http = chilkat.Http.new()
http.accept = "application/xml"
local endpoint = "https://api-test.onlineszamla.nav.gov.hu/invoiceService/v2/manageInvoice"
local resp = chilkat.HttpResponse.new()
success = http:http_str("POST", endpoint, xml:get_xml(), "utf-8", "application/xml", resp)
if not success then
print(http.last_error_text)
return
end
print("Response status code = " .. resp.status_code)
local respXml = chilkat.Xml.new()
respXml:load_xml(resp.body_str)
print("Response body:")
print(respXml:get_xml())
-- The result looks like this:
-- <?xml version="1.0" encoding="UTF-8" standalone="yes"?>
-- <ManageInvoiceResponse xmlns="http://schemas.nav.gov.hu/OSA/2.0/api" xmlns:ns2="http://schemas.nav.gov.hu/OSA/2.0/data">
-- <header>
-- <requestId>RID871830318143</requestId>
-- <timestamp>2020-03-25T15:51:25Z</timestamp>
-- <requestVersion>2.0</requestVersion>
-- <headerVersion>1.0</headerVersion>
-- </header>
-- <result>
-- <funcCode>OK</funcCode>
-- </result>
-- <software>
-- <softwareId>123456789123456789</softwareId>
-- <softwareName>string</softwareName>
-- <softwareOperation>LOCAL_SOFTWARE</softwareOperation>
-- <softwareMainVersion>string</softwareMainVersion>
-- <softwareDevName>string</softwareDevName>
-- <softwareDevContact>string</softwareDevContact>
-- <softwareDevCountryCode>HU</softwareDevCountryCode>
-- <softwareDevTaxNumber>string</softwareDevTaxNumber>
-- </software>
-- <transactionId>2WT9GFSKFUU1V4XP</transactionId>
-- </ManageInvoiceResponse>
-- Use this online tool to generate parsing code from sample XML:
-- Generate Parsing Code from XML
local ManageInvoiceResponse_xmlns = respXml:get_attr_value("xmlns")
local ManageInvoiceResponse_xmlns_ns2 = respXml:get_attr_value("xmlns:ns2")
local requestId = respXml:get_child_content("header|requestId")
local timestamp = respXml:get_child_content("header|timestamp")
local requestVersion = respXml:get_child_content("header|requestVersion")
local headerVersion = respXml:get_child_content("header|headerVersion")
local funcCode = respXml:get_child_content("result|funcCode")
local softwareId = respXml:get_child_content("software|softwareId")
local softwareName = respXml:get_child_content("software|softwareName")
local softwareOperation = respXml:get_child_content("software|softwareOperation")
local softwareMainVersion = respXml:get_child_content("software|softwareMainVersion")
local softwareDevName = respXml:get_child_content("software|softwareDevName")
local softwareDevContact = respXml:get_child_content("software|softwareDevContact")
local softwareDevCountryCode = respXml:get_child_content("software|softwareDevCountryCode")
local softwareDevTaxNumber = respXml:get_child_content("software|softwareDevTaxNumber")
local transactionId = respXml:get_child_content("transactionId")