Chilkat Examples

ChilkatHOME.NET Core C#Android™AutoItCC#C++Chilkat2-PythonCkPythonClassic ASPDataFlexDelphi ActiveXDelphi DLLGoJavaLianjaMono C#Node.jsObjective-CPHP ActiveXPHP ExtensionPerlPowerBuilderPowerShellPureBasicRubySQL ServerSwift 2Swift 3,4,5...TclUnicode CUnicode C++VB.NETVBScriptVisual Basic 6.0Visual FoxProXojo Plugin

Tcl Web API Examples

Primary Categories

ABN AMRO
AWS Secrets Manager
AWS Security Token Service
AWS Translate
Activix CRM
Adyen
Alibaba Cloud OSS
Amazon Cognito
Amazon DynamoDB
Amazon MWS
Amazon Pay
Amazon Rekognition
Amazon SP-API
Amazon Voice ID
Aruba Fatturazione
Azure Maps
Azure Monitor
Azure OAuth2
Azure Storage Accounts
Backblaze S3
Banco Inter
Belgian eHealth Platform
Bitfinex v2 REST
Bluzone
BrickLink
Bunny CDN
CallRail
CardConnect
Cerved
ClickBank
Clickatell
Cloudfare
Constant Contact
DocuSign
Duo Auth MFA
ETrade
Ecwid
Egypt ITIDA
Egypt eReceipt
Etsy
Facebook
Faire
Frame.io
GeoOp
GetHarvest
Global Payments
Google People
Google Search Console
Google Translate
Hungary NAV Invoicing
IBM Text to Speech
Ibanity
IntakeQ
Jira
Lightspeed
MYOB
Magento
Mailgun
Mastercard

MedTunnel
MercadoLibre
MessageMedia
Microsoft Calendar
Microsoft Group
Microsoft Tasks and Plans
Microsoft Teams
Moody's
Okta OAuth/OIDC
OneLogin OIDC
OneNote
OpenAI ChatGPT
PRODA
PayPal
Paynow.pl
Peoplevox
Populi
QuickBooks
Rabobank
Refinitiv
Royal Mail OBA
SCiS Schools Catalogue
SII Chile
SMSAPI
SOAP finkok.com
SendGrid
Shippo
Shopify
Shopware
Shopware 6
SimpleTexting
Square
Stripe
SugarCRM
TicketBAI
Trello
Twilio
Twitter API v2
Twitter v1
UPS
UniPin
VoiceBase
Vonage
WaTrend
Walmart v3
Wasabi
WhatsApp
WiX
WooCommerce
WordPress
Xero
Yahoo Mail
Yapily
Yousign
ZATCA
Zendesk
Zoom
_Miscellaneous_
eBay
effectconnect
hacienda.go.cr

 

 

 

(Tcl) Activix CRM Search for Leads

Demonstrates how to full-text search for leads, returning a JSON list of leads.

For more information, see https://docs.crm.activix.ca/api/resources/lead

Chilkat Tcl Extension Downloads

Chilkat Tcl Extension Downloads

load ./chilkat.dll

# This example requires the Chilkat API to have been previously unlocked.
# See Global Unlock Sample for sample code.

set http [new_CkHttp]

CkHttp_put_AuthToken $http "ACCESS_TOKEN"

CkHttp_put_Accept $http "application/json"

set strResp [CkHttp_quickGetStr $http "https://crm.activix.ca/api/v2/leads/search?query=Doe"]
if {[CkHttp_get_LastMethodSuccess $http] != 1} then {
    puts [CkHttp_lastErrorText $http]
    delete_CkHttp $http
    exit
}

puts "Response Status Code: [CkHttp_get_LastStatus $http]"

set jsonResponse [new_CkJsonObject]

CkJsonObject_Load $jsonResponse $strResp
CkJsonObject_put_EmitCompact $jsonResponse 0
puts [CkJsonObject_emit $jsonResponse]

if {[CkHttp_get_LastStatus $http] != 200} then {
    puts "Failed."
    delete_CkHttp $http
    delete_CkJsonObject $jsonResponse
    exit
}

# Sample output...
# (See the parsing code below..)
# 
# Use this online tool to generate parsing code from sample JSON: 
# Generate Parsing Code from JSON

# {
#     "data": [
#         {
#             "id": 3387562,
#             "created_at": "2018-04-09T18:05:00+00:00",
#             "updated_at": "2018-04-09T18:07:00+00:00",
#             "first_name": "John",
#             "last_name": "Doe",
#             ...
#             "account": {
#                 "id": 66,
#                 ...
#             },
#             "advisor": {
#                 "id": 51112,
#                 ...
#             },
#             "emails": [
#                 {
#                     "id": 3664451,
#                     ...
#                 },
#                 ...
#             ],
#             "phones": [
#                 {
#                     "id": 9465546,
#                     ...
#                 },
#                 ...
#             ],
#             "vehicles": [
#                 {
#                     "id": 4542214,
#                     ...
#                 },
#                 ...
#             ]
#         },
#         ...
#     ],
#     "links": {
#         "first": "https://crm.activix.ca/api/v2/leads/search?query=John&page=1",
#         "last": "https://crm.activix.ca/api/v2/leads/search?query=John&page=47",
#         "prev": null,
#         "next": "https://crm.activix.ca/api/v2/leads/search?query=John&page=2"
#     },
#     "meta": {
#         "current_page": 1,
#         "from": 1,
#         "last_page": 47,
#         "path": "https://crm.activix.ca/api/v2/leads/search",
#         "per_page": 25,
#         "to": 25,
#         "total": 1161
#     }
# }

set linksFirst [CkJsonObject_stringOf $jsonResponse "links.first"]
set linksLast [CkJsonObject_stringOf $jsonResponse "links.last"]
set linksPrev [CkJsonObject_stringOf $jsonResponse "links.prev"]
set linksNext [CkJsonObject_stringOf $jsonResponse "links.next"]
set metaCurrent_page [CkJsonObject_IntOf $jsonResponse "meta.current_page"]
set metaFrom [CkJsonObject_IntOf $jsonResponse "meta.from"]
set metaLast_page [CkJsonObject_IntOf $jsonResponse "meta.last_page"]
set metaPath [CkJsonObject_stringOf $jsonResponse "meta.path"]
set metaPer_page [CkJsonObject_IntOf $jsonResponse "meta.per_page"]
set metaTo [CkJsonObject_IntOf $jsonResponse "meta.to"]
set metaTotal [CkJsonObject_IntOf $jsonResponse "meta.total"]
set i 0
set count_i [CkJsonObject_SizeOfArray $jsonResponse "data"]
while {$i < $count_i} {
    CkJsonObject_put_I $jsonResponse $i
    set id [CkJsonObject_IntOf $jsonResponse "data[i].id"]
    set created_at [CkJsonObject_stringOf $jsonResponse "data[i].created_at"]
    set updated_at [CkJsonObject_stringOf $jsonResponse "data[i].updated_at"]
    set account_id [CkJsonObject_IntOf $jsonResponse "data[i].account_id"]
    set address_line1 [CkJsonObject_stringOf $jsonResponse "data[i].address_line1"]
    set address_line2 [CkJsonObject_stringOf $jsonResponse "data[i].address_line2"]
    set appointment_date [CkJsonObject_stringOf $jsonResponse "data[i].appointment_date"]
    set appt_call [CkJsonObject_BoolOf $jsonResponse "data[i].appt_call"]
    set available_date [CkJsonObject_stringOf $jsonResponse "data[i].available_date"]
    set average_spending [CkJsonObject_stringOf $jsonResponse "data[i].average_spending"]
    set be_back_date [CkJsonObject_stringOf $jsonResponse "data[i].be_back_date"]
    set birth_date [CkJsonObject_stringOf $jsonResponse "data[i].birth_date"]
    set business [CkJsonObject_stringOf $jsonResponse "data[i].business"]
    set call_date [CkJsonObject_stringOf $jsonResponse "data[i].call_date"]
    set city [CkJsonObject_stringOf $jsonResponse "data[i].city"]
    set civility [CkJsonObject_stringOf $jsonResponse "data[i].civility"]
    set code [CkJsonObject_stringOf $jsonResponse "data[i].code"]
    set country [CkJsonObject_stringOf $jsonResponse "data[i].country"]
    set csi_date [CkJsonObject_stringOf $jsonResponse "data[i].csi_date"]
    set delivered_by_id [CkJsonObject_stringOf $jsonResponse "data[i].delivered_by_id"]
    set delivered_date [CkJsonObject_stringOf $jsonResponse "data[i].delivered_date"]
    set delivery_date [CkJsonObject_stringOf $jsonResponse "data[i].delivery_date"]
    set division [CkJsonObject_stringOf $jsonResponse "data[i].division"]
    set end_service_date [CkJsonObject_stringOf $jsonResponse "data[i].end_service_date"]
    set first_name [CkJsonObject_stringOf $jsonResponse "data[i].first_name"]
    set gas [CkJsonObject_stringOf $jsonResponse "data[i].gas"]
    set gender [CkJsonObject_IntOf $jsonResponse "data[i].gender"]
    set invoiced [CkJsonObject_BoolOf $jsonResponse "data[i].invoiced"]
    set last_name [CkJsonObject_stringOf $jsonResponse "data[i].last_name"]
    set last_visit_date [CkJsonObject_stringOf $jsonResponse "data[i].last_visit_date"]
    set locale [CkJsonObject_stringOf $jsonResponse "data[i].locale"]
    set loyalty [CkJsonObject_stringOf $jsonResponse "data[i].loyalty"]
    set next_visit_date [CkJsonObject_stringOf $jsonResponse "data[i].next_visit_date"]
    set odometer_last_visit [CkJsonObject_stringOf $jsonResponse "data[i].odometer_last_visit"]
    set open_work_order_date [CkJsonObject_stringOf $jsonResponse "data[i].open_work_order_date"]
    set planned_pick_up_date [CkJsonObject_stringOf $jsonResponse "data[i].planned_pick_up_date"]
    set postal_code [CkJsonObject_stringOf $jsonResponse "data[i].postal_code"]
    set prepaid [CkJsonObject_stringOf $jsonResponse "data[i].prepaid"]
    set prepared [CkJsonObject_BoolOf $jsonResponse "data[i].prepared"]
    set presented_date [CkJsonObject_stringOf $jsonResponse "data[i].presented_date"]
    set promised_date [CkJsonObject_stringOf $jsonResponse "data[i].promised_date"]
    set province [CkJsonObject_stringOf $jsonResponse "data[i].province"]
    set rating [CkJsonObject_stringOf $jsonResponse "data[i].rating"]
    set reached_client [CkJsonObject_BoolOf $jsonResponse "data[i].reached_client"]
    set refinanced_date [CkJsonObject_stringOf $jsonResponse "data[i].refinanced_date"]
    set repair_date [CkJsonObject_stringOf $jsonResponse "data[i].repair_date"]
    set repair_order [CkJsonObject_stringOf $jsonResponse "data[i].repair_order"]
    set result [CkJsonObject_stringOf $jsonResponse "data[i].result"]
    set road_test_date [CkJsonObject_stringOf $jsonResponse "data[i].road_test_date"]
    set sale_date [CkJsonObject_stringOf $jsonResponse "data[i].sale_date"]
    set second_contact [CkJsonObject_stringOf $jsonResponse "data[i].second_contact"]
    set second_contact_civility [CkJsonObject_stringOf $jsonResponse "data[i].second_contact_civility"]
    set segment [CkJsonObject_stringOf $jsonResponse "data[i].segment"]
    set service_cleaned [CkJsonObject_BoolOf $jsonResponse "data[i].service_cleaned"]
    set service_interval_km [CkJsonObject_stringOf $jsonResponse "data[i].service_interval_km"]
    set service_monthly_km [CkJsonObject_stringOf $jsonResponse "data[i].service_monthly_km"]
    set service_processIntention [CkJsonObject_stringOf $jsonResponse "data[i].service_process.intention"]
    set service_processTransport [CkJsonObject_stringOf $jsonResponse "data[i].service_process.transport"]
    set service_processWalk_around [CkJsonObject_stringOf $jsonResponse "data[i].service_process.walk_around"]
    set sex [CkJsonObject_stringOf $jsonResponse "data[i].sex"]
    set source [CkJsonObject_stringOf $jsonResponse "data[i].source"]
    set status [CkJsonObject_stringOf $jsonResponse "data[i].status"]
    set storage [CkJsonObject_stringOf $jsonResponse "data[i].storage"]
    set take_over_date [CkJsonObject_stringOf $jsonResponse "data[i].take_over_date"]
    set v_type [CkJsonObject_stringOf $jsonResponse "data[i].type"]
    set unsubscribe_all_date [CkJsonObject_stringOf $jsonResponse "data[i].unsubscribe_all_date"]
    set unsubscribe_call_date [CkJsonObject_stringOf $jsonResponse "data[i].unsubscribe_call_date"]
    set unsubscribe_email_date [CkJsonObject_stringOf $jsonResponse "data[i].unsubscribe_email_date"]
    set unsubscribe_sms_date [CkJsonObject_stringOf $jsonResponse "data[i].unsubscribe_sms_date"]
    set work_order [CkJsonObject_stringOf $jsonResponse "data[i].work_order"]
    set accountId [CkJsonObject_IntOf $jsonResponse "data[i].account.id"]
    set accountCreated_at [CkJsonObject_stringOf $jsonResponse "data[i].account.created_at"]
    set accountUpdated_at [CkJsonObject_stringOf $jsonResponse "data[i].account.updated_at"]
    set accountPartner_id [CkJsonObject_IntOf $jsonResponse "data[i].account.partner_id"]
    set accountActivity_report [CkJsonObject_BoolOf $jsonResponse "data[i].account.activity_report"]
    set accountCommercial [CkJsonObject_BoolOf $jsonResponse "data[i].account.commercial"]
    set accountEvent [CkJsonObject_BoolOf $jsonResponse "data[i].account.event"]
    set accountLeadxpress [CkJsonObject_BoolOf $jsonResponse "data[i].account.leadxpress"]
    set accountLoyalty [CkJsonObject_BoolOf $jsonResponse "data[i].account.loyalty"]
    set accountPhone_up [CkJsonObject_BoolOf $jsonResponse "data[i].account.phone_up"]
    set accountRenewal [CkJsonObject_BoolOf $jsonResponse "data[i].account.renewal"]
    set accountSale_table [CkJsonObject_BoolOf $jsonResponse "data[i].account.sale_table"]
    set accountService [CkJsonObject_BoolOf $jsonResponse "data[i].account.service"]
    set accountWalk_in [CkJsonObject_BoolOf $jsonResponse "data[i].account.walk_in"]
    set accountWebboost [CkJsonObject_BoolOf $jsonResponse "data[i].account.webboost"]
    set accountAccount_manager [CkJsonObject_BoolOf $jsonResponse "data[i].account.account_manager"]
    set accountActivation_date [CkJsonObject_stringOf $jsonResponse "data[i].account.activation_date"]
    set accountActive [CkJsonObject_BoolOf $jsonResponse "data[i].account.active"]
    set accountAssigned_lead [CkJsonObject_BoolOf $jsonResponse "data[i].account.assigned_lead"]
    set accountAuto_renewal [CkJsonObject_BoolOf $jsonResponse "data[i].account.auto_renewal"]
    set accountAuto_renewal_new [CkJsonObject_BoolOf $jsonResponse "data[i].account.auto_renewal_new"]
    set accountAuto_renewal_used [CkJsonObject_BoolOf $jsonResponse "data[i].account.auto_renewal_used"]
    set accountAutomation [CkJsonObject_BoolOf $jsonResponse "data[i].account.automation"]
    set accountBdc_advisor [CkJsonObject_BoolOf $jsonResponse "data[i].account.bdc_advisor"]
    set accountCalendar_options [CkJsonObject_BoolOf $jsonResponse "data[i].account.calendar_options"]
    set accountClient_card_fieldsProcessGas [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.process.gas"]
    set accountClient_card_fieldsProcessRecorded [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.process.recorded"]
    set accountClient_card_fieldsProcessAvailable [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.process.available"]
    set accountClient_card_fieldsProcessDiscounted [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.process.discounted"]
    set accountClient_card_fieldsCommercialProfit [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.commercial.profit"]
    set accountClient_card_fieldsCommercialExclude [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.commercial.exclude"]
    set accountClient_card_fieldsCommercialMeeting [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.commercial.meeting"]
    set accountClient_card_fieldsPerformanceDeposit [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.performance.deposit"]
    set accountClient_card_fieldsPerformanceRefinanced [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.performance.refinanced"]
    set accountClient_card_fieldsPerformanceDealer_tour [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.performance.dealer_tour"]
    set accountClient_card_fieldsPerformanceWalk_around [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.performance.walk_around"]
    set accountClient_card_fieldsPerformanceQualification [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.performance.qualification"]
    set accountClient_card_fieldsPerformanceTwenty_four_hour [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.performance.twenty_four_hour"]
    set accountClient_card_fieldsGeneral_infoBudget [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.general_info.budget"]
    set accountClient_card_fieldsGeneral_infoSector [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.general_info.sector"]
    set accountClient_card_fieldsGeneral_infoCustom_1 [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.general_info.custom_1"]
    set accountClient_card_fieldsGeneral_infoCustom_2 [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.general_info.custom_2"]
    set accountClient_card_fieldsGeneral_infoCustom_3 [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.general_info.custom_3"]
    set accountClient_card_fieldsGeneral_infoCustom_4 [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.general_info.custom_4"]
    set accountClient_card_fieldsGeneral_infoCustom_5 [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.general_info.custom_5"]
    set accountClient_card_fieldsGeneral_infoCustom_6 [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.general_info.custom_6"]
    set accountClient_card_fieldsGeneral_infoCustom_7 [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.general_info.custom_7"]
    set accountClient_card_fieldsGeneral_infoCustom_8 [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.general_info.custom_8"]
    set accountClient_card_fieldsGeneral_infoCustom_9 [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.general_info.custom_9"]
    set accountClient_card_fieldsGeneral_infoCustom_10 [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.general_info.custom_10"]
    set accountClient_card_fieldsGeneral_infoCommunication_preference [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.general_info.communication_preference"]
    set accountClient_card_fieldsWanted_vehicleVin [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.wanted_vehicle.vin"]
    set accountClient_card_fieldsWanted_vehicleFuel [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.wanted_vehicle.fuel"]
    set accountClient_card_fieldsWanted_vehicleRate [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.wanted_vehicle.rate"]
    set accountClient_card_fieldsWanted_vehicleTerm [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.wanted_vehicle.term"]
    set accountClient_card_fieldsWanted_vehicleTire [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.wanted_vehicle.tire"]
    set accountClient_card_fieldsWanted_vehicleYear [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.wanted_vehicle.year"]
    set accountClient_card_fieldsWanted_vehicleColor [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.wanted_vehicle.color"]
    set accountClient_card_fieldsWanted_vehiclePrice [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.wanted_vehicle.price"]
    set accountClient_card_fieldsWanted_vehicleStock [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.wanted_vehicle.stock"]
    set accountClient_card_fieldsWanted_vehicleTotal [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.wanted_vehicle.total"]
    set accountClient_card_fieldsWanted_vehicleBudget [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.wanted_vehicle.budget"]
    set accountClient_card_fieldsWanted_vehicleEngine [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.wanted_vehicle.engine"]
    set accountClient_card_fieldsWanted_vehicleLength [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.wanted_vehicle.length"]
    set accountClient_card_fieldsWanted_vehicleProfit [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.wanted_vehicle.profit"]
    set accountClient_card_fieldsWanted_vehicleSuffix [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.wanted_vehicle.suffix"]
    set accountClient_card_fieldsWanted_vehicleWeight [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.wanted_vehicle.weight"]
    set accountClient_card_fieldsWanted_vehicleComment [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.wanted_vehicle.comment"]
    set accountClient_card_fieldsWanted_vehicleMileage [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.wanted_vehicle.mileage"]
    set accountClient_card_fieldsWanted_vehiclePayment [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.wanted_vehicle.payment"]
    set accountClient_card_fieldsWanted_vehicleBodyType [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.wanted_vehicle.bodyType"]
    set accountClient_card_fieldsWanted_vehicleCategory [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.wanted_vehicle.category"]
    set accountClient_card_fieldsWanted_vehicleModality [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.wanted_vehicle.modality"]
    set accountClient_card_fieldsWanted_vehicleResidual [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.wanted_vehicle.residual"]
    set accountClient_card_fieldsWanted_vehicleSleeping [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.wanted_vehicle.sleeping"]
    set accountClient_card_fieldsWanted_vehicleWarranty [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.wanted_vehicle.warranty"]
    set accountClient_card_fieldsWanted_vehicleFrequency [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.wanted_vehicle.frequency"]
    set accountClient_card_fieldsWanted_vehicleAccessories [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.wanted_vehicle.accessories"]
    set accountClient_card_fieldsWanted_vehicleCategory_rv [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.wanted_vehicle.category_rv"]
    set accountClient_card_fieldsWanted_vehiclePreparation [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.wanted_vehicle.preparation"]
    set accountClient_card_fieldsWanted_vehicleInitial_cash [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.wanted_vehicle.initial_cash"]
    set accountClient_card_fieldsWanted_vehicleOffer_number [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.wanted_vehicle.offer_number"]
    set accountClient_card_fieldsWanted_vehicleOrder_number [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.wanted_vehicle.order_number"]
    set accountClient_card_fieldsWanted_vehicleTransmission [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.wanted_vehicle.transmission"]
    set accountClient_card_fieldsWanted_vehicleDocumentation [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.wanted_vehicle.documentation"]
    set accountClient_card_fieldsWanted_vehicleDrivingWheels [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.wanted_vehicle.drivingWheels"]
    set accountClient_card_fieldsWanted_vehicleColor_exterior [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.wanted_vehicle.color_exterior"]
    set accountClient_card_fieldsWanted_vehicleColor_interior [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.wanted_vehicle.color_interior"]
    set accountClient_card_fieldsWanted_vehicleAllowed_mileage [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.wanted_vehicle.allowed_mileage"]
    set accountClient_card_fieldsWanted_vehicleSecurity_deposit [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.wanted_vehicle.security_deposit"]
    set accountClient_card_fieldsWanted_vehicleEnd_contract_date [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.wanted_vehicle.end_contract_date"]
    set accountClient_card_fieldsExchange_vehicleVin [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.exchange_vehicle.vin"]
    set accountClient_card_fieldsExchange_vehicleFuel [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.exchange_vehicle.fuel"]
    set accountClient_card_fieldsExchange_vehicleLink [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.exchange_vehicle.link"]
    set accountClient_card_fieldsExchange_vehicleRate [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.exchange_vehicle.rate"]
    set accountClient_card_fieldsExchange_vehicleTerm [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.exchange_vehicle.term"]
    set accountClient_card_fieldsExchange_vehicleYear [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.exchange_vehicle.year"]
    set accountClient_card_fieldsExchange_vehicleColor [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.exchange_vehicle.color"]
    set accountClient_card_fieldsExchange_vehiclePrice [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.exchange_vehicle.price"]
    set accountClient_card_fieldsExchange_vehicleStock [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.exchange_vehicle.stock"]
    set accountClient_card_fieldsExchange_vehicleValue [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.exchange_vehicle.value"]
    set accountClient_card_fieldsExchange_vehicleBudget [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.exchange_vehicle.budget"]
    set accountClient_card_fieldsExchange_vehicleEngine [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.exchange_vehicle.engine"]
    set accountClient_card_fieldsExchange_vehicleLength [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.exchange_vehicle.length"]
    set accountClient_card_fieldsExchange_vehicleProfit [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.exchange_vehicle.profit"]
    set accountClient_card_fieldsExchange_vehicleSuffix [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.exchange_vehicle.suffix"]
    set accountClient_card_fieldsExchange_vehicleWeight [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.exchange_vehicle.weight"]
    set accountClient_card_fieldsExchange_vehicleBalance [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.exchange_vehicle.balance"]
    set accountClient_card_fieldsExchange_vehicleComment [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.exchange_vehicle.comment"]
    set accountClient_card_fieldsExchange_vehicleMileage [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.exchange_vehicle.mileage"]
    set accountClient_card_fieldsExchange_vehiclePayment [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.exchange_vehicle.payment"]
    set accountClient_card_fieldsExchange_vehicleRenewal [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.exchange_vehicle.renewal"]
    set accountClient_card_fieldsExchange_vehicleSold_by [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.exchange_vehicle.sold_by"]
    set accountClient_card_fieldsExchange_vehicleBodyType [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.exchange_vehicle.bodyType"]
    set accountClient_card_fieldsExchange_vehicleCategory [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.exchange_vehicle.category"]
    set accountClient_card_fieldsExchange_vehicleModality [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.exchange_vehicle.modality"]
    set accountClient_card_fieldsExchange_vehicleResidual [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.exchange_vehicle.residual"]
    set accountClient_card_fieldsExchange_vehicleSleeping [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.exchange_vehicle.sleeping"]
    set accountClient_card_fieldsExchange_vehicleWarranty [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.exchange_vehicle.warranty"]
    set accountClient_card_fieldsExchange_vehicleCondition [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.exchange_vehicle.condition"]
    set accountClient_card_fieldsExchange_vehicleFrequency [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.exchange_vehicle.frequency"]
    set accountClient_card_fieldsExchange_vehicleIntention [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.exchange_vehicle.intention"]
    set accountClient_card_fieldsExchange_vehicleRefinance [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.exchange_vehicle.refinance"]
    set accountClient_card_fieldsExchange_vehicleRequested [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.exchange_vehicle.requested"]
    set accountClient_card_fieldsExchange_vehicleSold_date [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.exchange_vehicle.sold_date"]
    set accountClient_card_fieldsExchange_vehicleCategory_rv [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.exchange_vehicle.category_rv"]
    set accountClient_card_fieldsExchange_vehicleInstitution [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.exchange_vehicle.institution"]
    set accountClient_card_fieldsExchange_vehicleInitial_cash [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.exchange_vehicle.initial_cash"]
    set accountClient_card_fieldsExchange_vehicleOffer_number [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.exchange_vehicle.offer_number"]
    set accountClient_card_fieldsExchange_vehicleTransmission [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.exchange_vehicle.transmission"]
    set accountClient_card_fieldsExchange_vehicleDrivingWheels [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.exchange_vehicle.drivingWheels"]
    set accountClient_card_fieldsExchange_vehicleColor_exterior [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.exchange_vehicle.color_exterior"]
    set accountClient_card_fieldsExchange_vehicleColor_interior [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.exchange_vehicle.color_interior"]
    set accountClient_card_fieldsExchange_vehicleAllowed_mileage [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.exchange_vehicle.allowed_mileage"]
    set accountClient_card_fieldsExchange_vehicleSecurity_deposit [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.exchange_vehicle.security_deposit"]
    set accountClient_card_fieldsExchange_vehicleEnd_contract_date [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_card_fields.exchange_vehicle.end_contract_date"]
    set accountClient_number [CkJsonObject_BoolOf $jsonResponse "data[i].account.client_number"]
    set accountConfirmation_appt [CkJsonObject_BoolOf $jsonResponse "data[i].account.confirmation_appt"]
    set accountCredit [CkJsonObject_BoolOf $jsonResponse "data[i].account.credit"]
    set accountCsi [CkJsonObject_BoolOf $jsonResponse "data[i].account.csi"]
    set accountCsi_used [CkJsonObject_BoolOf $jsonResponse "data[i].account.csi_used"]
    set accountDefault_deliveryman_user_id [CkJsonObject_stringOf $jsonResponse "data[i].account.default_deliveryman_user_id"]
    set accountDelivered_by [CkJsonObject_BoolOf $jsonResponse "data[i].account.delivered_by"]
    set accountDisable_communication_audio [CkJsonObject_BoolOf $jsonResponse "data[i].account.disable_communication_audio"]
    set accountDuplicates [CkJsonObject_BoolOf $jsonResponse "data[i].account.duplicates"]
    set accountGuest_action [CkJsonObject_BoolOf $jsonResponse "data[i].account.guest_action"]
    set accountEmail_client [CkJsonObject_BoolOf $jsonResponse "data[i].account.email_client"]
    set accountIn_turn [CkJsonObject_BoolOf $jsonResponse "data[i].account.in_turn"]
    set accountIn_turn_director_management [CkJsonObject_BoolOf $jsonResponse "data[i].account.in_turn_director_management"]
    set accountLeads_other_division [CkJsonObject_BoolOf $jsonResponse "data[i].account.leads_other_division"]
    set accountLeadxpress_optionPriority [CkJsonObject_IntOf $jsonResponse "data[i].account.leadxpress_option.priority"]
    set accountLeadxpress_optionReminderFrequency [CkJsonObject_IntOf $jsonResponse "data[i].account.leadxpress_option.reminder.frequency"]
    set accountLeadxpress_optionReminderRecurrence [CkJsonObject_IntOf $jsonResponse "data[i].account.leadxpress_option.reminder.recurrence"]
    set accountLeadxpress_optionScheduleAccount [CkJsonObject_BoolOf $jsonResponse "data[i].account.leadxpress_option.schedule.account"]
    set accountLeadxpress_optionScheduleAdvisor [CkJsonObject_BoolOf $jsonResponse "data[i].account.leadxpress_option.schedule.advisor"]
    set accountLimited_audio_access [CkJsonObject_BoolOf $jsonResponse "data[i].account.limited_audio_access"]
    set accountLogo [CkJsonObject_stringOf $jsonResponse "data[i].account.logo"]
    set accountLogo_en [CkJsonObject_stringOf $jsonResponse "data[i].account.logo_en"]
    set accountMandatory_coordinate [CkJsonObject_BoolOf $jsonResponse "data[i].account.mandatory_coordinate"]
    set accountManually_status [CkJsonObject_BoolOf $jsonResponse "data[i].account.manually_status"]
    set accountMerge_rule [CkJsonObject_stringOf $jsonResponse "data[i].account.merge_rule"]
    set accountMonth_start_day [CkJsonObject_IntOf $jsonResponse "data[i].account.month_start_day"]
    set accountName [CkJsonObject_stringOf $jsonResponse "data[i].account.name"]
    set accountNiotext [CkJsonObject_BoolOf $jsonResponse "data[i].account.niotext"]
    set accountNiotext_phone [CkJsonObject_BoolOf $jsonResponse "data[i].account.niotext_phone"]
    set accountPhone [CkJsonObject_stringOf $jsonResponse "data[i].account.phone"]
    set accountPower_sport [CkJsonObject_BoolOf $jsonResponse "data[i].account.power_sport"]
    set accountProcess [CkJsonObject_BoolOf $jsonResponse "data[i].account.process"]
    set accountRecreative_special [CkJsonObject_BoolOf $jsonResponse "data[i].account.recreative_special"]
    set accountResult_date_validation [CkJsonObject_BoolOf $jsonResponse "data[i].account.result_date_validation"]
    set accountSale_accessories [CkJsonObject_BoolOf $jsonResponse "data[i].account.sale_accessories"]
    set accountSale_by_phone [CkJsonObject_BoolOf $jsonResponse "data[i].account.sale_by_phone"]
    set accountSale_date_month [CkJsonObject_BoolOf $jsonResponse "data[i].account.sale_date_month"]
    set accountSale_table_optionsAccessory_column [CkJsonObject_BoolOf $jsonResponse "data[i].account.sale_table_options.accessory_column"]
    set accountSale_table_optionsCommercial_column [CkJsonObject_BoolOf $jsonResponse "data[i].account.sale_table_options.commercial_column"]
    set accountSale_table_optionsDivision_grouped_total_column [CkJsonObject_BoolOf $jsonResponse "data[i].account.sale_table_options.division_grouped_total_column"]
    set accountSale_validation [CkJsonObject_BoolOf $jsonResponse "data[i].account.sale_validation"]
    set accountScan [CkJsonObject_BoolOf $jsonResponse "data[i].account.scan"]
    set accountStock_required_for_sale [CkJsonObject_BoolOf $jsonResponse "data[i].account.stock_required_for_sale"]
    set accountTake_over_director [CkJsonObject_BoolOf $jsonResponse "data[i].account.take_over_director"]
    set accountTrade_report [CkJsonObject_BoolOf $jsonResponse "data[i].account.trade_report"]
    set accountUnrestricted_assignment [CkJsonObject_BoolOf $jsonResponse "data[i].account.unrestricted_assignment"]
    set accountUnsubscribe [CkJsonObject_BoolOf $jsonResponse "data[i].account.unsubscribe"]
    set accountUntreated_lead [CkJsonObject_BoolOf $jsonResponse "data[i].account.untreated_lead"]
    set accountVehicle_model_text [CkJsonObject_BoolOf $jsonResponse "data[i].account.vehicle_model_text"]
    set accountVehicle_text [CkJsonObject_BoolOf $jsonResponse "data[i].account.vehicle_text"]
    set accountVerified_sale [CkJsonObject_BoolOf $jsonResponse "data[i].account.verified_sale"]
    set accountVin_decoder [CkJsonObject_BoolOf $jsonResponse "data[i].account.vin_decoder"]
    set accountWaiting_sale_date [CkJsonObject_stringOf $jsonResponse "data[i].account.waiting_sale_date"]
    set accountWaiting_sale_option [CkJsonObject_BoolOf $jsonResponse "data[i].account.waiting_sale_option"]
    set advisor [CkJsonObject_stringOf $jsonResponse "data[i].advisor"]
    set j 0
    set count_j [CkJsonObject_SizeOfArray $jsonResponse "data[i].emails"]
    while {$j < $count_j} {
        CkJsonObject_put_J $jsonResponse $j
        set id [CkJsonObject_IntOf $jsonResponse "data[i].emails[j].id"]
        set created_at [CkJsonObject_stringOf $jsonResponse "data[i].emails[j].created_at"]
        set updated_at [CkJsonObject_stringOf $jsonResponse "data[i].emails[j].updated_at"]
        set lead_id [CkJsonObject_IntOf $jsonResponse "data[i].emails[j].lead_id"]
        set address [CkJsonObject_stringOf $jsonResponse "data[i].emails[j].address"]
        set v_type [CkJsonObject_stringOf $jsonResponse "data[i].emails[j].type"]
        set valid [CkJsonObject_BoolOf $jsonResponse "data[i].emails[j].valid"]
        set j [expr $j + 1]
    }
    set j 0
    set count_j [CkJsonObject_SizeOfArray $jsonResponse "data[i].phones"]
    while {$j < $count_j} {
        CkJsonObject_put_J $jsonResponse $j
        set id [CkJsonObject_IntOf $jsonResponse "data[i].phones[j].id"]
        set created_at [CkJsonObject_stringOf $jsonResponse "data[i].phones[j].created_at"]
        set updated_at [CkJsonObject_stringOf $jsonResponse "data[i].phones[j].updated_at"]
        set lead_id [CkJsonObject_IntOf $jsonResponse "data[i].phones[j].lead_id"]
        set extension [CkJsonObject_stringOf $jsonResponse "data[i].phones[j].extension"]
        set number [CkJsonObject_stringOf $jsonResponse "data[i].phones[j].number"]
        set v_type [CkJsonObject_stringOf $jsonResponse "data[i].phones[j].type"]
        set valid [CkJsonObject_BoolOf $jsonResponse "data[i].phones[j].valid"]
        set validated [CkJsonObject_BoolOf $jsonResponse "data[i].phones[j].validated"]
        set mobile [CkJsonObject_BoolOf $jsonResponse "data[i].phones[j].mobile"]
        set j [expr $j + 1]
    }
    set j 0
    set count_j [CkJsonObject_SizeOfArray $jsonResponse "data[i].vehicles"]
    while {$j < $count_j} {
        CkJsonObject_put_J $jsonResponse $j
        set id [CkJsonObject_IntOf $jsonResponse "data[i].vehicles[j].id"]
        set created_at [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].created_at"]
        set updated_at [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].updated_at"]
        set lead_id [CkJsonObject_IntOf $jsonResponse "data[i].vehicles[j].lead_id"]
        set accessories [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].accessories"]
        set allowed_odometer [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].allowed_odometer"]
        set balance [CkJsonObject_IntOf $jsonResponse "data[i].vehicles[j].balance"]
        set budget_max [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].budget_max"]
        set budget_min [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].budget_min"]
        set cash_down [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].cash_down"]
        set category [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].category"]
        set category_rv [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].category_rv"]
        set client_number [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].client_number"]
        set color_exterior [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].color_exterior"]
        set color_interior [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].color_interior"]
        set comment [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].comment"]
        set condition [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].condition"]
        set end_contract_date [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].end_contract_date"]
        set end_warranty_date [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].end_warranty_date"]
        set engine [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].engine"]
        set extended_warranty [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].extended_warranty"]
        set fuel [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].fuel"]
        set length_max [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].length_max"]
        set length_min [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].length_min"]
        set license_plate [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].license_plate"]
        set make [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].make"]
        set modality [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].modality"]
        set model [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].model"]
        set odometer [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].odometer"]
        set offer_number [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].offer_number"]
        set v_option [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].option"]
        set order_number [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].order_number"]
        set payment [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].payment"]
        set payment_frequency [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].payment_frequency"]
        set preparation [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].preparation"]
        set price [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].price"]
        set profit [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].profit"]
        set purchase_date [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].purchase_date"]
        set rate [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].rate"]
        set recall [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].recall"]
        set recorded_date [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].recorded_date"]
        set residual [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].residual"]
        set security_deposit [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].security_deposit"]
        set sleeping [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].sleeping"]
        set sold [CkJsonObject_BoolOf $jsonResponse "data[i].vehicles[j].sold"]
        set sold_by [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].sold_by"]
        set sold_date [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].sold_date"]
        set stock [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].stock"]
        set stock_state [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].stock_state"]
        set term [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].term"]
        set tire [CkJsonObject_BoolOf $jsonResponse "data[i].vehicles[j].tire"]
        set transmission [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].transmission"]
        set trim [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].trim"]
        set v_type [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].type"]
        set url [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].url"]
        set value [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].value"]
        set vin [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].vin"]
        set warranty [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].warranty"]
        set weight [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].weight"]
        set year [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].year"]
        set year_max [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].year_max"]
        set year_min [CkJsonObject_stringOf $jsonResponse "data[i].vehicles[j].year_min"]
        set j [expr $j + 1]
    }
    set j 0
    set count_j [CkJsonObject_SizeOfArray $jsonResponse "data[i].products"]
    while {$j < $count_j} {
        CkJsonObject_put_J $jsonResponse $j
        set j [expr $j + 1]
    }
    set i [expr $i + 1]
}

delete_CkHttp $http
delete_CkJsonObject $jsonResponse

 

© 2000-2024 Chilkat Software, Inc. All Rights Reserved.