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

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

AutoIt
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")