Lua Requires Chilkat v11.0.0+
Lua
Hungary NAV Manage Annulment Request
See more Hungary NAV Invoicing Examples
Demonstrates the manageAnnulment 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"?>
-- <ManageAnnulmentRequest xmlns="http://schemas.nav.gov.hu/OSA/2.0/api">
-- <header>
-- <requestId>RID338592103413</requestId>
-- <timestamp>2019-09-11T13:37:09.385Z</timestamp>
-- <requestVersion>2.0</requestVersion>
-- <headerVersion>1.0</headerVersion>
-- </header>
-- <user>
-- <login>lwilsmn0uqdxe6u</login>
-- <passwordHash>2F43840A882CFDB7DB0 ... F6CA57FE8CD74DC28E</passwordHash>
-- <taxNumber>11111111</taxNumber>
-- <requestSignature>A297E3BD9 ... 1959ADFAF5</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>dbd03076-3a9b-4312-bbbb-0cee3a6472572P11CS49ASIL</exchangeToken>
-- <annulmentOperations>
-- <annulmentOperation>
-- <index>1</index>
-- <annulmentOperation>ANNUL</annulmentOperation>
-- <invoiceAnnulment>PD94bWwgdm ... ubnVsbWVudD4=</invoiceAnnulment>
-- </annulmentOperation>
-- </annulmentOperations>
-- </ManageAnnulmentRequest>
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 first (and only) index hash.
local invoiceOperation = "ANNUL"
local invoiceData = "PD94bWwgdmVyc2lvbj0iMS4wIiBlbmNvZGluZz0iVVRGLTgiIHN0YW5kYWxvbmU9InllcyI/Pg0KPEludm9pY2VBbm51bG1lbnQgeG1sbnM9Imh0dHA6Ly9zY2hlbWFzLm5hdi5nb3YuaHUvT1NBLzIuMC9hbm51bCI+DQoJCTxhbm51bG1lbnRSZWZlcmVuY2U+MjIyMjIyMjI8L2FubnVsbWVudFJlZmVyZW5jZT4NCgkJPGFubnVsbWVudFRpbWVzdGFtcD4yMDE4LTA2LTE4VDA5OjEwOjQ1LjMwOVo8L2FubnVsbWVudFRpbWVzdGFtcD4NCgkJPGFubnVsbWVudENvZGU+RVJSQVRJQ19EQVRBPC9hbm51bG1lbnRDb2RlPg0KCQk8YW5udWxtZW50UmVhc29uPmNyZWF0ZSBzemFtbGEgYW5udWw8L2FubnVsbWVudFJlYXNvbj4NCjwvSW52b2ljZUFubnVsbWVudD4="
local sbHashBase = chilkat.StringBuilder.new()
sbHashBase:append(invoiceOperation)
sbHashBase:append(invoiceData)
local firstHash = crypt:hash_string_enc(sbHashBase:get_as_string())
-- Append the index hash to the final hash base.
sbFinalHashBase:append(firstHash)
-- 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()
local 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 = "ManageAnnulmentRequest"
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("annulmentOperations|annulmentOperation|index", "1")
xml:update_child_content("annulmentOperations|annulmentOperation|annulmentOperation", invoiceOperation)
xml:update_child_content("annulmentOperations|annulmentOperation|invoiceAnnulment", invoiceData)
-- POST the XML to https://api-test.onlineszamla.nav.gov.hu/invoiceService/v2/manageAnnulment
local http = chilkat.Http.new()
http.accept = "application/xml"
local endpoint = "https://api-test.onlineszamla.nav.gov.hu/invoiceService/v2/manageAnnulment"
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"?>
-- <ManageAnnulmentResponse xmlns="http://schemas.nav.gov.hu/OSA/2.0/api" xmlns:ns2="http://schemas.nav.gov.hu/OSA/2.0/data">
-- <header>
-- <requestId>RID465317110495</requestId>
-- <timestamp>2020-03-25T15:08:40Z</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>2WT6XG9LQ0U9VQNA</transactionId>
-- </ManageAnnulmentResponse>
-- Use this online tool to generate parsing code from sample XML:
-- Generate Parsing Code from XML
local ManageAnnulmentResponse_xmlns = respXml:get_attr_value("xmlns")
local ManageAnnulmentResponse_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")