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

Visual FoxPro 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

 

 

 

(Visual FoxPro) Etsy: Find Shops

Demonstrates how to find Etsy shops by name or keyword.

For more information, see https://www.etsy.com/developers/documentation/reference/shop

Chilkat ActiveX Downloads

ActiveX for 32-bit and 64-bit Windows

LOCAL loHttp
LOCAL lnSuccess
LOCAL loSbResponseBody
LOCAL loJResp
LOCAL lnRespStatusCode
LOCAL lnShop_id
LOCAL lcShop_name
LOCAL lnUser_id
LOCAL lnCreation_tsz
LOCAL lcTitle
LOCAL lcAnnouncement
LOCAL lcCurrency_code
LOCAL lnIs_vacation
LOCAL lcVacation_message
LOCAL lcSale_message
LOCAL lcDigital_sale_message
LOCAL lnLast_updated_tsz
LOCAL lnListing_active_count
LOCAL lnDigital_listing_count
LOCAL lcLogin_name
LOCAL lnAccepts_custom_requests
LOCAL lcPolicy_welcome
LOCAL lcPolicy_payment
LOCAL lcPolicy_shipping
LOCAL lcPolicy_refunds
LOCAL lcPolicy_additional
LOCAL lcPolicy_seller_info
LOCAL lnPolicy_updated_tsz
LOCAL lnPolicy_has_private_receipt_info
LOCAL lcVacation_autoreply
LOCAL lcUrl
LOCAL lcImage_url_760x100
LOCAL lnNum_favorers
LOCAL lcUpcoming_local_event_id
LOCAL lcIcon_url_fullxfull
LOCAL lnIs_using_structured_policies
LOCAL lnHas_onboarded_structured_policies
LOCAL lnHas_unstructured_policies
LOCAL lnCustom_shops_state
LOCAL lnInclude_dispute_form_link
LOCAL lnIs_direct_checkout_onboarded
LOCAL lcPolicy_privacy
LOCAL lnIs_calculated_eligible
LOCAL lnIs_opted_in_to_buyer_promise
LOCAL lnIs_shop_us_based
LOCAL j
LOCAL lnCount_j
LOCAL lcStrVal
LOCAL lnCount
LOCAL lcParamsShop_name
LOCAL lnParamsLimit
LOCAL lnParamsOffset
LOCAL lcParamsPage
LOCAL lcParamsLat
LOCAL lcParamsLon
LOCAL lnParamsDistance_max
LOCAL lcV_type
LOCAL lnPaginationEffective_limit
LOCAL lnPaginationEffective_offset
LOCAL lcPaginationNext_offset
LOCAL lnPaginationEffective_page
LOCAL lcPaginationNext_page
LOCAL i
LOCAL lnCount_i

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

loHttp = CreateObject('Chilkat_9_5_0.Http')

* Implements the following CURL command:

* curl -X GET \
*   https://openapi.etsy.com/v2/shops?api_key=MY_ETSY_KEYSTRING&shop_name=99heads

loSbResponseBody = CreateObject('Chilkat_9_5_0.StringBuilder')
lnSuccess = loHttp.QuickGetSb("https://openapi.etsy.com/v2/shops?api_key=MY_ETSY_KEYSTRING&shop_name=99heads",loSbResponseBody)
IF (lnSuccess = 0) THEN
    ? loHttp.LastErrorText
    RELEASE loHttp
    RELEASE loSbResponseBody
    CANCEL
ENDIF

loJResp = CreateObject('Chilkat_9_5_0.JsonObject')
loJResp.LoadSb(loSbResponseBody)
loJResp.EmitCompact = 0

? "Response Body:"
? loJResp.Emit()

lnRespStatusCode = loHttp.LastStatus
? "Response Status Code = " + STR(lnRespStatusCode)
IF (lnRespStatusCode >= 400) THEN
    ? "Response Header:"
    ? loHttp.LastHeader
    ? "Failed."
    RELEASE loHttp
    RELEASE loSbResponseBody
    RELEASE loJResp
    CANCEL
ENDIF

* Sample JSON response:
* (Sample code for parsing the JSON response is shown below)

* {
*   "count": 1,
*   "results": [
*     {
*       "shop_id": 6634711,
*       "shop_name": "99heads",
*       "user_id": 17132443,
*       "creation_tsz": 1322509254,
*       "title": "Ceramic Art, Art Objects And Sculptures",
*       "announcement": "Welcome!\nIn our shop, you will find handmade ceramic art , art objects, sculptures  and more unique products made from high quality materials: porcelain, clay, glaze, glass, wood, paper,etc. They are perfect for your personal collection or a gift . Enjoy!\n\n\nVisit our blog   \nhttp:\/\/99heads.com\n\nFacebook page \nhttp:\/\/www.facebook.com\/99heads\n\nPick a head! \n99heads",
*       "currency_code": "USD",
*       "is_vacation": false,
*       "vacation_message": "Vacation, vacation, vacation!\r\n\r\nGone from 02.08 'til 09.08. Coming soon... lots and lots of new stuff, all unique and creative... only on 99heads :)\r\n\r\nBe happy\r\n99heads\r\n\r\nP.S. If there's anything you'd like to say, share, ask:\r\ns_kyorcheva@abv.bg\r\nn_armeykov@abv.bg",
*       "sale_message": "Thank you for choosing our art. We guarantee quality and uniqueness! If you have any questions, requests, complaints or simply want to thank us, please don't hesitate to contact us.",
*       "digital_sale_message": null,
*       "last_updated_tsz": 1562699326,
*       "listing_active_count": 176,
*       "digital_listing_count": 0,
*       "login_name": "99heads",
*       "accepts_custom_requests": true,
*       "policy_welcome": "Welcome!\r\nIn our shop, you will find handmade ceramic art , art objects, prints and more unique products made from high quality materials: porcelain, clay, glaze, glass, wood, paper,etc. They are perfect for your personal collection or a gift . \r\nEnjoy!\r\n\r\nVisit our blog\r\nhttp:\/\/www.99heads.com\r\n\r\nFacebook page\r\nhttp:\/\/www.facebook.com\/99heads\r\n\r\nPick a head!\r\n\r\n99heads",
*       "policy_payment": "SECURE OPTIONS\nEtsy keeps your payment information secure. Sellers don't receive your credit card information.\n- Visa\n- MasterCard\n- American Express\n- Discover\n- PayPal\n- Apple Pay\n- SOFORT Bank Transfer\n- iDEAL\n- Etsy Gift Card",
*       "policy_shipping": "PROCESSING TIME\nThe time I need to prepare an order for shipping varies. For details, see individual items.\n\nESTIMATED SHIPPING TIME\nCanada: 10 - 15 business days\nNorth America: 10 - 15 business days\nEurope: 4 - 10 business days\nAustralia, New Zealand and Oceania: 15 - 20 business days\nAsia Pacific: 15 - 20 business days\nLatin America and the Caribbean: 15 - 20 business days\nNorth Africa and the Middle East: 10 - 20 business days\n\nI'll do my best to meet these shipping estimates, but cannot guarantee them. Actual delivery time will depend on the shipping method you choose.\n\nCUSTOMS AND DUTIES FEES\nBuyers are responsible for any customs or duties fees that may apply. Sellers aren't responsible for delays due to customs",
*       "policy_refunds": "I GLADLY ACCEPT RETURNS, EXCHANGES, AND CANCELLATIONS\nJust contact me within: 14 days of delivery\nShip returns back to me within: 30 days of delivery\nRequest a cancellation within: 12 hours of purchase\n\nTHE FOLLOWING ITEMS CAN'T BE RETURNED\nBecause of the nature of these items, unless they arrive damaged or defective, I can't accept returns for:\n- Custom or personalized orders\n- Items on sale\n\nCONDITIONS OF RETURN\nBuyers are responsible for return shipping costs.\nIf the item is not returned in its original condition, the buyer is responsible for any loss in value.\n\nQUESTIONS ABOUT YOUR ORDER?\nPlease contact me if you have any problems with your order.",
*       "policy_additional": "- This Privacy Policy describes how and when I collect, use, and share information when you purchase an item from me, contact me, or otherwise use my services through Etsy.com or its related sites and services.\n\nThis Privacy Policy does not apply to the practices of third parties that I do not own or control, including Etsy or any third party services you access through Etsy. You can reference the Etsy Privacy Policy to learn more about its privacy practices\n\nInformation I Collect\n\nTo fulfil your order, you must provide me with certain information (which you authorized Etsy to provide to me), such as your name, email address, postal address, payment information, and the details of the product that you\u2019re ordering. You may also choose to provide me with additional personal information (for a custom order), if you contact me directly.\n\n\nWhy I Need Your Information and How I Use It.\n\nI rely on a number of legal bases to collect, use, and share your information, including:\n\n-as needed to provide my services, such as when I use your information to fulfil your order, to settle disputes, or to provide customer support;\n\n-when you have provided your affirmative consent, which you may revoke at any time, such as by signing up for my mailing list;\n\n-if necessary to comply with a legal obligation or court order or in connection with a legal claim, such as retaining information about your purchases if required by tax law; and\n\n-as necessary for the purpose of my legitimate interests, if those legitimate interests are not overridden by your rights or interests, such as 1) providing and improving my services. I use your information to provide the services you requested and in my legitimate interest toimprove my services; and 2) Compliance with the Etsy Seller Policy and Terms of Use. I use your information as necessary to comply with my obligations under the Etsy Seller Policy and Terms of Use.\n\nInformation Sharing and Disclosure\n\nInformation about my customers is important to my business. I share your personal information for very limited reasons and in limited circumstances, as follows:\n\n-Etsy. I share information with Etsy as necessary to provide you my services and comply with my obligations under both the Etsy Seller Policy and Etsy Terms of Use.\n\n-Service providers. I engage certain trusted third parties to perform functions and provide services to my shop, such as delivery companies. I will share your personal information with these third parties, but only to the extent necessary to perform these services.\n\n-Business transfers. If I sell or merge my business, I may disclose your information as part of that transaction, only to the extent permitted by law.\n\n-Compliance with laws. I may collect, use, retain, and share your information if I have a good faith belief that it is reasonably necessary to: (a) respond to legal process or to government requests; (b) enforce my agreements, terms and policies; (c) prevent, investigate, and address fraud and other illegal activity, security, or technical issues; or (d) protect the rights, property, and safety of my customers, or others.\n\nData Retention\n\nI retain your personal information only for as long as necessary to provide you with my services and as described in my Privacy Policy. However, I may also be required to retain this information to comply with my legal and regulatory obligations, to resolve disputes, and to enforce my agreements. I generally keep your data for the following time period: 4 years.\n\nYour Rights\n\nIf you reside in certain territories, including the EU, you have a number of rights in relation to your personal information. While some of these rights apply generally, certain rights apply only in certain limited cases. I describe these rights below:\n\n-Access. You may have the right to access and receive a copy of the personal information I hold about you by contacting me using the contact information below.\n\n-Change, restrict, delete. You may also have rights to change, restrict my use of, or delete your personal information. Absent exceptional circumstances (like where I am required to store data for legal reasons) I will generally delete your personal information upon request.\n\n-Object. You can object to (i) my processing of some of your information based on my legitimate interests and (ii) receiving marketing messages from me after providing your express consent to receive them. In such cases, I will delete your personal information unless I have compelling and legitimate grounds to continue using that information or if it is needed for legal reasons.\n\n-Complain. If you reside in the EU and wish to raise a concern about my use of your information (and without prejudice to any other rights you may have), you have the right to do so with your local data protection authority.\n\nHow to Contact Me\n\nFor purposes of EU data protection law, I, Nikolay Armeykov, am the data controller of your personal information. If you have any questions or concerns, you may contact me at n_armeykov@mail.com\n\nGIFT WRAPPING AND PACKAGING\n\u0410vailable\n\nCUSTOM AND PERSONALIZED ORDERS\nCustom orders are welcome! Also, for change of color, form or size- please send a message. Custom orders may take longer to ship, depending on the inquiry\n\nWHOLESALE AVAILABILITY\nWholesale orders are welcome!\n\nSHIPPING METHOD\n* All items ship via Priority Registered Air Mail with tracking number delivered after signature. \n* Registered mail provides a solid proof of shipping; It's tracking, however, depends on the recipient's country postal carrier conditions (not all countries support detailed online tracking)\n* Registered mail is one of the most reliable and secure way of shipping and always requires signature upon delivery. If you are not at home, the postal carrier must leave a notice that your package is available for pick up from the post office.\n*** IMPORTANT: If a package is not claimed within 15-20 days it will be returned to the sender.",
*       "policy_seller_info": "",
*       "policy_updated_tsz": 1526481567,
*       "policy_has_private_receipt_info": false,
*       "vacation_autoreply": "Vacation, vacation, vacation!\r\n\r\nGone from 02.08 'til 09.08. Coming soon... lots and lots of new stuff, all unique and creative... only on 99heads :)\r\n\r\nBe happy\r\n99heads",
*       "url": "https:\/\/www.etsy.com\/shop\/99heads?utm_source=chilkattest&utm_medium=api&utm_campaign=api",
*       "image_url_760x100": "https:\/\/i.etsystatic.com\/iusb\/ef5376\/17693876\/iusb_760x100.17693876_e6ux.jpg?version=0",
*       "num_favorers": 7818,
*       "languages": [
*         "en-US"
*       ],
*       "upcoming_local_event_id": null,
*       "icon_url_fullxfull": "https:\/\/i.etsystatic.com\/isla\/06ca66\/20243353\/isla_fullxfull.20243353_1lcm8gl8.jpg?version=0",
*       "is_using_structured_policies": true,
*       "has_onboarded_structured_policies": true,
*       "has_unstructured_policies": true,
*       "custom_shops_state": 3,
*       "include_dispute_form_link": false,
*       "is_direct_checkout_onboarded": true,
*       "policy_privacy": "This Privacy Policy describes how and when I collect, use, and share information when you purchase an item from me, contact me, or otherwise use my services through Etsy.com or its related sites and services.\n\nThis Privacy Policy does not apply to the practices of third parties that I do not own or control, including Etsy or any third party services you access through Etsy. You can reference the Etsy Privacy Policy to learn more about its privacy practices\n\nInformation I Collect\n\nTo fulfil your order, you must provide me with certain information (which you authorized Etsy to provide to me), such as your name, email address, postal address, payment information, and the details of the product that you\u2019re ordering. You may also choose to provide me with additional personal information (for a custom order), if you contact me directly.\n\n\nWhy I Need Your Information and How I Use It.\n\nI rely on a number of legal bases to collect, use, and share your information, including:\n\n-as needed to provide my services, such as when I use your information to fulfil your order, to settle disputes, or to provide customer support;\n\n-when you have provided your affirmative consent, which you may revoke at any time, such as by signing up for my mailing list;\n\n-if necessary to comply with a legal obligation or court order or in connection with a legal claim, such as retaining information about your purchases if required by tax law; and\n\n-as necessary for the purpose of my legitimate interests, if those legitimate interests are not overridden by your rights or interests, such as 1) providing and improving my services. I use your information to provide the services you requested and in my legitimate interest toimprove my services; and 2) Compliance with the Etsy Seller Policy and Terms of Use. I use your information as necessary to comply with my obligations under the Etsy Seller Policy and Terms of Use.\n\nInformation Sharing and Disclosure\n\nInformation about my customers is important to my business. I share your personal information for very limited reasons and in limited circumstances, as follows:\n\n-Etsy. I share information with Etsy as necessary to provide you my services and comply with my obligations under both the Etsy Seller Policy and Etsy Terms of Use.\n\n-Service providers. I engage certain trusted third parties to perform functions and provide services to my shop, such as delivery companies. I will share your personal information with these third parties, but only to the extent necessary to perform these services.\n\n-Business transfers. If I sell or merge my business, I may disclose your information as part of that transaction, only to the extent permitted by law.\n\n-Compliance with laws. I may collect, use, retain, and share your information if I have a good faith belief that it is reasonably necessary to: (a) respond to legal process or to government requests; (b) enforce my agreements, terms and policies; (c) prevent, investigate, and address fraud and other illegal activity, security, or technical issues; or (d) protect the rights, property, and safety of my customers, or others.\n\nData Retention\n\nI retain your personal information only for as long as necessary to provide you with my services and as described in my Privacy Policy. However, I may also be required to retain this information to comply with my legal and regulatory obligations, to resolve disputes, and to enforce my agreements. I generally keep your data for the following time period: 4 years.\n\nYour Rights\n\nIf you reside in certain territories, including the EU, you have a number of rights in relation to your personal information. While some of these rights apply generally, certain rights apply only in certain limited cases. I describe these rights below:\n\n-Access. You may have the right to access and receive a copy of the personal information I hold about you by contacting me using the contact information below.\n\n-Change, restrict, delete. You may also have rights to change, restrict my use of, or delete your personal information. Absent exceptional circumstances (like where I am required to store data for legal reasons) I will generally delete your personal information upon request.\n\n-Object. You can object to (i) my processing of some of your information based on my legitimate interests and (ii) receiving marketing messages from me after providing your express consent to receive them. In such cases, I will delete your personal information unless I have compelling and legitimate grounds to continue using that information or if it is needed for legal reasons.\n\n-Complain. If you reside in the EU and wish to raise a concern about my use of your information (and without prejudice to any other rights you may have), you have the right to do so with your local data protection authority.\n\nHow to Contact Me\n\nFor purposes of EU data protection law, I, Nikolay Armeykov, am the data controller of your personal information. If you have any questions or concerns, you may contact me at n_armeykov@mail.com",
*       "is_calculated_eligible": false,
*       "is_opted_in_to_buyer_promise": false,
*       "is_shop_us_based": false
*     }
*   ],
*   "params": {
*     "shop_name": "99heads",
*     "limit": 25,
*     "offset": 0,
*     "page": null,
*     "lat": null,
*     "lon": null,
*     "distance_max": 35
*   },
*   "type": "Shop",
*   "pagination": {
*     "effective_limit": 25,
*     "effective_offset": 0,
*     "next_offset": null,
*     "effective_page": 1,
*     "next_page": null
*   }
* }

* Sample code for parsing the JSON response...
* Use the following online tool to generate parsing code from sample JSON:
* Generate Parsing Code from JSON

lnCount = loJResp.IntOf("count")
lcParamsShop_name = loJResp.StringOf("params.shop_name")
lnParamsLimit = loJResp.IntOf("params.limit")
lnParamsOffset = loJResp.IntOf("params.offset")
lcParamsPage = loJResp.StringOf("params.page")
lcParamsLat = loJResp.StringOf("params.lat")
lcParamsLon = loJResp.StringOf("params.lon")
lnParamsDistance_max = loJResp.IntOf("params.distance_max")
lcV_type = loJResp.StringOf("type")
lnPaginationEffective_limit = loJResp.IntOf("pagination.effective_limit")
lnPaginationEffective_offset = loJResp.IntOf("pagination.effective_offset")
lcPaginationNext_offset = loJResp.StringOf("pagination.next_offset")
lnPaginationEffective_page = loJResp.IntOf("pagination.effective_page")
lcPaginationNext_page = loJResp.StringOf("pagination.next_page")
i = 0
lnCount_i = loJResp.SizeOfArray("results")
DO WHILE i < lnCount_i
    loJResp.I = i
    lnShop_id = loJResp.IntOf("results[i].shop_id")
    lcShop_name = loJResp.StringOf("results[i].shop_name")
    lnUser_id = loJResp.IntOf("results[i].user_id")
    lnCreation_tsz = loJResp.IntOf("results[i].creation_tsz")
    lcTitle = loJResp.StringOf("results[i].title")
    lcAnnouncement = loJResp.StringOf("results[i].announcement")
    lcCurrency_code = loJResp.StringOf("results[i].currency_code")
    lnIs_vacation = loJResp.BoolOf("results[i].is_vacation")
    lcVacation_message = loJResp.StringOf("results[i].vacation_message")
    lcSale_message = loJResp.StringOf("results[i].sale_message")
    lcDigital_sale_message = loJResp.StringOf("results[i].digital_sale_message")
    lnLast_updated_tsz = loJResp.IntOf("results[i].last_updated_tsz")
    lnListing_active_count = loJResp.IntOf("results[i].listing_active_count")
    lnDigital_listing_count = loJResp.IntOf("results[i].digital_listing_count")
    lcLogin_name = loJResp.StringOf("results[i].login_name")
    lnAccepts_custom_requests = loJResp.BoolOf("results[i].accepts_custom_requests")
    lcPolicy_welcome = loJResp.StringOf("results[i].policy_welcome")
    lcPolicy_payment = loJResp.StringOf("results[i].policy_payment")
    lcPolicy_shipping = loJResp.StringOf("results[i].policy_shipping")
    lcPolicy_refunds = loJResp.StringOf("results[i].policy_refunds")
    lcPolicy_additional = loJResp.StringOf("results[i].policy_additional")
    lcPolicy_seller_info = loJResp.StringOf("results[i].policy_seller_info")
    lnPolicy_updated_tsz = loJResp.IntOf("results[i].policy_updated_tsz")
    lnPolicy_has_private_receipt_info = loJResp.BoolOf("results[i].policy_has_private_receipt_info")
    lcVacation_autoreply = loJResp.StringOf("results[i].vacation_autoreply")
    lcUrl = loJResp.StringOf("results[i].url")
    lcImage_url_760x100 = loJResp.StringOf("results[i].image_url_760x100")
    lnNum_favorers = loJResp.IntOf("results[i].num_favorers")
    lcUpcoming_local_event_id = loJResp.StringOf("results[i].upcoming_local_event_id")
    lcIcon_url_fullxfull = loJResp.StringOf("results[i].icon_url_fullxfull")
    lnIs_using_structured_policies = loJResp.BoolOf("results[i].is_using_structured_policies")
    lnHas_onboarded_structured_policies = loJResp.BoolOf("results[i].has_onboarded_structured_policies")
    lnHas_unstructured_policies = loJResp.BoolOf("results[i].has_unstructured_policies")
    lnCustom_shops_state = loJResp.IntOf("results[i].custom_shops_state")
    lnInclude_dispute_form_link = loJResp.BoolOf("results[i].include_dispute_form_link")
    lnIs_direct_checkout_onboarded = loJResp.BoolOf("results[i].is_direct_checkout_onboarded")
    lcPolicy_privacy = loJResp.StringOf("results[i].policy_privacy")
    lnIs_calculated_eligible = loJResp.BoolOf("results[i].is_calculated_eligible")
    lnIs_opted_in_to_buyer_promise = loJResp.BoolOf("results[i].is_opted_in_to_buyer_promise")
    lnIs_shop_us_based = loJResp.BoolOf("results[i].is_shop_us_based")
    j = 0
    lnCount_j = loJResp.SizeOfArray("results[i].languages")
    DO WHILE j < lnCount_j
        loJResp.J = j
        lcStrVal = loJResp.StringOf("results[i].languages[j]")
        j = j + 1
    ENDDO
    i = i + 1
ENDDO

RELEASE loHttp
RELEASE loSbResponseBody
RELEASE loJResp


 

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