(Lianja) Twilio List Log Messages

Fetch the log containing information about SMS messages previously sent (or failed to be sent).

For more information, see https://www.twilio.com/docs/sms/api/message-resource?code-sample=code-read-list-all-messages&code-language=curl&code-sdk-version=json

Chilkat Lianja Extension Download Chilkat Lianja Extension

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

loHttp = createobject("CkHttp")

// Implements the following CURL command:

// curl -X GET 'https://api.twilio.com/2010-04-01/Accounts/TWILIO_ACCOUNT_SID/Messages.json?PageSize=20' \
// -u TWILIO_ACCOUNT_SID:TWILIO_AUTH_TOKEN

// Use the following online tool to generate HTTP code from a CURL command
// Convert a cURL Command to HTTP Source Code

loHttp.Login = "TWILIO_ACCOUNT_SID"
loHttp.Password = "TWILIO_AUTH_TOKEN"

loSbResponseBody = createobject("CkStringBuilder")
llSuccess = loHttp.QuickGetSb("https://api.twilio.com/2010-04-01/Accounts/TWILIO_ACCOUNT_SID/Messages.json?PageSize=20",loSbResponseBody)
if (llSuccess = .F.) then
    ? loHttp.LastErrorText
    release loHttp
    release loSbResponseBody
    return
endif

loJson = createobject("CkJsonObject")
loJson.LoadSb(loSbResponseBody)
loJson.EmitCompact = .F.

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

lnRespStatusCode = loHttp.LastStatus
? "Response Status Code = " + str(lnRespStatusCode)
if (lnRespStatusCode >= 400) then
    ? "Response Header:"
    ? loHttp.LastHeader
    ? "Failed."
    release loHttp
    release loSbResponseBody
    release loJson
    return
endif

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

// {
//   "end": 1,
//   "first_page_uri": "/2010-04-01/Accounts/ACXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX/Messages.json?To=%2B123456789&From=%2B987654321&DateSent%3E=2008-01-02&PageSize=2&Page=0",
//   "next_page_uri": "/2010-04-01/Accounts/ACXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX/Messages.json?To=%2B123456789&From=%2B987654321&DateSent%3E=2008-01-02&PageSize=2&Page=1&PageToken=PAMMc26223853f8c46b4ab7dfaa6abba0a26",
//   "page": 0,
//   "page_size": 2,
//   "previous_page_uri": "/2010-04-01/Accounts/ACXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX/Messages.json?To=%2B123456789&From=%2B987654321&DateSent%3E=2008-01-02&PageSize=2&Page=0",
//   "messages": [
//     {
//       "account_sid": "ACXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX",
//       "api_version": "2010-04-01",
//       "body": "testing",
//       "date_created": "Fri, 24 May 2019 17:44:46 +0000",
//       "date_sent": "Fri, 24 May 2019 17:44:50 +0000",
//       "date_updated": "Fri, 24 May 2019 17:44:50 +0000",
//       "direction": "outbound-api",
//       "error_code": null,
//       "error_message": null,
//       "from": "+12019235161",
//       "messaging_service_sid": null,
//       "num_media": "0",
//       "num_segments": "1",
//       "price": "-0.00750",
//       "price_unit": "USD",
//       "sid": "SMded05904ccb347238880ca9264e8fe1c",
//       "status": "sent",
//       "subresource_uris": {
//         "media": "/2010-04-01/Accounts/ACXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX/Messages/SMded05904ccb347238880ca9264e8fe1c/Media.json",
//         "feedback": "/2010-04-01/Accounts/ACXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX/Messages/SMded05904ccb347238880ca9264e8fe1c/Feedback.json"
//       },
//       "to": "+18182008801",
//       "uri": "/2010-04-01/Accounts/ACXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX/Messages/SMded05904ccb347238880ca9264e8fe1c.json"
//     },
//     {
//       "account_sid": "ACXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX",
//       "api_version": "2010-04-01",
//       "body": "look mom I have media!",
//       "date_created": "Fri, 24 May 2019 17:44:46 +0000",
//       "date_sent": "Fri, 24 May 2019 17:44:49 +0000",
//       "date_updated": "Fri, 24 May 2019 17:44:49 +0000",
//       "direction": "inbound",
//       "error_code": 30004,
//       "error_message": "Message blocked",
//       "from": "+12019235161",
//       "messaging_service_sid": null,
//       "num_media": "3",
//       "num_segments": "1",
//       "price": "-0.00750",
//       "price_unit": "USD",
//       "sid": "MMc26223853f8c46b4ab7dfaa6abba0a26",
//       "status": "received",
//       "subresource_uris": {
//         "media": "/2010-04-01/Accounts/ACXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX/Messages/MMc26223853f8c46b4ab7dfaa6abba0a26/Media.json",
//         "feedback": "/2010-04-01/Accounts/ACXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX/Messages/MMc26223853f8c46b4ab7dfaa6abba0a26/Feedback.json"
//       },
//       "to": "+18182008801",
//       "uri": "/2010-04-01/Accounts/ACXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX/Messages/MMc26223853f8c46b4ab7dfaa6abba0a26.json"
//     }
//   ],
//   "start": 0,
//   "uri": "/2010-04-01/Accounts/ACXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX/Messages.json?To=%2B123456789&From=%2B987654321&DateSent%3E=2008-01-02&PageSize=2&Page=0"
// }

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

lnEnd = loJson.IntOf("end")
lcFirst_page_uri = loJson.StringOf("first_page_uri")
lcNext_page_uri = loJson.StringOf("next_page_uri")
lnPage = loJson.IntOf("page")
lnPage_size = loJson.IntOf("page_size")
lcPrevious_page_uri = loJson.StringOf("previous_page_uri")
lnStart = loJson.IntOf("start")
lcUri = loJson.StringOf("uri")
i = 0
lnCount_i = loJson.SizeOfArray("messages")
do while i < lnCount_i
    loJson.I = i
    lcAccount_sid = loJson.StringOf("messages[i].account_sid")
    lcApi_version = loJson.StringOf("messages[i].api_version")
    lcBody = loJson.StringOf("messages[i].body")
    lcDate_created = loJson.StringOf("messages[i].date_created")
    lcDate_sent = loJson.StringOf("messages[i].date_sent")
    lcDate_updated = loJson.StringOf("messages[i].date_updated")
    lcDirection = loJson.StringOf("messages[i].direction")
    lcError_code = loJson.StringOf("messages[i].error_code")
    lcError_message = loJson.StringOf("messages[i].error_message")
    lcFrom = loJson.StringOf("messages[i].from")
    lcMessaging_service_sid = loJson.StringOf("messages[i].messaging_service_sid")
    lcNum_media = loJson.StringOf("messages[i].num_media")
    lcNum_segments = loJson.StringOf("messages[i].num_segments")
    lcPrice = loJson.StringOf("messages[i].price")
    lcPrice_unit = loJson.StringOf("messages[i].price_unit")
    lcSid = loJson.StringOf("messages[i].sid")
    lcStatus = loJson.StringOf("messages[i].status")
    lcSubresource_urisMedia = loJson.StringOf("messages[i].subresource_uris.media")
    lcSubresource_urisFeedback = loJson.StringOf("messages[i].subresource_uris.feedback")
    lcV_to = loJson.StringOf("messages[i].to")
    lcUri = loJson.StringOf("messages[i].uri")
    i = i + 1
enddo


release loHttp
release loSbResponseBody
release loJson