Chilkat Online Tools

Xojo / Alpaca Crypto Data / Latest Quote

Back to Collection Items

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

Dim http As New Chilkat.Http
Dim success As Boolean

Dim queryParams As New Chilkat.JsonObject
success = queryParams.UpdateString("exchange","ERSX")

http.SetRequestHeader "Apca-Api-Secret-Key","{{APCA_API_SECRET_KEY}}"
http.SetRequestHeader "Apca-Api-Key-Id","{{APCA_API_KEY_ID}}"

Dim resp As Chilkat.HttpResponse
resp = http.QuickRequestParams("GET","https://{{HOST}}/v1beta1/crypto/:symbol/quotes/latest",queryParams)
If (http.LastMethodSuccess = False) Then
    System.DebugLog(http.LastErrorText)
    Return
End If

System.DebugLog(Str(resp.StatusCode))
System.DebugLog(resp.BodyStr)

Curl Command

curl -G -d "exchange=ERSX"
	-H "Apca-Api-Key-Id: {{APCA_API_KEY_ID}}"
	-H "Apca-Api-Secret-Key: {{APCA_API_SECRET_KEY}}"
https://{{HOST}}/v1beta1/crypto/:symbol/quotes/latest

Postman Collection Item JSON

{
  "name": "Latest Quote",
  "request": {
    "method": "GET",
    "header": [
      {
        "key": "Apca-Api-Key-Id",
        "value": "{{APCA_API_KEY_ID}}",
        "type": "text"
      },
      {
        "key": "Apca-Api-Secret-Key",
        "value": "{{APCA_API_SECRET_KEY}}",
        "type": "text"
      }
    ],
    "url": {
      "raw": "https://{{HOST}}/v1beta1/crypto/:symbol/quotes/latest?exchange=ERSX",
      "protocol": "https",
      "host": [
        "{{HOST}}"
      ],
      "path": [
        "v1beta1",
        "crypto",
        ":symbol",
        "quotes",
        "latest"
      ],
      "query": [
        {
          "key": "exchange",
          "value": "ERSX",
          "description": "One of the following exchanges: ERSX, GNSS, CBSE or FTX"
        }
      ],
      "variable": [
        {
          "key": "symbol",
          "value": "BTCUSD"
        }
      ]
    }
  },
  "response": [
  ]
}