PowerBuilder
PowerBuilder
JSON FindRecord Example
See more JSON Examples
Demonstrates the FindRecord method for searching an array of JSON records. The data used in this example is available at JSON sample data for FindRecord.Note: This example requires Chilkat v9.5.0.63 or later.
Chilkat PowerBuilder Downloads
integer li_rc
integer li_Success
oleobject loo_Json
string ls_ArrayPath
string ls_RelativePath
string ls_Value
integer li_CaseSensitive
oleobject loo_AccountRec
li_Success = 0
// Note: This example requires Chilkat v9.5.0.63 or later.
loo_Json = create oleobject
li_rc = loo_Json.ConnectToNewObject("Chilkat.JsonObject")
if li_rc < 0 then
destroy loo_Json
MessageBox("Error","Connecting to COM object failed")
return
end if
li_Success = loo_Json.LoadFile("qa_data/json/qb_accounts.json")
// A sample of the content of qb_accounts.json is shown at the bottom of this example.
// The goal is to search the array of Account records to return the 1st match
// Find the account with the name "Advertising"
ls_ArrayPath = "QueryResponse.Account"
ls_RelativePath = "Name"
ls_Value = "Advertising"
li_CaseSensitive = 1
loo_AccountRec = loo_Json.FindRecord(ls_ArrayPath,ls_RelativePath,ls_Value,li_CaseSensitive)
if loo_Json.LastMethodSuccess <> 1 then
Write-Debug "Record not found."
destroy loo_Json
return
end if
// The accountRec should contain this:
// {
// "Name": "Advertising",
// "SubAccount": false,
// "FullyQualifiedName": "Advertising",
// "Active": true,
// "Classification": "Expense",
// "AccountType": "Expense",
// "AccountSubType": "AdvertisingPromotional",
// "CurrentBalance": 0,
// "CurrentBalanceWithSubAccounts": 0,
// "CurrencyRef": {
// "value": "USD",
// "name": "United States Dollar"
// },
// "domain": "QBO",
// "sparse": false,
// "Id": "7",
// "SyncToken": "0",
// "MetaData": {
// "CreateTime": "2016-09-09T14:42:07-07:00",
// "LastUpdatedTime": "2016-09-09T14:42:07-07:00"
// }
// }
Write-Debug "FullyQualifiedName: " + loo_AccountRec.StringOf("FullyQualifiedName")
Write-Debug "AccountType: " + loo_AccountRec.StringOf("AccountType")
Write-Debug "AccountSubType: " + loo_AccountRec.StringOf("AccountSubType")
Write-Debug "----"
destroy loo_AccountRec
// ------------------------------------------------------------------
// Find the first account where the currency is USD
ls_RelativePath = "CurrencyRef.value"
ls_Value = "USD"
li_CaseSensitive = 1
loo_AccountRec = loo_Json.FindRecord(ls_ArrayPath,ls_RelativePath,ls_Value,li_CaseSensitive)
if loo_Json.LastMethodSuccess <> 1 then
Write-Debug "Record not found."
destroy loo_Json
return
end if
Write-Debug "Name: " + loo_AccountRec.StringOf("Name")
Write-Debug "CurrencyRef.name: " + loo_AccountRec.StringOf("CurrencyRef.name")
Write-Debug "----"
destroy loo_AccountRec
// ------------------------------------------------------------------
// Find the first account with "receivable" in the name (case insensitive)
ls_RelativePath = "Name"
ls_Value = "*receivable*"
li_CaseSensitive = 0
loo_AccountRec = loo_Json.FindRecord(ls_ArrayPath,ls_RelativePath,ls_Value,li_CaseSensitive)
if loo_Json.LastMethodSuccess <> 1 then
Write-Debug "Record not found."
destroy loo_Json
return
end if
Write-Debug "Name: " + loo_AccountRec.StringOf("Name")
Write-Debug "----"
destroy loo_AccountRec
// -----------------------------------------------------------------
// qb_accounts.json contains this data
//
// {
// "QueryResponse": {
// "Account": [
// {
// "Name": "Accounts Payable (A/P)",
// "SubAccount": false,
// "Description": "Description added during update.",
// "FullyQualifiedName": "Accounts Payable (A/P)",
// "Active": true,
// "Classification": "Liability",
// "AccountType": "Accounts Payable",
// "AccountSubType": "AccountsPayable",
// "CurrentBalance": -1602.67,
// "CurrentBalanceWithSubAccounts": -1602.67,
// "CurrencyRef": {
// "value": "USD",
// "name": "United States Dollar"
// },
// "domain": "QBO",
// "sparse": false,
// "Id": "33",
// "SyncToken": "1",
// "MetaData": {
// "CreateTime": "2016-09-10T10:12:02-07:00",
// "LastUpdatedTime": "2016-10-24T16:41:39-07:00"
// }
// },
// {
// "Name": "Accounts Receivable (A/R)",
// "SubAccount": false,
// "FullyQualifiedName": "Accounts Receivable (A/R)",
// "Active": true,
// "Classification": "Asset",
// "AccountType": "Accounts Receivable",
// "AccountSubType": "AccountsReceivable",
// "CurrentBalance": 5281.52,
// "CurrentBalanceWithSubAccounts": 5281.52,
// "CurrencyRef": {
// "value": "USD",
// "name": "United States Dollar"
// },
// "domain": "QBO",
// "sparse": false,
// "Id": "84",
// "SyncToken": "0",
// "MetaData": {
// "CreateTime": "2016-09-14T14:49:29-07:00",
// "LastUpdatedTime": "2016-09-17T13:16:17-07:00"
// }
// },
// {
// "Name": "Advertising",
// "SubAccount": false,
// "FullyQualifiedName": "Advertising",
// "Active": true,
// "Classification": "Expense",
// "AccountType": "Expense",
// "AccountSubType": "AdvertisingPromotional",
// "CurrentBalance": 0,
// "CurrentBalanceWithSubAccounts": 0,
// "CurrencyRef": {
// "value": "USD",
// "name": "United States Dollar"
// },
// "domain": "QBO",
// "sparse": false,
// "Id": "7",
// "SyncToken": "0",
// "MetaData": {
// "CreateTime": "2016-09-09T14:42:07-07:00",
// "LastUpdatedTime": "2016-09-09T14:42:07-07:00"
// }
// },
// {
// "Name": "Arizona Dept. of Revenue Payable",
// "SubAccount": false,
// "FullyQualifiedName": "Arizona Dept. of Revenue Payable",
// "Active": true,
// "Classification": "Liability",
// "AccountType": "Other Current Liability",
// "AccountSubType": "GlobalTaxPayable",
// "CurrentBalance": 0,
// "CurrentBalanceWithSubAccounts": 0,
// "CurrencyRef": {
// "value": "USD",
// "name": "United States Dollar"
// },
// "domain": "QBO",
// "sparse": false,
// "Id": "89",
// "SyncToken": "0",
// "MetaData": {
// "CreateTime": "2016-09-16T12:17:04-07:00",
// "LastUpdatedTime": "2016-09-17T13:05:01-07:00"
// }
// },
// {
// "Name": "Automobile",
// "SubAccount": false,
// "FullyQualifiedName": "Automobile",
// "Active": true,
// "Classification": "Expense",
// "AccountType": "Expense",
// "AccountSubType": "Auto",
// "CurrentBalance": 0,
// "CurrentBalanceWithSubAccounts": 0,
// "CurrencyRef": {
// "value": "USD",
// "name": "United States Dollar"
// },
// "domain": "QBO",
// "sparse": false,
// "Id": "55",
// "SyncToken": "0",
// "MetaData": {
// "CreateTime": "2016-09-14T10:15:53-07:00",
// "LastUpdatedTime": "2016-09-14T10:16:05-07:00"
// }
// },
// ...
//
destroy loo_Json