Chilkat HOME .NET Core C# Android™ AutoIt C C# C++ Chilkat2-Python CkPython Classic ASP DataFlex Delphi ActiveX Delphi DLL Go Java Lianja Mono C# Node.js Objective-C PHP ActiveX PHP Extension Perl PowerBuilder PowerShell PureBasic Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ VB.NET VBScript Visual Basic 6.0 Visual FoxPro Xojo Plugin
(Lianja) Hungary NAV Manage Invoice RequestDemonstrates the manageInvoice request for the Hungarian NAV Online Invoicing System REST API v2.0. Note: This example requires Chilkat v9.5.0.83 or greater. For more information, see https://onlineszamla.nav.gov.hu/api/files/container/download/Online%20Szamla_Interfesz%20specifik%C3%A1ci%C3%B3_EN_v2.0.pdf
// 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. loBdInvoiceData1 = createobject("CkBinData") loBdInvoiceData2 = createobject("CkBinData") loBdInvoiceData3 = createobject("CkBinData") llSuccess = loBdInvoiceData1.LoadFile("qa_data/nav_invoicing/invoiceData1.xml") llSuccess = loBdInvoiceData2.LoadFile("qa_data/nav_invoicing/invoiceData2.xml") llSuccess = loBdInvoiceData3.LoadFile("qa_data/nav_invoicing/invoiceData3.xml") if (llSuccess = .F.) then ? "Failed to load invoice data." release loBdInvoiceData1 release loBdInvoiceData2 release loBdInvoiceData3 return endif loCrypt = createobject("CkCrypt2") loDtNow = createobject("CkDateTime") loDtNow.SetFromCurrentSystemTime() ? loDtNow.GetAsTimestamp(.F.) // The hash algorithm for the password is SHA512 (not SHA3-512). loCrypt.HashAlgorithm = "sha512" loCrypt.EncodingMode = "hex" lcMyPassword = "my-password" lcPasswordHash = loCrypt.HashStringENC(lcMyPassword) // Generate a random request ID like "RID215118906689" loPrng = createobject("CkPrng") loSbRequestId = createobject("CkStringBuilder") loSbRequestId.Append("RID") loSbRequestId.Append(loPrng.RandomString(12,.T.,.F.,.F.)) ? "generated requestId = " + loSbRequestId.GetAsString() // Calculate the requestSignature loCrypt.HashAlgorithm = "sha3-512" lcSignatureKey = "ce-8f5e-215119fa7dd621DLMRHRLH2S" loSbFinalHashBase = createobject("CkStringBuilder") // First append the timestamp because we are going to remove certain chars/parts. loSbFinalHashBase.Append(loDtNow.GetAsTimestamp(.F.)) lnNumReplaced = loSbFinalHashBase.Replace("Z","") lnNumReplaced = loSbFinalHashBase.Replace("-","") lnNumReplaced = loSbFinalHashBase.Replace(":","") lnNumReplaced = loSbFinalHashBase.Replace("T","") // Prepend the requestId and append the signatureKey loSbFinalHashBase.Prepend(loSbRequestId.GetAsString()) loSbFinalHashBase.Append(lcSignatureKey) // Calculate each index hash and add it to the sbFinalHashBase loSbHashBase = createobject("CkStringBuilder") loSbHashBase.Append("CREATE") loSbHashBase.Append(loBdInvoiceData1.GetEncoded("base64")) lcIndexHash = loCrypt.HashStringENC(loSbHashBase.GetAsString()) loSbFinalHashBase.Append(lcIndexHash) loSbHashBase.Clear() loSbHashBase.Append("CREATE") loSbHashBase.Append(loBdInvoiceData2.GetEncoded("base64")) lcIndexHash = loCrypt.HashStringENC(loSbHashBase.GetAsString()) loSbFinalHashBase.Append(lcIndexHash) loSbHashBase.Clear() loSbHashBase.Append("CREATE") loSbHashBase.Append(loBdInvoiceData3.GetEncoded("base64")) lcIndexHash = loCrypt.HashStringENC(loSbHashBase.GetAsString()) loSbFinalHashBase.Append(lcIndexHash) // Get our request signature (using sha3-512 because our HashAlgorithm was set to "sha3-512" up above...) lcRequestSignature = loCrypt.HashStringENC(loSbFinalHashBase.GetAsString()) // Load our recently obtained exchange token. // See Hungary NAV Invoicing Token Exchange Sample Code loXmlExchangeToken = createobject("CkXml") llSuccess = loXmlExchangeToken.LoadXmlFile("qa_data/tokens/nav_exchange_token.xml") if (llSuccess = .F.) then ? loXmlExchangeToken.LastErrorText release loBdInvoiceData1 release loBdInvoiceData2 release loBdInvoiceData3 release loCrypt release loDtNow release loPrng release loSbRequestId release loSbFinalHashBase release loSbHashBase release loXmlExchangeToken return endif // 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.. lcEncodedEncryptedExchangeToken = loXmlExchangeToken.GetChildContent("encodedExchangeToken") // Decode to binary. loBdExchangeToken = createobject("CkBinData") loBdExchangeToken.AppendEncoded(lcEncodedEncryptedExchangeToken,"base64") // Decrypt using your 16-digit replacement key: loCrypt.CryptAlgorithm = "aes" loCrypt.CipherMode = "ecb" loCrypt.KeyLength = 128 loCrypt.EncodingMode = "base64" // Pass your 16-digit replacement key here: loCrypt.SetEncodedKey("99952BBAAAAA8XYZ","ascii") loCrypt.DecryptBd(loBdExchangeToken) lcExchangeToken = loBdExchangeToken.GetString("utf-8") ? "exchange token = " + lcExchangeToken // Now build the XML.. loXml = createobject("CkXml") loXml.Tag = "ManageInvoiceRequest" loXml.AddAttribute("xmlns","http://schemas.nav.gov.hu/OSA/2.0/api") loXml.UpdateChildContent("header|requestId",loSbRequestId.GetAsString()) loXml.UpdateChildContent("header|timestamp",loDtNow.GetAsTimestamp(.F.)) loXml.UpdateChildContent("header|requestVersion","2.0") loXml.UpdateChildContent("header|headerVersion","1.0") loXml.UpdateChildContent("user|login","lwilsmn0uqdxe6u") loXml.UpdateChildContent("user|passwordHash",lcPasswordHash) loXml.UpdateChildContent("user|taxNumber","11111111") loXml.UpdateChildContent("user|requestSignature",lcRequestSignature) loXml.UpdateChildContent("software|softwareId","123456789123456789") loXml.UpdateChildContent("software|softwareName","string") loXml.UpdateChildContent("software|softwareOperation","LOCAL_SOFTWARE") loXml.UpdateChildContent("software|softwareMainVersion","string") loXml.UpdateChildContent("software|softwareDevName","string") loXml.UpdateChildContent("software|softwareDevContact","string") loXml.UpdateChildContent("software|softwareDevCountryCode","HU") loXml.UpdateChildContent("software|softwareDevTaxNumber","string") loXml.UpdateChildContent("exchangeToken",lcExchangeToken) loXml.UpdateChildContent("invoiceOperations|compressedContent","false") loXml.UpdateChildContent("invoiceOperations|invoiceOperation|index","1") loXml.UpdateChildContent("invoiceOperations|invoiceOperation|invoiceOperation","CREATE") loXml.UpdateChildContent("invoiceOperations|invoiceOperation|invoiceData",loBdInvoiceData1.GetEncoded("base64")) loXml.UpdateChildContent("invoiceOperations|invoiceOperation[1]|index","2") loXml.UpdateChildContent("invoiceOperations|invoiceOperation[1]|invoiceOperation","CREATE") loXml.UpdateChildContent("invoiceOperations|invoiceOperation[1]|invoiceData",loBdInvoiceData2.GetEncoded("base64")) loXml.UpdateChildContent("invoiceOperations|invoiceOperation[2]|index","3") loXml.UpdateChildContent("invoiceOperations|invoiceOperation[2]|invoiceOperation","CREATE") loXml.UpdateChildContent("invoiceOperations|invoiceOperation[2]|invoiceData",loBdInvoiceData3.GetEncoded("base64")) // POST the XML to https://api-test.onlineszamla.nav.gov.hu/invoiceService/v2/manageInvoice loHttp = createobject("CkHttp") loHttp.Accept = "application/xml" loHttp.SetRequestHeader("Content-Type","application/xml") lcEndpoint = "https://api-test.onlineszamla.nav.gov.hu/invoiceService/v2/manageInvoice" loResp = loHttp.PostXml(lcEndpoint,loXml.GetXml(),"utf-8") if (loHttp.LastMethodSuccess = .F.) then ? loHttp.LastErrorText release loBdInvoiceData1 release loBdInvoiceData2 release loBdInvoiceData3 release loCrypt release loDtNow release loPrng release loSbRequestId release loSbFinalHashBase release loSbHashBase release loXmlExchangeToken release loBdExchangeToken release loXml release loHttp return endif ? "Response status code = " + str(loResp.StatusCode) loRespXml = createobject("CkXml") loRespXml.LoadXml(loResp.BodyStr) ? "Response body:" ? loRespXml.GetXml() release loResp // 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 lcManageInvoiceResponse_xmlns = loRespXml.GetAttrValue("xmlns") lcManageInvoiceResponse_xmlns_ns2 = loRespXml.GetAttrValue("xmlns:ns2") lcRequestId = loRespXml.GetChildContent("header|requestId") lcTimestamp = loRespXml.GetChildContent("header|timestamp") lcRequestVersion = loRespXml.GetChildContent("header|requestVersion") lcHeaderVersion = loRespXml.GetChildContent("header|headerVersion") lcFuncCode = loRespXml.GetChildContent("result|funcCode") lcSoftwareId = loRespXml.GetChildContent("software|softwareId") lcSoftwareName = loRespXml.GetChildContent("software|softwareName") lcSoftwareOperation = loRespXml.GetChildContent("software|softwareOperation") lcSoftwareMainVersion = loRespXml.GetChildContent("software|softwareMainVersion") lcSoftwareDevName = loRespXml.GetChildContent("software|softwareDevName") lcSoftwareDevContact = loRespXml.GetChildContent("software|softwareDevContact") lcSoftwareDevCountryCode = loRespXml.GetChildContent("software|softwareDevCountryCode") lcSoftwareDevTaxNumber = loRespXml.GetChildContent("software|softwareDevTaxNumber") lcTransactionId = loRespXml.GetChildContent("transactionId") release loBdInvoiceData1 release loBdInvoiceData2 release loBdInvoiceData3 release loCrypt release loDtNow release loPrng release loSbRequestId release loSbFinalHashBase release loSbHashBase release loXmlExchangeToken release loBdExchangeToken release loXml release loHttp release loRespXml |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.