CreateDataset Xojo Example
// This example requires the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.
Dim rest As New Chilkat.Rest
Dim success As Boolean
Dim authAws As New Chilkat.AuthAws
authAws.AccessKey = "AWS_ACCESS_KEY"
authAws.SecretKey = "AWS_SECRET_KEY"
// Don't forget to change the region to your particular region. (Also make the same change in the call to Connect below.)
authAws.Region = "us-west-2"
authAws.ServiceName = "iotanalytics"
// SetAuthAws causes Chilkat to automatically add the following headers: Authorization, X-Amz-Date
success = rest.SetAuthAws(authAws)
// URL: https://iotanalytics.us-west-2.amazonaws.com/
// Use the same region as specified above.
success = rest.Connect("iotanalytics.us-west-2.amazonaws.com",443,True,True)
If (success <> True) Then
System.DebugLog("ConnectFailReason: " + Str(rest.ConnectFailReason))
System.DebugLog(rest.LastErrorText)
Return
End If
// The following code creates the JSON request body.
// The JSON created by this code is shown below.
// Use this online tool to generate code from sample JSON:
// Generate Code to Create JSON
Dim json As New Chilkat.JsonObject
success = json.UpdateString("actions[0].actionName","string")
success = json.UpdateString("actions[0].containerAction.executionRoleArn","string")
success = json.UpdateString("actions[0].containerAction.image","string")
success = json.UpdateString("actions[0].containerAction.resourceConfiguration.computeType","string")
success = json.UpdateInt("actions[0].containerAction.resourceConfiguration.volumeSizeInGB",123)
success = json.UpdateString("actions[0].containerAction.variables[0].datasetContentVersionValue.datasetName","string")
success = json.UpdateInt("actions[0].containerAction.variables[0].doubleValue",123)
success = json.UpdateString("actions[0].containerAction.variables[0].name","string")
success = json.UpdateString("actions[0].containerAction.variables[0].outputFileUriValue.fileName","string")
success = json.UpdateString("actions[0].containerAction.variables[0].stringValue","string")
success = json.UpdateInt("actions[0].queryAction.filters[0].deltaTime.offsetSeconds",123)
success = json.UpdateString("actions[0].queryAction.filters[0].deltaTime.timeExpression","string")
success = json.UpdateString("actions[0].queryAction.sqlQuery","string")
success = json.UpdateString("contentDeliveryRules[0].destination.iotEventsDestinationConfiguration.inputName","string")
success = json.UpdateString("contentDeliveryRules[0].destination.iotEventsDestinationConfiguration.roleArn","string")
success = json.UpdateString("contentDeliveryRules[0].destination.s3DestinationConfiguration.bucket","string")
success = json.UpdateString("contentDeliveryRules[0].destination.s3DestinationConfiguration.glueConfiguration.databaseName","string")
success = json.UpdateString("contentDeliveryRules[0].destination.s3DestinationConfiguration.glueConfiguration.tableName","string")
success = json.UpdateString("contentDeliveryRules[0].destination.s3DestinationConfiguration.key","string")
success = json.UpdateString("contentDeliveryRules[0].destination.s3DestinationConfiguration.roleArn","string")
success = json.UpdateString("contentDeliveryRules[0].entryName","string")
success = json.UpdateString("datasetName","string")
success = json.UpdateInt("lateDataRules[0].ruleConfiguration.deltaTimeSessionWindowConfiguration.timeoutInMinutes",123)
success = json.UpdateString("lateDataRules[0].ruleName","string")
success = json.UpdateInt("retentionPeriod.numberOfDays",123)
success = json.UpdateInt("retentionPeriod.unlimited",123)
success = json.UpdateString("tags[0].key","string")
success = json.UpdateString("tags[0].value","string")
success = json.UpdateString("triggers[0].dataset.name","string")
success = json.UpdateString("triggers[0].schedule.expression","string")
success = json.UpdateInt("versioningConfiguration.maxVersions",123)
success = json.UpdateInt("versioningConfiguration.unlimited",123)
// The JSON request body created by the above code:
// {
// "actions": [
// {
// "actionName": "string",
// "containerAction": {
// "executionRoleArn": "string",
// "image": "string",
// "resourceConfiguration": {
// "computeType": "string",
// "volumeSizeInGB": number
// },
// "variables": [
// {
// "datasetContentVersionValue": {
// "datasetName": "string"
// },
// "doubleValue": number,
// "name": "string",
// "outputFileUriValue": {
// "fileName": "string"
// },
// "stringValue": "string"
// }
// ]
// },
// "queryAction": {
// "filters": [
// {
// "deltaTime": {
// "offsetSeconds": number,
// "timeExpression": "string"
// }
// }
// ],
// "sqlQuery": "string"
// }
// }
// ],
// "contentDeliveryRules": [
// {
// "destination": {
// "iotEventsDestinationConfiguration": {
// "inputName": "string",
// "roleArn": "string"
// },
// "s3DestinationConfiguration": {
// "bucket": "string",
// "glueConfiguration": {
// "databaseName": "string",
// "tableName": "string"
// },
// "key": "string",
// "roleArn": "string"
// }
// },
// "entryName": "string"
// }
// ],
// "datasetName": "string",
// "lateDataRules": [
// {
// "ruleConfiguration": {
// "deltaTimeSessionWindowConfiguration": {
// "timeoutInMinutes": number
// }
// },
// "ruleName": "string"
// }
// ],
// "retentionPeriod": {
// "numberOfDays": number,
// "unlimited": boolean
// },
// "tags": [
// {
// "key": "string",
// "value": "string"
// }
// ],
// "triggers": [
// {
// "dataset": {
// "name": "string"
// },
// "schedule": {
// "expression": "string"
// }
// }
// ],
// "versioningConfiguration": {
// "maxVersions": number,
// "unlimited": boolean
// }
// }
success = rest.AddHeader("Content-Type","application/x-amz-json-1.1")
success = rest.AddHeader("X-Amz-Target","CreateDataset")
Dim sbRequestBody As New Chilkat.StringBuilder
success = json.EmitSb(sbRequestBody)
Dim sbResponseBody As New Chilkat.StringBuilder
success = rest.FullRequestSb("POST","/datasets",sbRequestBody,sbResponseBody)
If (success <> True) Then
System.DebugLog(rest.LastErrorText)
Return
End If
Dim respStatusCode As Int32
respStatusCode = rest.ResponseStatusCode
System.DebugLog("response status code = " + Str(respStatusCode))
If (respStatusCode <> 200) Then
System.DebugLog("Response Header:")
System.DebugLog(rest.ResponseHeader)
System.DebugLog("Response Body:")
System.DebugLog(sbResponseBody.GetAsString())
Return
End If
Dim jResp As New Chilkat.JsonObject
success = jResp.LoadSb(sbResponseBody)
// The following code parses the JSON response.
// A sample JSON response is shown below the sample code.
// Use this online tool to generate parsing code from sample JSON:
// Generate Parsing Code from JSON
Dim datasetArn As String
datasetArn = jResp.StringOf("datasetArn")
Dim datasetName As String
datasetName = jResp.StringOf("datasetName")
Dim NumberOfDays As Int32
NumberOfDays = jResp.IntOf("retentionPeriod.numberOfDays")
Dim Unlimited As Int32
Unlimited = jResp.IntOf("retentionPeriod.unlimited")
// A sample JSON response body parsed by the above code:
// {
// "datasetArn": "string",
// "datasetName": "string",
// "retentionPeriod": {
// "numberOfDays": number,
// "unlimited": boolean
// }
// }