(Visual Basic 6.0) 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 ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

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

Dim http As New ChilkatHttp

http.AuthToken = "ACCESS_TOKEN"

http.Accept = "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

Dim jsonRequestBody As New ChilkatJsonObject
success = jsonRequestBody.UpdateString("account_id","MY_ACCOUNT_ID")
success = jsonRequestBody.UpdateString("first_name","John")
success = jsonRequestBody.UpdateString("last_name","Doe")
success = jsonRequestBody.UpdateString("type","email")
success = jsonRequestBody.UpdateString("advisor.first_name","John")
success = jsonRequestBody.UpdateString("advisor.last_name","Doe")
success = jsonRequestBody.UpdateString("emails[0].address","hello@example.com")
success = jsonRequestBody.UpdateString("emails[0].type","home")
success = jsonRequestBody.UpdateString("phones[0].number","+15144321214")
success = jsonRequestBody.UpdateInt("phones[0].extension",12345)
success = jsonRequestBody.UpdateString("phones[0].type","home")
success = jsonRequestBody.UpdateString("vehicles[0].make","Aston Martin")
success = jsonRequestBody.UpdateString("vehicles[0].model","DB11")
success = jsonRequestBody.UpdateInt("vehicles[0].year",2018)
success = jsonRequestBody.UpdateString("vehicles[0].type","wanted")

Dim url As String
url = "https://crm.activix.ca/api/v2/leads"

Dim resp As ChilkatHttpResponse
Set resp = http.PText("POST",url,jsonRequestBody.Emit(),"utf-8","application/json",0,0)
If (http.LastMethodSuccess <> 1) Then
    Debug.Print http.LastErrorText
    Exit Sub
End If

Debug.Print "Response Status Code: " & resp.StatusCode

Dim jsonResponse As New ChilkatJsonObject
success = jsonResponse.Load(resp.BodyStr)
jsonResponse.EmitCompact = 0
Debug.Print jsonResponse.Emit()

If (resp.StatusCode >= 300) Then
    Debug.Print "Failed."

    Exit Sub
End If

' 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,
'                 ...
'             },
'             ...
'         ]
'     }
' }

Dim dataId As Long
Dim dataCreated_at As String
Dim dataUpdated_at As String
Dim dataAccount_id As Long
Dim dataAddress_line1 As String
Dim dataAddress_line2 As String
Dim dataAppointment_date As String
Dim dataAppt_call As String
Dim dataAvailable_date As String
Dim dataAverage_spending As String
Dim dataBe_back_date As String
Dim dataBirth_date As String
Dim dataBusiness As String
Dim dataCall_date As String
Dim dataCity As String
Dim dataCivility As String
Dim dataCode As String
Dim dataCountry As String
Dim dataCsi_date As String
Dim dataDelivered_by_id As String
Dim dataDelivered_date As String
Dim dataDelivery_date As String
Dim dataDivision As String
Dim dataEnd_service_date As String
Dim dataFirst_name As String
Dim dataGas As String
Dim dataGender As Long
Dim dataInvoiced As String
Dim dataLast_name As String
Dim dataLast_visit_date As String
Dim dataLocale As String
Dim dataLoyalty As String
Dim dataNext_visit_date As String
Dim dataOdometer_last_visit As String
Dim dataOpen_work_order_date As String
Dim dataPlanned_pick_up_date As String
Dim dataPostal_code As String
Dim dataPrepaid As String
Dim dataPrepared As String
Dim dataPresented_date As String
Dim dataPromised_date As String
Dim dataProvince As String
Dim dataRating As String
Dim dataReached_client As String
Dim dataRefinanced_date As String
Dim dataRepair_date As String
Dim dataRepair_order As String
Dim dataResult As String
Dim dataRoad_test_date As String
Dim dataSale_date As String
Dim dataSecond_contact As String
Dim dataSecond_contact_civility As String
Dim dataSegment As String
Dim dataService_cleaned As String
Dim dataService_interval_km As String
Dim dataService_monthly_km As String
Dim dataSex As String
Dim dataSource As String
Dim dataStatus As String
Dim dataStorage As String
Dim dataTake_over_date As String
Dim dataType As String
Dim dataUnsubscribe_all_date As String
Dim dataUnsubscribe_call_date As String
Dim dataUnsubscribe_email_date As String
Dim dataUnsubscribe_sms_date As String
Dim dataWork_order As String
Dim dataAccountId As Long
Dim dataAccountCreated_at As String
Dim dataAccountUpdated_at As String
Dim dataAccountPartner_id As Long
Dim dataAccountActivity_report As Long
Dim dataAccountCommercial As Long
Dim dataAccountEvent As Long
Dim dataAccountLeadxpress As Long
Dim dataAccountLoyalty As Long
Dim dataAccountPhone_up As Long
Dim dataAccountRenewal As Long
Dim dataAccountSale_table As Long
Dim dataAccountService As Long
Dim dataAccountWalk_in As Long
Dim dataAccountWebboost As Long
Dim dataAccountAccount_manager As Long
Dim dataAccountActivation_date As String
Dim dataAccountActive As Long
Dim dataAccountAssigned_lead As Long
Dim dataAccountAuto_renewal As Long
Dim dataAccountAuto_renewal_new As Long
Dim dataAccountAuto_renewal_used As Long
Dim dataAccountAutomation As Long
Dim dataAccountBdc_advisor As Long
Dim dataAccountCalendar_options As Long
Dim dataAccountClient_card_fieldsProcessGas As Long
Dim dataAccountClient_card_fieldsProcessRecorded As Long
Dim dataAccountClient_card_fieldsProcessAvailable As Long
Dim dataAccountClient_card_fieldsProcessDiscounted As Long
Dim dataAccountClient_card_fieldsCommercialProfit As Long
Dim dataAccountClient_card_fieldsCommercialExclude As Long
Dim dataAccountClient_card_fieldsCommercialMeeting As Long
Dim dataAccountClient_card_fieldsPerformanceDeposit As Long
Dim dataAccountClient_card_fieldsPerformanceRefinanced As Long
Dim dataAccountClient_card_fieldsPerformanceDealer_tour As Long
Dim dataAccountClient_card_fieldsPerformanceWalk_around As Long
Dim dataAccountClient_card_fieldsPerformanceQualification As Long
Dim dataAccountClient_card_fieldsPerformanceTwenty_four_hour As Long
Dim dataAccountClient_card_fieldsGeneral_infoBudget As Long
Dim dataAccountClient_card_fieldsGeneral_infoSector As Long
Dim dataAccountClient_card_fieldsGeneral_infoCustom_1 As Long
Dim dataAccountClient_card_fieldsGeneral_infoCustom_2 As Long
Dim dataAccountClient_card_fieldsGeneral_infoCustom_3 As Long
Dim dataAccountClient_card_fieldsGeneral_infoCustom_4 As Long
Dim dataAccountClient_card_fieldsGeneral_infoCustom_5 As Long
Dim dataAccountClient_card_fieldsGeneral_infoCustom_6 As Long
Dim dataAccountClient_card_fieldsGeneral_infoCustom_7 As Long
Dim dataAccountClient_card_fieldsGeneral_infoCustom_8 As Long
Dim dataAccountClient_card_fieldsGeneral_infoCustom_9 As Long
Dim dataAccountClient_card_fieldsGeneral_infoCustom_10 As Long
Dim dataAccountClient_card_fieldsGeneral_infoCommunication_preference As Long
Dim dataAccountClient_card_fieldsWanted_vehicleVin As Long
Dim dataAccountClient_card_fieldsWanted_vehicleFuel As Long
Dim dataAccountClient_card_fieldsWanted_vehicleRate As Long
Dim dataAccountClient_card_fieldsWanted_vehicleTerm As Long
Dim dataAccountClient_card_fieldsWanted_vehicleTire As Long
Dim dataAccountClient_card_fieldsWanted_vehicleYear As Long
Dim dataAccountClient_card_fieldsWanted_vehicleColor As Long
Dim dataAccountClient_card_fieldsWanted_vehiclePrice As Long
Dim dataAccountClient_card_fieldsWanted_vehicleStock As Long
Dim dataAccountClient_card_fieldsWanted_vehicleTotal As Long
Dim dataAccountClient_card_fieldsWanted_vehicleBudget As Long
Dim dataAccountClient_card_fieldsWanted_vehicleEngine As Long
Dim dataAccountClient_card_fieldsWanted_vehicleLength As Long
Dim dataAccountClient_card_fieldsWanted_vehicleProfit As Long
Dim dataAccountClient_card_fieldsWanted_vehicleSuffix As Long
Dim dataAccountClient_card_fieldsWanted_vehicleWeight As Long
Dim dataAccountClient_card_fieldsWanted_vehicleComment As Long
Dim dataAccountClient_card_fieldsWanted_vehicleMileage As Long
Dim dataAccountClient_card_fieldsWanted_vehiclePayment As Long
Dim dataAccountClient_card_fieldsWanted_vehicleBodyType As Long
Dim dataAccountClient_card_fieldsWanted_vehicleCategory As Long
Dim dataAccountClient_card_fieldsWanted_vehicleModality As Long
Dim dataAccountClient_card_fieldsWanted_vehicleResidual As Long
Dim dataAccountClient_card_fieldsWanted_vehicleSleeping As Long
Dim dataAccountClient_card_fieldsWanted_vehicleWarranty As Long
Dim dataAccountClient_card_fieldsWanted_vehicleFrequency As Long
Dim dataAccountClient_card_fieldsWanted_vehicleAccessories As Long
Dim dataAccountClient_card_fieldsWanted_vehicleCategory_rv As Long
Dim dataAccountClient_card_fieldsWanted_vehiclePreparation As Long
Dim dataAccountClient_card_fieldsWanted_vehicleInitial_cash As Long
Dim dataAccountClient_card_fieldsWanted_vehicleOffer_number As Long
Dim dataAccountClient_card_fieldsWanted_vehicleOrder_number As Long
Dim dataAccountClient_card_fieldsWanted_vehicleTransmission As Long
Dim dataAccountClient_card_fieldsWanted_vehicleDocumentation As Long
Dim dataAccountClient_card_fieldsWanted_vehicleDrivingWheels As Long
Dim dataAccountClient_card_fieldsWanted_vehicleColor_exterior As Long
Dim dataAccountClient_card_fieldsWanted_vehicleColor_interior As Long
Dim dataAccountClient_card_fieldsWanted_vehicleAllowed_mileage As Long
Dim dataAccountClient_card_fieldsWanted_vehicleSecurity_deposit As Long
Dim dataAccountClient_card_fieldsWanted_vehicleEnd_contract_date As Long
Dim dataAccountClient_card_fieldsExchange_vehicleVin As Long
Dim dataAccountClient_card_fieldsExchange_vehicleFuel As Long
Dim dataAccountClient_card_fieldsExchange_vehicleLink As Long
Dim dataAccountClient_card_fieldsExchange_vehicleRate As Long
Dim dataAccountClient_card_fieldsExchange_vehicleTerm As Long
Dim dataAccountClient_card_fieldsExchange_vehicleYear As Long
Dim dataAccountClient_card_fieldsExchange_vehicleColor As Long
Dim dataAccountClient_card_fieldsExchange_vehiclePrice As Long
Dim dataAccountClient_card_fieldsExchange_vehicleStock As Long
Dim dataAccountClient_card_fieldsExchange_vehicleValue As Long
Dim dataAccountClient_card_fieldsExchange_vehicleBudget As Long
Dim dataAccountClient_card_fieldsExchange_vehicleEngine As Long
Dim dataAccountClient_card_fieldsExchange_vehicleLength As Long
Dim dataAccountClient_card_fieldsExchange_vehicleProfit As Long
Dim dataAccountClient_card_fieldsExchange_vehicleSuffix As Long
Dim dataAccountClient_card_fieldsExchange_vehicleWeight As Long
Dim dataAccountClient_card_fieldsExchange_vehicleBalance As Long
Dim dataAccountClient_card_fieldsExchange_vehicleComment As Long
Dim dataAccountClient_card_fieldsExchange_vehicleMileage As Long
Dim dataAccountClient_card_fieldsExchange_vehiclePayment As Long
Dim dataAccountClient_card_fieldsExchange_vehicleRenewal As Long
Dim dataAccountClient_card_fieldsExchange_vehicleSold_by As Long
Dim dataAccountClient_card_fieldsExchange_vehicleBodyType As Long
Dim dataAccountClient_card_fieldsExchange_vehicleCategory As Long
Dim dataAccountClient_card_fieldsExchange_vehicleModality As Long
Dim dataAccountClient_card_fieldsExchange_vehicleResidual As Long
Dim dataAccountClient_card_fieldsExchange_vehicleSleeping As Long
Dim dataAccountClient_card_fieldsExchange_vehicleWarranty As Long
Dim dataAccountClient_card_fieldsExchange_vehicleCondition As Long
Dim dataAccountClient_card_fieldsExchange_vehicleFrequency As Long
Dim dataAccountClient_card_fieldsExchange_vehicleIntention As Long
Dim dataAccountClient_card_fieldsExchange_vehicleRefinance As Long
Dim dataAccountClient_card_fieldsExchange_vehicleRequested As Long
Dim dataAccountClient_card_fieldsExchange_vehicleSold_date As Long
Dim dataAccountClient_card_fieldsExchange_vehicleCategory_rv As Long
Dim dataAccountClient_card_fieldsExchange_vehicleInstitution As Long
Dim dataAccountClient_card_fieldsExchange_vehicleInitial_cash As Long
Dim dataAccountClient_card_fieldsExchange_vehicleOffer_number As Long
Dim dataAccountClient_card_fieldsExchange_vehicleTransmission As Long
Dim dataAccountClient_card_fieldsExchange_vehicleDrivingWheels As Long
Dim dataAccountClient_card_fieldsExchange_vehicleColor_exterior As Long
Dim dataAccountClient_card_fieldsExchange_vehicleColor_interior As Long
Dim dataAccountClient_card_fieldsExchange_vehicleAllowed_mileage As Long
Dim dataAccountClient_card_fieldsExchange_vehicleSecurity_deposit As Long
Dim dataAccountClient_card_fieldsExchange_vehicleEnd_contract_date As Long
Dim dataAccountClient_number As Long
Dim dataAccountConfirmation_appt As Long
Dim dataAccountCredit As Long
Dim dataAccountCsi As Long
Dim dataAccountCsi_used As Long
Dim dataAccountDefault_deliveryman_user_id As String
Dim dataAccountDelivered_by As Long
Dim dataAccountDisable_communication_audio As Long
Dim dataAccountDuplicates As Long
Dim dataAccountGuest_action As Long
Dim dataAccountEmail_client As Long
Dim dataAccountIn_turn As Long
Dim dataAccountIn_turn_director_management As Long
Dim dataAccountLeads_other_division As Long
Dim dataAccountLeadxpress_optionPriority As Long
Dim dataAccountLeadxpress_optionReminderFrequency As Long
Dim dataAccountLeadxpress_optionReminderRecurrence As Long
Dim dataAccountLeadxpress_optionScheduleAccount As Long
Dim dataAccountLeadxpress_optionScheduleAdvisor As Long
Dim dataAccountLimited_audio_access As Long
Dim dataAccountLogo As String
Dim dataAccountLogo_en As String
Dim dataAccountMandatory_coordinate As Long
Dim dataAccountManually_status As Long
Dim dataAccountMerge_rule As String
Dim dataAccountMonth_start_day As Long
Dim dataAccountName As String
Dim dataAccountNiotext As Long
Dim dataAccountNiotext_phone As Long
Dim dataAccountPhone As String
Dim dataAccountPower_sport As Long
Dim dataAccountProcess As Long
Dim dataAccountRecreative_special As Long
Dim dataAccountResult_date_validation As Long
Dim dataAccountSale_accessories As Long
Dim dataAccountSale_by_phone As Long
Dim dataAccountSale_date_month As Long
Dim dataAccountSale_table_optionsAccessory_column As Long
Dim dataAccountSale_table_optionsCommercial_column As Long
Dim dataAccountSale_table_optionsDivision_grouped_total_column As Long
Dim dataAccountSale_validation As Long
Dim dataAccountScan As Long
Dim dataAccountStock_required_for_sale As Long
Dim dataAccountTake_over_director As Long
Dim dataAccountTrade_report As Long
Dim dataAccountUnrestricted_assignment As Long
Dim dataAccountUnsubscribe As Long
Dim dataAccountUntreated_lead As Long
Dim dataAccountVehicle_model_text As Long
Dim dataAccountVehicle_text As Long
Dim dataAccountVerified_sale As Long
Dim dataAccountVin_decoder As Long
Dim dataAccountWaiting_sale_date As String
Dim dataAccountWaiting_sale_option As Long
Dim dataAdvisor As String
Dim dataBdc As String
Dim dataCommercial As String
Dim dataService_advisor As String
Dim dataService_agent As String
Dim i As Long
Dim count_i As Long
Dim id As Long
Dim created_at As String
Dim updated_at As String
Dim lead_id As Long
Dim address As String
Dim v_type As String
Dim valid As Long
Dim extension As String
Dim number As String
Dim validated As Long
Dim mobile As Long
Dim accessories As String
Dim allowed_odometer As String
Dim balance As Long
Dim budget_max As String
Dim budget_min As String
Dim cash_down As String
Dim category As String
Dim category_rv As String
Dim client_number As String
Dim color_exterior As String
Dim color_interior As String
Dim comment As String
Dim condition As String
Dim end_contract_date As String
Dim end_warranty_date As String
Dim engine As String
Dim extended_warranty As String
Dim fuel As String
Dim length_max As String
Dim length_min As String
Dim license_plate As String
Dim make As String
Dim modality As String
Dim model As String
Dim odometer As String
Dim offer_number As String
Dim v_option As String
Dim order_number As String
Dim payment As String
Dim payment_frequency As String
Dim preparation As String
Dim price As String
Dim profit As String
Dim purchase_date As String
Dim rate As String
Dim recall As String
Dim recorded_date As String
Dim residual As String
Dim security_deposit As String
Dim sleeping As String
Dim sold As Long
Dim sold_by As String
Dim sold_date As String
Dim stock As String
Dim stock_state As String
Dim term As String
Dim tire As Long
Dim transmission As String
Dim trim As String
Dim url As String
Dim value As String
Dim vin As String
Dim warranty As String
Dim weight As String
Dim year As String
Dim year_max As String
Dim year_min As String

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