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
(PureBasic) Xero Get Accounts using REST APIDemonstrates how to get the Accounts using the Chilkat REST library. Note: Requires Chilkat v9.5.0.64 or greater.
IncludeFile "CkXml.pb" IncludeFile "CkStringBuilder.pb" IncludeFile "CkRest.pb" Procedure ChilkatExample() ; Note: Requires Chilkat v9.5.0.64 or greater. ; This requires the Chilkat API to have been previously unlocked. ; See Global Unlock Sample for sample code. rest.i = CkRest::ckCreate() If rest.i = 0 Debug "Failed to create object." ProcedureReturn EndIf success.i ; Before sending REST API calls, the REST object needs to be ; initialized for OAuth1. ; See Xero 2-Legged OAuth1 Setup for sample code. ; Assuming the REST object's OAuth1 authenticator is setup, and the initial ; connection was made, we may now send REST HTTP requests.. ; Get the full list of accounts. sbXml.i = CkStringBuilder::ckCreate() If sbXml.i = 0 Debug "Failed to create object." ProcedureReturn EndIf success = CkRest::ckFullRequestNoBodySb(rest,"GET","/api.xro/2.0/Accounts",sbXml) If success <> 1 Debug CkRest::ckLastErrorText(rest) CkRest::ckDispose(rest) CkStringBuilder::ckDispose(sbXml) ProcedureReturn EndIf ; A 200 response is expected for actual success. If CkRest::ckResponseStatusCode(rest) <> 200 Debug CkStringBuilder::ckGetAsString(sbXml) CkRest::ckDispose(rest) CkStringBuilder::ckDispose(sbXml) ProcedureReturn EndIf ; Iterate over the accounts and get some information.. bAutoTrim.i = 0 xml.i = CkXml::ckCreate() If xml.i = 0 Debug "Failed to create object." ProcedureReturn EndIf CkXml::ckLoadSb(xml,sbXml,bAutoTrim) CkXml::ckSaveXml(xml,"qa_cache/xero_accounts.xml") ; How many accounts exist? numAccounts.i = CkXml::ckNumChildrenAt(xml,"Accounts") Debug "numAccounts = " + Str(numAccounts) i.i = 0 While i < numAccounts CkXml::setCkI(xml, i) Debug "AccountID: " + CkXml::ckGetChildContent(xml,"Accounts|Account[i]|AccountID") Debug "Name: " + CkXml::ckGetChildContent(xml,"Accounts|Account[i]|Name") Debug "Code: " + Str(CkXml::ckGetChildIntValue(xml,"Accounts|Account[i]|Code")) Debug "EnablePaymentsToAccount: " + Str(CkXml::ckGetChildBoolValue(xml,"Accounts|Account[i]|EnablePaymentsToAccount")) Debug "----" i = i + 1 Wend ; The output looks like this: ; numAccounts = 69 ; AccountID: ceef66a5-a545-413b-9312-78a53caadbc4 ; Name: Checking Account ; Code: 90 ; EnablePaymentsToAccount: False ; ---- ; AccountID: 3d09fd49-434d-4c18-a57b-831663ab70d2 ; Name: Savings Account ; Code: 91 ; EnablePaymentsToAccount: False ; ---- ; AccountID: 5f5e1b00-5331-4ee5-bc84-39dbd9a27db3 ; Name: Accounts Receivable ; Code: 120 ; EnablePaymentsToAccount: False ; ---- ; AccountID: b0a23f8d-1b6d-4209-96f9-8046f794e1f4 ; Name: Prepayments ; Code: 130 ; EnablePaymentsToAccount: False ; ---- ; ... ; The xero_accounts.xml file contains data that looks like this: ; <Response xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"> ; <Id>409d062b-d3c2-4062-99a6-31b7c1c14662</Id> ; <Status>OK</Status> ; <ProviderName>ChilkatPrivate</ProviderName> ; <DateTimeUTC>2016-11-01T22:30:13.3606258Z</DateTimeUTC> ; <Accounts> ; <Account> ; <AccountID>ceef66a5-a545-413b-9312-78a53caadbc4</AccountID> ; <Code>090</Code> ; <Name>Checking Account</Name> ; <Status>ACTIVE</Status> ; <Type>BANK</Type> ; <TaxType>NONE</TaxType> ; <Class>ASSET</Class> ; <EnablePaymentsToAccount>false</EnablePaymentsToAccount> ; <ShowInExpenseClaims>false</ShowInExpenseClaims> ; <BankAccountNumber>132435465</BankAccountNumber> ; <BankAccountType>BANK</BankAccountType> ; <CurrencyCode>USD</CurrencyCode> ; <ReportingCode>ASS</ReportingCode> ; <ReportingCodeName>Assets</ReportingCodeName> ; <HasAttachments>false</HasAttachments> ; <UpdatedDateUTC>2016-10-15T22:22:44.53</UpdatedDateUTC> ; </Account> ; <Account> ; <AccountID>3d09fd49-434d-4c18-a57b-831663ab70d2</AccountID> ; <Code>091</Code> ; <Name>Savings Account</Name> ; <Status>ACTIVE</Status> ; <Type>BANK</Type> ; <TaxType>NONE</TaxType> ; <Class>ASSET</Class> ; <EnablePaymentsToAccount>false</EnablePaymentsToAccount> ; <ShowInExpenseClaims>false</ShowInExpenseClaims> ; <BankAccountNumber>987654321</BankAccountNumber> ; <BankAccountType>BANK</BankAccountType> ; <CurrencyCode>USD</CurrencyCode> ; <ReportingCode>ASS</ReportingCode> ; <HasAttachments>false</HasAttachments> ; <UpdatedDateUTC>2016-10-15T22:22:44.53</UpdatedDateUTC> ; </Account> ; ... ; CkRest::ckDispose(rest) CkStringBuilder::ckDispose(sbXml) CkXml::ckDispose(xml) ProcedureReturn EndProcedure |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.