Chilkat Examples

ChilkatHOMEAndroid™Classic ASPCC++C#Mono C#.NET Core C#C# UWP/WinRTDataFlexDelphi ActiveXDelphi DLLVisual FoxProJavaLianjaMFCObjective-CPerlPHP ActiveXPHP ExtensionPowerBuilderPowerShellPureBasicCkPythonChilkat2-PythonRubySQL ServerSwift 2Swift 3/4TclUnicode CUnicode C++Visual Basic 6.0VB.NETVB.NET UWP/WinRTVBScriptXojo PluginNode.jsExcelGo

Tcl Web API Examples

Primary Categories

AWS Translate
Activix CRM
Adyen
Amazon MWS
Azure Maps
Azure Monitor
Azure OAuth2
Azure Storage Accounts
Bluzone
CardConnect
ClickBank
Clickatell
Cloudfare
DocuSign
ETrade
Etsy
Facebook
GeoOp
GetHarvest
Jira
MYOB

Magento
Microsoft Calendar
Microsoft Group
Microsoft Tasks and Plans
Okta OAuth/OIDC
OneLogin OIDC
PayPal
Peoplevox
Populi
QuickBooks
SOAP finkok.com
Shippo
Shopify
Stripe
SugarCRM
Trello
Twitter
VoiceBase
Vonage
Walmart
Walmart v3
Xero
eBay
effectconnect

 

 

 

(Tcl) Activix CRM Create a Lead

Demonstrates how to create a lead and returns the created lead.

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"

# The following JSON is sent in the request body:

# {
#   "account_id": "MY_ACCOUNT_ID",
#   "first_name": "John",
#   "last_name": "Doe",
#   "type": "email",
#   "advisor": {
#     "first_name": "John",
#     "last_name": "Doe"
#   },
#   "emails": [
#     {
#       "address": "hello@example.com",
#       "type": "home"
#     }
#   ],
#   "phones": [
#     {
#       "number": "+15144321214",
#       "extension": 12345,
#       "type": "home"
#     }
#   ],
#   "vehicles": [
#     {
#       "make": "Aston Martin",
#       "model": "DB11",
#       "year": 2018,
#       "type": "wanted"
#     }
#   ]
# }

# Use this online tool to generate the code from sample JSON: 
# Generate Code to Create JSON

set jsonRequestBody [new_CkJsonObject]

CkJsonObject_UpdateString $jsonRequestBody "account_id" "MY_ACCOUNT_ID"
CkJsonObject_UpdateString $jsonRequestBody "first_name" "John"
CkJsonObject_UpdateString $jsonRequestBody "last_name" "Doe"
CkJsonObject_UpdateString $jsonRequestBody "type" "email"
CkJsonObject_UpdateString $jsonRequestBody "advisor.first_name" "John"
CkJsonObject_UpdateString $jsonRequestBody "advisor.last_name" "Doe"
CkJsonObject_UpdateString $jsonRequestBody "emails[0].address" "hello@example.com"
CkJsonObject_UpdateString $jsonRequestBody "emails[0].type" "home"
CkJsonObject_UpdateString $jsonRequestBody "phones[0].number" "+15144321214"
CkJsonObject_UpdateInt $jsonRequestBody "phones[0].extension" 12345
CkJsonObject_UpdateString $jsonRequestBody "phones[0].type" "home"
CkJsonObject_UpdateString $jsonRequestBody "vehicles[0].make" "Aston Martin"
CkJsonObject_UpdateString $jsonRequestBody "vehicles[0].model" "DB11"
CkJsonObject_UpdateInt $jsonRequestBody "vehicles[0].year" 2018
CkJsonObject_UpdateString $jsonRequestBody "vehicles[0].type" "wanted"

set url "https://crm.activix.ca/api/v2/leads"

# resp is a CkHttpResponse
set resp [CkHttp_PText $http "POST" $url [CkJsonObject_emit $jsonRequestBody] "utf-8" "application/json" 0 0]
if {[expr [CkHttp_get_LastMethodSuccess $http] != 1]} then {
    puts [CkHttp_lastErrorText $http]
    delete_CkHttp $http
    delete_CkJsonObject $jsonRequestBody
    exit
}

puts "Response Status Code: [CkHttpResponse_get_StatusCode $resp]"

set jsonResponse [new_CkJsonObject]

CkJsonObject_Load $jsonResponse [CkHttpResponse_bodyStr $resp]
CkJsonObject_put_EmitCompact $jsonResponse 0
puts [CkJsonObject_emit $jsonResponse]

if {[expr [CkHttpResponse_get_StatusCode $resp] >= 300]} then {
    puts "Failed."
    delete_CkHttpResponse $resp

    delete_CkHttp $http
    delete_CkJsonObject $jsonRequestBody
    delete_CkJsonObject $jsonResponse
    exit
}

delete_CkHttpResponse $resp

# Sample output...
# (See the parsing code below..)
# 
# Use the 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,
#                 ...
#             },
#             ...
#         ]
#     }
# }

set dataId [CkJsonObject_IntOf $jsonResponse "data.id"]
set dataCreated_at [CkJsonObject_stringOf $jsonResponse "data.created_at"]
set dataUpdated_at [CkJsonObject_stringOf $jsonResponse "data.updated_at"]
set dataAccount_id [CkJsonObject_IntOf $jsonResponse "data.account_id"]
set dataAddress_line1 [CkJsonObject_stringOf $jsonResponse "data.address_line1"]
set dataAddress_line2 [CkJsonObject_stringOf $jsonResponse "data.address_line2"]
set dataAppointment_date [CkJsonObject_stringOf $jsonResponse "data.appointment_date"]
set dataAppt_call [CkJsonObject_stringOf $jsonResponse "data.appt_call"]
set dataAvailable_date [CkJsonObject_stringOf $jsonResponse "data.available_date"]
set dataAverage_spending [CkJsonObject_stringOf $jsonResponse "data.average_spending"]
set dataBe_back_date [CkJsonObject_stringOf $jsonResponse "data.be_back_date"]
set dataBirth_date [CkJsonObject_stringOf $jsonResponse "data.birth_date"]
set dataBusiness [CkJsonObject_stringOf $jsonResponse "data.business"]
set dataCall_date [CkJsonObject_stringOf $jsonResponse "data.call_date"]
set dataCity [CkJsonObject_stringOf $jsonResponse "data.city"]
set dataCivility [CkJsonObject_stringOf $jsonResponse "data.civility"]
set dataCode [CkJsonObject_stringOf $jsonResponse "data.code"]
set dataCountry [CkJsonObject_stringOf $jsonResponse "data.country"]
set dataCsi_date [CkJsonObject_stringOf $jsonResponse "data.csi_date"]
set dataDelivered_by_id [CkJsonObject_stringOf $jsonResponse "data.delivered_by_id"]
set dataDelivered_date [CkJsonObject_stringOf $jsonResponse "data.delivered_date"]
set dataDelivery_date [CkJsonObject_stringOf $jsonResponse "data.delivery_date"]
set dataDivision [CkJsonObject_stringOf $jsonResponse "data.division"]
set dataEnd_service_date [CkJsonObject_stringOf $jsonResponse "data.end_service_date"]
set dataFirst_name [CkJsonObject_stringOf $jsonResponse "data.first_name"]
set dataGas [CkJsonObject_stringOf $jsonResponse "data.gas"]
set dataGender [CkJsonObject_IntOf $jsonResponse "data.gender"]
set dataInvoiced [CkJsonObject_stringOf $jsonResponse "data.invoiced"]
set dataLast_name [CkJsonObject_stringOf $jsonResponse "data.last_name"]
set dataLast_visit_date [CkJsonObject_stringOf $jsonResponse "data.last_visit_date"]
set dataLocale [CkJsonObject_stringOf $jsonResponse "data.locale"]
set dataLoyalty [CkJsonObject_stringOf $jsonResponse "data.loyalty"]
set dataNext_visit_date [CkJsonObject_stringOf $jsonResponse "data.next_visit_date"]
set dataOdometer_last_visit [CkJsonObject_stringOf $jsonResponse "data.odometer_last_visit"]
set dataOpen_work_order_date [CkJsonObject_stringOf $jsonResponse "data.open_work_order_date"]
set dataPlanned_pick_up_date [CkJsonObject_stringOf $jsonResponse "data.planned_pick_up_date"]
set dataPostal_code [CkJsonObject_stringOf $jsonResponse "data.postal_code"]
set dataPrepaid [CkJsonObject_stringOf $jsonResponse "data.prepaid"]
set dataPrepared [CkJsonObject_stringOf $jsonResponse "data.prepared"]
set dataPresented_date [CkJsonObject_stringOf $jsonResponse "data.presented_date"]
set dataPromised_date [CkJsonObject_stringOf $jsonResponse "data.promised_date"]
set dataProvince [CkJsonObject_stringOf $jsonResponse "data.province"]
set dataRating [CkJsonObject_stringOf $jsonResponse "data.rating"]
set dataReached_client [CkJsonObject_stringOf $jsonResponse "data.reached_client"]
set dataRefinanced_date [CkJsonObject_stringOf $jsonResponse "data.refinanced_date"]
set dataRepair_date [CkJsonObject_stringOf $jsonResponse "data.repair_date"]
set dataRepair_order [CkJsonObject_stringOf $jsonResponse "data.repair_order"]
set dataResult [CkJsonObject_stringOf $jsonResponse "data.result"]
set dataRoad_test_date [CkJsonObject_stringOf $jsonResponse "data.road_test_date"]
set dataSale_date [CkJsonObject_stringOf $jsonResponse "data.sale_date"]
set dataSecond_contact [CkJsonObject_stringOf $jsonResponse "data.second_contact"]
set dataSecond_contact_civility [CkJsonObject_stringOf $jsonResponse "data.second_contact_civility"]
set dataSegment [CkJsonObject_stringOf $jsonResponse "data.segment"]
set dataService_cleaned [CkJsonObject_stringOf $jsonResponse "data.service_cleaned"]
set dataService_interval_km [CkJsonObject_stringOf $jsonResponse "data.service_interval_km"]
set dataService_monthly_km [CkJsonObject_stringOf $jsonResponse "data.service_monthly_km"]
set dataSex [CkJsonObject_stringOf $jsonResponse "data.sex"]
set dataSource [CkJsonObject_stringOf $jsonResponse "data.source"]
set dataStatus [CkJsonObject_stringOf $jsonResponse "data.status"]
set dataStorage [CkJsonObject_stringOf $jsonResponse "data.storage"]
set dataTake_over_date [CkJsonObject_stringOf $jsonResponse "data.take_over_date"]
set dataType [CkJsonObject_stringOf $jsonResponse "data.type"]
set dataUnsubscribe_all_date [CkJsonObject_stringOf $jsonResponse "data.unsubscribe_all_date"]
set dataUnsubscribe_call_date [CkJsonObject_stringOf $jsonResponse "data.unsubscribe_call_date"]
set dataUnsubscribe_email_date [CkJsonObject_stringOf $jsonResponse "data.unsubscribe_email_date"]
set dataUnsubscribe_sms_date [CkJsonObject_stringOf $jsonResponse "data.unsubscribe_sms_date"]
set dataWork_order [CkJsonObject_stringOf $jsonResponse "data.work_order"]
set dataAccountId [CkJsonObject_IntOf $jsonResponse "data.account.id"]
set dataAccountCreated_at [CkJsonObject_stringOf $jsonResponse "data.account.created_at"]
set dataAccountUpdated_at [CkJsonObject_stringOf $jsonResponse "data.account.updated_at"]
set dataAccountPartner_id [CkJsonObject_IntOf $jsonResponse "data.account.partner_id"]
set dataAccountActivity_report [CkJsonObject_BoolOf $jsonResponse "data.account.activity_report"]
set dataAccountCommercial [CkJsonObject_BoolOf $jsonResponse "data.account.commercial"]
set dataAccountEvent [CkJsonObject_BoolOf $jsonResponse "data.account.event"]
set dataAccountLeadxpress [CkJsonObject_BoolOf $jsonResponse "data.account.leadxpress"]
set dataAccountLoyalty [CkJsonObject_BoolOf $jsonResponse "data.account.loyalty"]
set dataAccountPhone_up [CkJsonObject_BoolOf $jsonResponse "data.account.phone_up"]
set dataAccountRenewal [CkJsonObject_BoolOf $jsonResponse "data.account.renewal"]
set dataAccountSale_table [CkJsonObject_BoolOf $jsonResponse "data.account.sale_table"]
set dataAccountService [CkJsonObject_BoolOf $jsonResponse "data.account.service"]
set dataAccountWalk_in [CkJsonObject_BoolOf $jsonResponse "data.account.walk_in"]
set dataAccountWebboost [CkJsonObject_BoolOf $jsonResponse "data.account.webboost"]
set dataAccountAccount_manager [CkJsonObject_BoolOf $jsonResponse "data.account.account_manager"]
set dataAccountActivation_date [CkJsonObject_stringOf $jsonResponse "data.account.activation_date"]
set dataAccountActive [CkJsonObject_BoolOf $jsonResponse "data.account.active"]
set dataAccountAssigned_lead [CkJsonObject_BoolOf $jsonResponse "data.account.assigned_lead"]
set dataAccountAuto_renewal [CkJsonObject_BoolOf $jsonResponse "data.account.auto_renewal"]
set dataAccountAuto_renewal_new [CkJsonObject_BoolOf $jsonResponse "data.account.auto_renewal_new"]
set dataAccountAuto_renewal_used [CkJsonObject_BoolOf $jsonResponse "data.account.auto_renewal_used"]
set dataAccountAutomation [CkJsonObject_BoolOf $jsonResponse "data.account.automation"]
set dataAccountBdc_advisor [CkJsonObject_BoolOf $jsonResponse "data.account.bdc_advisor"]
set dataAccountCalendar_options [CkJsonObject_BoolOf $jsonResponse "data.account.calendar_options"]
set dataAccountClient_card_fieldsProcessGas [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.process.gas"]
set dataAccountClient_card_fieldsProcessRecorded [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.process.recorded"]
set dataAccountClient_card_fieldsProcessAvailable [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.process.available"]
set dataAccountClient_card_fieldsProcessDiscounted [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.process.discounted"]
set dataAccountClient_card_fieldsCommercialProfit [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.commercial.profit"]
set dataAccountClient_card_fieldsCommercialExclude [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.commercial.exclude"]
set dataAccountClient_card_fieldsCommercialMeeting [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.commercial.meeting"]
set dataAccountClient_card_fieldsPerformanceDeposit [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.performance.deposit"]
set dataAccountClient_card_fieldsPerformanceRefinanced [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.performance.refinanced"]
set dataAccountClient_card_fieldsPerformanceDealer_tour [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.performance.dealer_tour"]
set dataAccountClient_card_fieldsPerformanceWalk_around [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.performance.walk_around"]
set dataAccountClient_card_fieldsPerformanceQualification [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.performance.qualification"]
set dataAccountClient_card_fieldsPerformanceTwenty_four_hour [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.performance.twenty_four_hour"]
set dataAccountClient_card_fieldsGeneral_infoBudget [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.general_info.budget"]
set dataAccountClient_card_fieldsGeneral_infoSector [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.general_info.sector"]
set dataAccountClient_card_fieldsGeneral_infoCustom_1 [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.general_info.custom_1"]
set dataAccountClient_card_fieldsGeneral_infoCustom_2 [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.general_info.custom_2"]
set dataAccountClient_card_fieldsGeneral_infoCustom_3 [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.general_info.custom_3"]
set dataAccountClient_card_fieldsGeneral_infoCustom_4 [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.general_info.custom_4"]
set dataAccountClient_card_fieldsGeneral_infoCustom_5 [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.general_info.custom_5"]
set dataAccountClient_card_fieldsGeneral_infoCustom_6 [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.general_info.custom_6"]
set dataAccountClient_card_fieldsGeneral_infoCustom_7 [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.general_info.custom_7"]
set dataAccountClient_card_fieldsGeneral_infoCustom_8 [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.general_info.custom_8"]
set dataAccountClient_card_fieldsGeneral_infoCustom_9 [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.general_info.custom_9"]
set dataAccountClient_card_fieldsGeneral_infoCustom_10 [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.general_info.custom_10"]
set dataAccountClient_card_fieldsGeneral_infoCommunication_preference [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.general_info.communication_preference"]
set dataAccountClient_card_fieldsWanted_vehicleVin [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.wanted_vehicle.vin"]
set dataAccountClient_card_fieldsWanted_vehicleFuel [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.wanted_vehicle.fuel"]
set dataAccountClient_card_fieldsWanted_vehicleRate [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.wanted_vehicle.rate"]
set dataAccountClient_card_fieldsWanted_vehicleTerm [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.wanted_vehicle.term"]
set dataAccountClient_card_fieldsWanted_vehicleTire [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.wanted_vehicle.tire"]
set dataAccountClient_card_fieldsWanted_vehicleYear [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.wanted_vehicle.year"]
set dataAccountClient_card_fieldsWanted_vehicleColor [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.wanted_vehicle.color"]
set dataAccountClient_card_fieldsWanted_vehiclePrice [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.wanted_vehicle.price"]
set dataAccountClient_card_fieldsWanted_vehicleStock [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.wanted_vehicle.stock"]
set dataAccountClient_card_fieldsWanted_vehicleTotal [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.wanted_vehicle.total"]
set dataAccountClient_card_fieldsWanted_vehicleBudget [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.wanted_vehicle.budget"]
set dataAccountClient_card_fieldsWanted_vehicleEngine [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.wanted_vehicle.engine"]
set dataAccountClient_card_fieldsWanted_vehicleLength [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.wanted_vehicle.length"]
set dataAccountClient_card_fieldsWanted_vehicleProfit [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.wanted_vehicle.profit"]
set dataAccountClient_card_fieldsWanted_vehicleSuffix [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.wanted_vehicle.suffix"]
set dataAccountClient_card_fieldsWanted_vehicleWeight [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.wanted_vehicle.weight"]
set dataAccountClient_card_fieldsWanted_vehicleComment [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.wanted_vehicle.comment"]
set dataAccountClient_card_fieldsWanted_vehicleMileage [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.wanted_vehicle.mileage"]
set dataAccountClient_card_fieldsWanted_vehiclePayment [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.wanted_vehicle.payment"]
set dataAccountClient_card_fieldsWanted_vehicleBodyType [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.wanted_vehicle.bodyType"]
set dataAccountClient_card_fieldsWanted_vehicleCategory [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.wanted_vehicle.category"]
set dataAccountClient_card_fieldsWanted_vehicleModality [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.wanted_vehicle.modality"]
set dataAccountClient_card_fieldsWanted_vehicleResidual [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.wanted_vehicle.residual"]
set dataAccountClient_card_fieldsWanted_vehicleSleeping [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.wanted_vehicle.sleeping"]
set dataAccountClient_card_fieldsWanted_vehicleWarranty [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.wanted_vehicle.warranty"]
set dataAccountClient_card_fieldsWanted_vehicleFrequency [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.wanted_vehicle.frequency"]
set dataAccountClient_card_fieldsWanted_vehicleAccessories [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.wanted_vehicle.accessories"]
set dataAccountClient_card_fieldsWanted_vehicleCategory_rv [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.wanted_vehicle.category_rv"]
set dataAccountClient_card_fieldsWanted_vehiclePreparation [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.wanted_vehicle.preparation"]
set dataAccountClient_card_fieldsWanted_vehicleInitial_cash [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.wanted_vehicle.initial_cash"]
set dataAccountClient_card_fieldsWanted_vehicleOffer_number [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.wanted_vehicle.offer_number"]
set dataAccountClient_card_fieldsWanted_vehicleOrder_number [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.wanted_vehicle.order_number"]
set dataAccountClient_card_fieldsWanted_vehicleTransmission [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.wanted_vehicle.transmission"]
set dataAccountClient_card_fieldsWanted_vehicleDocumentation [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.wanted_vehicle.documentation"]
set dataAccountClient_card_fieldsWanted_vehicleDrivingWheels [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.wanted_vehicle.drivingWheels"]
set dataAccountClient_card_fieldsWanted_vehicleColor_exterior [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.wanted_vehicle.color_exterior"]
set dataAccountClient_card_fieldsWanted_vehicleColor_interior [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.wanted_vehicle.color_interior"]
set dataAccountClient_card_fieldsWanted_vehicleAllowed_mileage [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.wanted_vehicle.allowed_mileage"]
set dataAccountClient_card_fieldsWanted_vehicleSecurity_deposit [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.wanted_vehicle.security_deposit"]
set dataAccountClient_card_fieldsWanted_vehicleEnd_contract_date [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.wanted_vehicle.end_contract_date"]
set dataAccountClient_card_fieldsExchange_vehicleVin [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.exchange_vehicle.vin"]
set dataAccountClient_card_fieldsExchange_vehicleFuel [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.exchange_vehicle.fuel"]
set dataAccountClient_card_fieldsExchange_vehicleLink [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.exchange_vehicle.link"]
set dataAccountClient_card_fieldsExchange_vehicleRate [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.exchange_vehicle.rate"]
set dataAccountClient_card_fieldsExchange_vehicleTerm [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.exchange_vehicle.term"]
set dataAccountClient_card_fieldsExchange_vehicleYear [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.exchange_vehicle.year"]
set dataAccountClient_card_fieldsExchange_vehicleColor [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.exchange_vehicle.color"]
set dataAccountClient_card_fieldsExchange_vehiclePrice [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.exchange_vehicle.price"]
set dataAccountClient_card_fieldsExchange_vehicleStock [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.exchange_vehicle.stock"]
set dataAccountClient_card_fieldsExchange_vehicleValue [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.exchange_vehicle.value"]
set dataAccountClient_card_fieldsExchange_vehicleBudget [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.exchange_vehicle.budget"]
set dataAccountClient_card_fieldsExchange_vehicleEngine [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.exchange_vehicle.engine"]
set dataAccountClient_card_fieldsExchange_vehicleLength [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.exchange_vehicle.length"]
set dataAccountClient_card_fieldsExchange_vehicleProfit [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.exchange_vehicle.profit"]
set dataAccountClient_card_fieldsExchange_vehicleSuffix [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.exchange_vehicle.suffix"]
set dataAccountClient_card_fieldsExchange_vehicleWeight [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.exchange_vehicle.weight"]
set dataAccountClient_card_fieldsExchange_vehicleBalance [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.exchange_vehicle.balance"]
set dataAccountClient_card_fieldsExchange_vehicleComment [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.exchange_vehicle.comment"]
set dataAccountClient_card_fieldsExchange_vehicleMileage [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.exchange_vehicle.mileage"]
set dataAccountClient_card_fieldsExchange_vehiclePayment [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.exchange_vehicle.payment"]
set dataAccountClient_card_fieldsExchange_vehicleRenewal [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.exchange_vehicle.renewal"]
set dataAccountClient_card_fieldsExchange_vehicleSold_by [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.exchange_vehicle.sold_by"]
set dataAccountClient_card_fieldsExchange_vehicleBodyType [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.exchange_vehicle.bodyType"]
set dataAccountClient_card_fieldsExchange_vehicleCategory [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.exchange_vehicle.category"]
set dataAccountClient_card_fieldsExchange_vehicleModality [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.exchange_vehicle.modality"]
set dataAccountClient_card_fieldsExchange_vehicleResidual [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.exchange_vehicle.residual"]
set dataAccountClient_card_fieldsExchange_vehicleSleeping [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.exchange_vehicle.sleeping"]
set dataAccountClient_card_fieldsExchange_vehicleWarranty [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.exchange_vehicle.warranty"]
set dataAccountClient_card_fieldsExchange_vehicleCondition [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.exchange_vehicle.condition"]
set dataAccountClient_card_fieldsExchange_vehicleFrequency [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.exchange_vehicle.frequency"]
set dataAccountClient_card_fieldsExchange_vehicleIntention [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.exchange_vehicle.intention"]
set dataAccountClient_card_fieldsExchange_vehicleRefinance [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.exchange_vehicle.refinance"]
set dataAccountClient_card_fieldsExchange_vehicleRequested [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.exchange_vehicle.requested"]
set dataAccountClient_card_fieldsExchange_vehicleSold_date [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.exchange_vehicle.sold_date"]
set dataAccountClient_card_fieldsExchange_vehicleCategory_rv [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.exchange_vehicle.category_rv"]
set dataAccountClient_card_fieldsExchange_vehicleInstitution [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.exchange_vehicle.institution"]
set dataAccountClient_card_fieldsExchange_vehicleInitial_cash [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.exchange_vehicle.initial_cash"]
set dataAccountClient_card_fieldsExchange_vehicleOffer_number [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.exchange_vehicle.offer_number"]
set dataAccountClient_card_fieldsExchange_vehicleTransmission [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.exchange_vehicle.transmission"]
set dataAccountClient_card_fieldsExchange_vehicleDrivingWheels [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.exchange_vehicle.drivingWheels"]
set dataAccountClient_card_fieldsExchange_vehicleColor_exterior [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.exchange_vehicle.color_exterior"]
set dataAccountClient_card_fieldsExchange_vehicleColor_interior [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.exchange_vehicle.color_interior"]
set dataAccountClient_card_fieldsExchange_vehicleAllowed_mileage [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.exchange_vehicle.allowed_mileage"]
set dataAccountClient_card_fieldsExchange_vehicleSecurity_deposit [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.exchange_vehicle.security_deposit"]
set dataAccountClient_card_fieldsExchange_vehicleEnd_contract_date [CkJsonObject_BoolOf $jsonResponse "data.account.client_card_fields.exchange_vehicle.end_contract_date"]
set dataAccountClient_number [CkJsonObject_BoolOf $jsonResponse "data.account.client_number"]
set dataAccountConfirmation_appt [CkJsonObject_BoolOf $jsonResponse "data.account.confirmation_appt"]
set dataAccountCredit [CkJsonObject_BoolOf $jsonResponse "data.account.credit"]
set dataAccountCsi [CkJsonObject_BoolOf $jsonResponse "data.account.csi"]
set dataAccountCsi_used [CkJsonObject_BoolOf $jsonResponse "data.account.csi_used"]
set dataAccountDefault_deliveryman_user_id [CkJsonObject_stringOf $jsonResponse "data.account.default_deliveryman_user_id"]
set dataAccountDelivered_by [CkJsonObject_BoolOf $jsonResponse "data.account.delivered_by"]
set dataAccountDisable_communication_audio [CkJsonObject_BoolOf $jsonResponse "data.account.disable_communication_audio"]
set dataAccountDuplicates [CkJsonObject_BoolOf $jsonResponse "data.account.duplicates"]
set dataAccountGuest_action [CkJsonObject_BoolOf $jsonResponse "data.account.guest_action"]
set dataAccountEmail_client [CkJsonObject_BoolOf $jsonResponse "data.account.email_client"]
set dataAccountIn_turn [CkJsonObject_BoolOf $jsonResponse "data.account.in_turn"]
set dataAccountIn_turn_director_management [CkJsonObject_BoolOf $jsonResponse "data.account.in_turn_director_management"]
set dataAccountLeads_other_division [CkJsonObject_BoolOf $jsonResponse "data.account.leads_other_division"]
set dataAccountLeadxpress_optionPriority [CkJsonObject_IntOf $jsonResponse "data.account.leadxpress_option.priority"]
set dataAccountLeadxpress_optionReminderFrequency [CkJsonObject_IntOf $jsonResponse "data.account.leadxpress_option.reminder.frequency"]
set dataAccountLeadxpress_optionReminderRecurrence [CkJsonObject_IntOf $jsonResponse "data.account.leadxpress_option.reminder.recurrence"]
set dataAccountLeadxpress_optionScheduleAccount [CkJsonObject_BoolOf $jsonResponse "data.account.leadxpress_option.schedule.account"]
set dataAccountLeadxpress_optionScheduleAdvisor [CkJsonObject_BoolOf $jsonResponse "data.account.leadxpress_option.schedule.advisor"]
set dataAccountLimited_audio_access [CkJsonObject_BoolOf $jsonResponse "data.account.limited_audio_access"]
set dataAccountLogo [CkJsonObject_stringOf $jsonResponse "data.account.logo"]
set dataAccountLogo_en [CkJsonObject_stringOf $jsonResponse "data.account.logo_en"]
set dataAccountMandatory_coordinate [CkJsonObject_BoolOf $jsonResponse "data.account.mandatory_coordinate"]
set dataAccountManually_status [CkJsonObject_BoolOf $jsonResponse "data.account.manually_status"]
set dataAccountMerge_rule [CkJsonObject_stringOf $jsonResponse "data.account.merge_rule"]
set dataAccountMonth_start_day [CkJsonObject_IntOf $jsonResponse "data.account.month_start_day"]
set dataAccountName [CkJsonObject_stringOf $jsonResponse "data.account.name"]
set dataAccountNiotext [CkJsonObject_BoolOf $jsonResponse "data.account.niotext"]
set dataAccountNiotext_phone [CkJsonObject_BoolOf $jsonResponse "data.account.niotext_phone"]
set dataAccountPhone [CkJsonObject_stringOf $jsonResponse "data.account.phone"]
set dataAccountPower_sport [CkJsonObject_BoolOf $jsonResponse "data.account.power_sport"]
set dataAccountProcess [CkJsonObject_BoolOf $jsonResponse "data.account.process"]
set dataAccountRecreative_special [CkJsonObject_BoolOf $jsonResponse "data.account.recreative_special"]
set dataAccountResult_date_validation [CkJsonObject_BoolOf $jsonResponse "data.account.result_date_validation"]
set dataAccountSale_accessories [CkJsonObject_BoolOf $jsonResponse "data.account.sale_accessories"]
set dataAccountSale_by_phone [CkJsonObject_BoolOf $jsonResponse "data.account.sale_by_phone"]
set dataAccountSale_date_month [CkJsonObject_BoolOf $jsonResponse "data.account.sale_date_month"]
set dataAccountSale_table_optionsAccessory_column [CkJsonObject_BoolOf $jsonResponse "data.account.sale_table_options.accessory_column"]
set dataAccountSale_table_optionsCommercial_column [CkJsonObject_BoolOf $jsonResponse "data.account.sale_table_options.commercial_column"]
set dataAccountSale_table_optionsDivision_grouped_total_column [CkJsonObject_BoolOf $jsonResponse "data.account.sale_table_options.division_grouped_total_column"]
set dataAccountSale_validation [CkJsonObject_BoolOf $jsonResponse "data.account.sale_validation"]
set dataAccountScan [CkJsonObject_BoolOf $jsonResponse "data.account.scan"]
set dataAccountStock_required_for_sale [CkJsonObject_BoolOf $jsonResponse "data.account.stock_required_for_sale"]
set dataAccountTake_over_director [CkJsonObject_BoolOf $jsonResponse "data.account.take_over_director"]
set dataAccountTrade_report [CkJsonObject_BoolOf $jsonResponse "data.account.trade_report"]
set dataAccountUnrestricted_assignment [CkJsonObject_BoolOf $jsonResponse "data.account.unrestricted_assignment"]
set dataAccountUnsubscribe [CkJsonObject_BoolOf $jsonResponse "data.account.unsubscribe"]
set dataAccountUntreated_lead [CkJsonObject_BoolOf $jsonResponse "data.account.untreated_lead"]
set dataAccountVehicle_model_text [CkJsonObject_BoolOf $jsonResponse "data.account.vehicle_model_text"]
set dataAccountVehicle_text [CkJsonObject_BoolOf $jsonResponse "data.account.vehicle_text"]
set dataAccountVerified_sale [CkJsonObject_BoolOf $jsonResponse "data.account.verified_sale"]
set dataAccountVin_decoder [CkJsonObject_BoolOf $jsonResponse "data.account.vin_decoder"]
set dataAccountWaiting_sale_date [CkJsonObject_stringOf $jsonResponse "data.account.waiting_sale_date"]
set dataAccountWaiting_sale_option [CkJsonObject_BoolOf $jsonResponse "data.account.waiting_sale_option"]
set dataAdvisor [CkJsonObject_stringOf $jsonResponse "data.advisor"]
set dataBdc [CkJsonObject_stringOf $jsonResponse "data.bdc"]
set dataCommercial [CkJsonObject_stringOf $jsonResponse "data.commercial"]
set dataService_advisor [CkJsonObject_stringOf $jsonResponse "data.service_advisor"]
set dataService_agent [CkJsonObject_stringOf $jsonResponse "data.service_agent"]
set i 0
set count_i [CkJsonObject_SizeOfArray $jsonResponse "data.service_process"]
while {[expr $i < $count_i]} {
    CkJsonObject_put_I $jsonResponse $i
    set i [expr $i + 1]
}
set i 0
set count_i [CkJsonObject_SizeOfArray $jsonResponse "data.emails"]
while {[expr $i < $count_i]} {
    CkJsonObject_put_I $jsonResponse $i
    set id [CkJsonObject_IntOf $jsonResponse "data.emails[i].id"]
    set created_at [CkJsonObject_stringOf $jsonResponse "data.emails[i].created_at"]
    set updated_at [CkJsonObject_stringOf $jsonResponse "data.emails[i].updated_at"]
    set lead_id [CkJsonObject_IntOf $jsonResponse "data.emails[i].lead_id"]
    set address [CkJsonObject_stringOf $jsonResponse "data.emails[i].address"]
    set v_type [CkJsonObject_stringOf $jsonResponse "data.emails[i].type"]
    set valid [CkJsonObject_BoolOf $jsonResponse "data.emails[i].valid"]
    set i [expr $i + 1]
}
set i 0
set count_i [CkJsonObject_SizeOfArray $jsonResponse "data.phones"]
while {[expr $i < $count_i]} {
    CkJsonObject_put_I $jsonResponse $i
    set id [CkJsonObject_IntOf $jsonResponse "data.phones[i].id"]
    set created_at [CkJsonObject_stringOf $jsonResponse "data.phones[i].created_at"]
    set updated_at [CkJsonObject_stringOf $jsonResponse "data.phones[i].updated_at"]
    set lead_id [CkJsonObject_IntOf $jsonResponse "data.phones[i].lead_id"]
    set extension [CkJsonObject_stringOf $jsonResponse "data.phones[i].extension"]
    set number [CkJsonObject_stringOf $jsonResponse "data.phones[i].number"]
    set v_type [CkJsonObject_stringOf $jsonResponse "data.phones[i].type"]
    set valid [CkJsonObject_BoolOf $jsonResponse "data.phones[i].valid"]
    set validated [CkJsonObject_BoolOf $jsonResponse "data.phones[i].validated"]
    set mobile [CkJsonObject_BoolOf $jsonResponse "data.phones[i].mobile"]
    set i [expr $i + 1]
}
set i 0
set count_i [CkJsonObject_SizeOfArray $jsonResponse "data.vehicles"]
while {[expr $i < $count_i]} {
    CkJsonObject_put_I $jsonResponse $i
    set id [CkJsonObject_IntOf $jsonResponse "data.vehicles[i].id"]
    set created_at [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].created_at"]
    set updated_at [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].updated_at"]
    set lead_id [CkJsonObject_IntOf $jsonResponse "data.vehicles[i].lead_id"]
    set accessories [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].accessories"]
    set allowed_odometer [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].allowed_odometer"]
    set balance [CkJsonObject_IntOf $jsonResponse "data.vehicles[i].balance"]
    set budget_max [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].budget_max"]
    set budget_min [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].budget_min"]
    set cash_down [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].cash_down"]
    set category [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].category"]
    set category_rv [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].category_rv"]
    set client_number [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].client_number"]
    set color_exterior [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].color_exterior"]
    set color_interior [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].color_interior"]
    set comment [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].comment"]
    set condition [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].condition"]
    set end_contract_date [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].end_contract_date"]
    set end_warranty_date [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].end_warranty_date"]
    set engine [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].engine"]
    set extended_warranty [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].extended_warranty"]
    set fuel [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].fuel"]
    set length_max [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].length_max"]
    set length_min [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].length_min"]
    set license_plate [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].license_plate"]
    set make [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].make"]
    set modality [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].modality"]
    set model [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].model"]
    set odometer [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].odometer"]
    set offer_number [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].offer_number"]
    set v_option [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].option"]
    set order_number [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].order_number"]
    set payment [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].payment"]
    set payment_frequency [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].payment_frequency"]
    set preparation [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].preparation"]
    set price [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].price"]
    set profit [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].profit"]
    set purchase_date [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].purchase_date"]
    set rate [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].rate"]
    set recall [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].recall"]
    set recorded_date [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].recorded_date"]
    set residual [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].residual"]
    set security_deposit [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].security_deposit"]
    set sleeping [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].sleeping"]
    set sold [CkJsonObject_BoolOf $jsonResponse "data.vehicles[i].sold"]
    set sold_by [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].sold_by"]
    set sold_date [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].sold_date"]
    set stock [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].stock"]
    set stock_state [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].stock_state"]
    set term [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].term"]
    set tire [CkJsonObject_BoolOf $jsonResponse "data.vehicles[i].tire"]
    set transmission [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].transmission"]
    set trim [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].trim"]
    set v_type [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].type"]
    set url [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].url"]
    set value [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].value"]
    set vin [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].vin"]
    set warranty [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].warranty"]
    set weight [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].weight"]
    set year [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].year"]
    set year_max [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].year_max"]
    set year_min [CkJsonObject_stringOf $jsonResponse "data.vehicles[i].year_min"]
    set i [expr $i + 1]
}
set i 0
set count_i [CkJsonObject_SizeOfArray $jsonResponse "data.related_ids"]
while {[expr $i < $count_i]} {
    CkJsonObject_put_I $jsonResponse $i
    set i [expr $i + 1]
}

delete_CkHttp $http
delete_CkJsonObject $jsonRequestBody
delete_CkJsonObject $jsonResponse

 

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