AutoIt
AutoIt
Hungary NAV Token Exchange
See more Hungary NAV Invoicing Examples
Demonstrates the tokenExchange request for the Hungarian NAV Online Invoicing System REST API v2.0.Chilkat AutoIt Downloads
Local $bSuccess = False
; 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"?>
; <TokenExchangeRequest xmlns="http://schemas.nav.gov.hu/OSA/2.0/api">
; <header>
; <requestId>RID896801578348</requestId>
; <timestamp>2019-09-11T10:55:31.440Z</timestamp>
; <requestVersion>2.0</requestVersion>
; <headerVersion>1.0</headerVersion>
; </header>
; <user>
; <login>lwilsmn0uqdxe6u</login>
; <passwordHash>2F43840A882CFDB7DB0FEC07D419D030D864B47B6B541DC280EF81B937B7A176E33C052B0D26638CC18A7A2C08D8D311733078A774BF43F6CA57FE8CD74DC28E</passwordHash>
; <taxNumber>11111111</taxNumber>
; <requestSignature>B4B5E0F197BFFD3DF69BCC98D3BE775F65FD5445EEF95C9D6B6C59425F2B81C4F6DA1FD563B0C7E7D98AF1E1725E5C63C2803B5D3A93D1C02ED354AC92F2CC94</requestSignature>
; <!--<signKey>ac-ac3a-7f661bff7d342N43CYX4U9FG</signKey>-->
; </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>
; </TokenExchangeRequest>
$oCrypt = ObjCreate("Chilkat.Crypt2")
$oDtNow = ObjCreate("Chilkat.CkDateTime")
$oDtNow.SetFromCurrentSystemTime()
ConsoleWrite($oDtNow.GetAsTimestamp(False) & @CRLF)
; The hash algorithm for the password is SHA512 (not SHA3-512).
$oCrypt.HashAlgorithm = "sha512"
$oCrypt.EncodingMode = "hex"
Local $sMyPassword = "my-password"
Local $sPasswordHash = $oCrypt.HashStringENC($sMyPassword)
; Generate a random request ID like "RID215118906689"
$oPrng = ObjCreate("Chilkat.Prng")
$oSbRequestId = ObjCreate("Chilkat.StringBuilder")
$oSbRequestId.Append("RID")
$oSbRequestId.Append($oPrng.RandomString(12,True,False,False))
ConsoleWrite("generated requestId = " & $oSbRequestId.GetAsString() & @CRLF)
; Calculate the requestSignature
$oCrypt.HashAlgorithm = "sha3-512"
Local $signatureKey = "ce-8f5e-215119fa7dd621DLMRHRLH2S"
$oSbFinalHashBase = ObjCreate("Chilkat.StringBuilder")
; First append the timestamp because we are going to remove certain chars/parts.
$oSbFinalHashBase.Append($oDtNow.GetAsTimestamp(False))
Local $iNumReplaced = $oSbFinalHashBase.Replace("Z","")
$iNumReplaced = $oSbFinalHashBase.Replace("-","")
$iNumReplaced = $oSbFinalHashBase.Replace(":","")
$iNumReplaced = $oSbFinalHashBase.Replace("T","")
; Prepend the requestId and append the signatureKey
$oSbFinalHashBase.Prepend($oSbRequestId.GetAsString())
$oSbFinalHashBase.Append($signatureKey)
Local $sRequestSignature = $oCrypt.HashStringENC($oSbFinalHashBase.GetAsString())
$oXml = ObjCreate("Chilkat.Xml")
$oXml.Tag = "TokenExchangeRequest"
$oXml.AddAttribute("xmlns","http://schemas.nav.gov.hu/OSA/2.0/api")
$oXml.UpdateChildContent "header|requestId",$oSbRequestId.GetAsString()
$oXml.UpdateChildContent "header|timestamp",$oDtNow.GetAsTimestamp(False)
$oXml.UpdateChildContent "header|requestVersion","2.0"
$oXml.UpdateChildContent "header|headerVersion","1.0"
$oXml.UpdateChildContent "user|login","lwilsmn0uqdxe6u"
$oXml.UpdateChildContent "user|passwordHash",$sPasswordHash
$oXml.UpdateChildContent "user|taxNumber","11111111"
$oXml.UpdateChildContent "user|requestSignature",$sRequestSignature
$oXml.UpdateChildContent "software|softwareId","123456789123456789"
$oXml.UpdateChildContent "software|softwareName","string"
$oXml.UpdateChildContent "software|softwareOperation","LOCAL_SOFTWARE"
$oXml.UpdateChildContent "software|softwareMainVersion","string"
$oXml.UpdateChildContent "software|softwareDevName","string"
$oXml.UpdateChildContent "software|softwareDevContact","string"
$oXml.UpdateChildContent "software|softwareDevCountryCode","HU"
$oXml.UpdateChildContent "software|softwareDevTaxNumber","string"
; POST the XML to https://api-test.onlineszamla.nav.gov.hu/invoiceService/v2/tokenExchange
$oHttp = ObjCreate("Chilkat.Http")
$oHttp.Accept = "application/xml"
Local $sEndpoint = "https://api-test.onlineszamla.nav.gov.hu/invoiceService/v2/tokenExchange"
$oResp = ObjCreate("Chilkat.HttpResponse")
$bSuccess = $oHttp.HttpStr("POST",$sEndpoint,$oXml.GetXml(),"utf-8","application/xml",$oResp)
If ($bSuccess = False) Then
ConsoleWrite($oHttp.LastErrorText & @CRLF)
Exit
EndIf
ConsoleWrite("Response status code = " & $oResp.StatusCode & @CRLF)
$oRespXml = ObjCreate("Chilkat.Xml")
$oRespXml.LoadXml($oResp.BodyStr)
ConsoleWrite("Response body:" & @CRLF)
ConsoleWrite($oRespXml.GetXml() & @CRLF)
; Save our exchange token to a file to be used for subsequent requests.
$oRespXml.SaveXml("qa_data/tokens/nav_exchange_token.xml")
; The result looks like this:
; <?xml version="1.0" encoding="UTF-8" standalone="yes"?>
; <TokenExchangeResponse xmlns="http://schemas.nav.gov.hu/OSA/2.0/api" xmlns:ns2="http://schemas.nav.gov.hu/OSA/2.0/data">
; <header>
; <requestId>RID789246611489</requestId>
; <timestamp>2020-03-25T14:14:36Z</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>
; <encodedExchangeToken>2lR5v57Tl ... 9n4tIWCYgjKQ==</encodedExchangeToken>
; <tokenValidityFrom>2020-03-25T15:14:36.987+01:00</tokenValidityFrom>
; <tokenValidityTo>2020-03-25T15:19:36.987+01:00</tokenValidityTo>
; </TokenExchangeResponse>
; Use this online tool to generate parsing code from sample XML:
; Generate Parsing Code from XML
Local $sTokenExchangeResponse_xmlns = $oRespXml.GetAttrValue("xmlns")
Local $sTokenExchangeResponse_xmlns_ns2 = $oRespXml.GetAttrValue("xmlns:ns2")
Local $sRequestId = $oRespXml.GetChildContent("header|requestId")
Local $sTimestamp = $oRespXml.GetChildContent("header|timestamp")
Local $sRequestVersion = $oRespXml.GetChildContent("header|requestVersion")
Local $sHeaderVersion = $oRespXml.GetChildContent("header|headerVersion")
Local $sFuncCode = $oRespXml.GetChildContent("result|funcCode")
Local $softwareId = $oRespXml.GetChildContent("software|softwareId")
Local $softwareName = $oRespXml.GetChildContent("software|softwareName")
Local $softwareOperation = $oRespXml.GetChildContent("software|softwareOperation")
Local $softwareMainVersion = $oRespXml.GetChildContent("software|softwareMainVersion")
Local $softwareDevName = $oRespXml.GetChildContent("software|softwareDevName")
Local $softwareDevContact = $oRespXml.GetChildContent("software|softwareDevContact")
Local $softwareDevCountryCode = $oRespXml.GetChildContent("software|softwareDevCountryCode")
Local $softwareDevTaxNumber = $oRespXml.GetChildContent("software|softwareDevTaxNumber")
Local $sEncodedExchangeToken = $oRespXml.GetChildContent("encodedExchangeToken")
Local $sTokenValidityFrom = $oRespXml.GetChildContent("tokenValidityFrom")
Local $sTokenValidityTo = $oRespXml.GetChildContent("tokenValidityTo")