Chilkat Online Tools

UpdateDestination Delphi (DLL) Example

Amazon Kinesis Data Firehose

var
rest: HCkRest;
success: Boolean;
authAws: HCkAuthAws;
json: HCkJsonObject;
sbRequestBody: HCkStringBuilder;
sbResponseBody: HCkStringBuilder;
respStatusCode: Integer;

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

rest := CkRest_Create();

authAws := CkAuthAws_Create();
CkAuthAws_putAccessKey(authAws,'AWS_ACCESS_KEY');
CkAuthAws_putSecretKey(authAws,'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.)
CkAuthAws_putRegion(authAws,'us-west-2');
CkAuthAws_putServiceName(authAws,'firehose');
// SetAuthAws causes Chilkat to automatically add the following headers: Authorization, X-Amz-Date
CkRest_SetAuthAws(rest,authAws);

// URL: https://firehose.us-west-2.amazonaws.com/
// Use the same region as specified above.
success := CkRest_Connect(rest,'firehose.us-west-2.amazonaws.com',443,True,True);
if (success <> True) then
  begin
    Memo1.Lines.Add('ConnectFailReason: ' + IntToStr(CkRest_getConnectFailReason(rest)));
    Memo1.Lines.Add(CkRest__lastErrorText(rest));
    Exit;
  end;

// 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

json := CkJsonObject_Create();
CkJsonObject_UpdateInt(json,'AmazonopensearchserviceDestinationUpdate.BufferingHints.IntervalInSeconds',123);
CkJsonObject_UpdateInt(json,'AmazonopensearchserviceDestinationUpdate.BufferingHints.SizeInMBs',123);
CkJsonObject_UpdateInt(json,'AmazonopensearchserviceDestinationUpdate.CloudWatchLoggingOptions.Enabled',123);
CkJsonObject_UpdateString(json,'AmazonopensearchserviceDestinationUpdate.CloudWatchLoggingOptions.LogGroupName','string');
CkJsonObject_UpdateString(json,'AmazonopensearchserviceDestinationUpdate.CloudWatchLoggingOptions.LogStreamName','string');
CkJsonObject_UpdateString(json,'AmazonopensearchserviceDestinationUpdate.ClusterEndpoint','string');
CkJsonObject_UpdateString(json,'AmazonopensearchserviceDestinationUpdate.DomainARN','string');
CkJsonObject_UpdateString(json,'AmazonopensearchserviceDestinationUpdate.IndexName','string');
CkJsonObject_UpdateString(json,'AmazonopensearchserviceDestinationUpdate.IndexRotationPeriod','string');
CkJsonObject_UpdateInt(json,'AmazonopensearchserviceDestinationUpdate.ProcessingConfiguration.Enabled',123);
CkJsonObject_UpdateString(json,'AmazonopensearchserviceDestinationUpdate.ProcessingConfiguration.Processors[0].Parameters[0].ParameterName','string');
CkJsonObject_UpdateString(json,'AmazonopensearchserviceDestinationUpdate.ProcessingConfiguration.Processors[0].Parameters[0].ParameterValue','string');
CkJsonObject_UpdateString(json,'AmazonopensearchserviceDestinationUpdate.ProcessingConfiguration.Processors[0].Type','string');
CkJsonObject_UpdateInt(json,'AmazonopensearchserviceDestinationUpdate.RetryOptions.DurationInSeconds',123);
CkJsonObject_UpdateString(json,'AmazonopensearchserviceDestinationUpdate.RoleARN','string');
CkJsonObject_UpdateString(json,'AmazonopensearchserviceDestinationUpdate.S3Update.BucketARN','string');
CkJsonObject_UpdateInt(json,'AmazonopensearchserviceDestinationUpdate.S3Update.BufferingHints.IntervalInSeconds',123);
CkJsonObject_UpdateInt(json,'AmazonopensearchserviceDestinationUpdate.S3Update.BufferingHints.SizeInMBs',123);
CkJsonObject_UpdateInt(json,'AmazonopensearchserviceDestinationUpdate.S3Update.CloudWatchLoggingOptions.Enabled',123);
CkJsonObject_UpdateString(json,'AmazonopensearchserviceDestinationUpdate.S3Update.CloudWatchLoggingOptions.LogGroupName','string');
CkJsonObject_UpdateString(json,'AmazonopensearchserviceDestinationUpdate.S3Update.CloudWatchLoggingOptions.LogStreamName','string');
CkJsonObject_UpdateString(json,'AmazonopensearchserviceDestinationUpdate.S3Update.CompressionFormat','string');
CkJsonObject_UpdateString(json,'AmazonopensearchserviceDestinationUpdate.S3Update.EncryptionConfiguration.KMSEncryptionConfig.AWSKMSKeyARN','string');
CkJsonObject_UpdateString(json,'AmazonopensearchserviceDestinationUpdate.S3Update.EncryptionConfiguration.NoEncryptionConfig','string');
CkJsonObject_UpdateString(json,'AmazonopensearchserviceDestinationUpdate.S3Update.ErrorOutputPrefix','string');
CkJsonObject_UpdateString(json,'AmazonopensearchserviceDestinationUpdate.S3Update.Prefix','string');
CkJsonObject_UpdateString(json,'AmazonopensearchserviceDestinationUpdate.S3Update.RoleARN','string');
CkJsonObject_UpdateString(json,'AmazonopensearchserviceDestinationUpdate.TypeName','string');
CkJsonObject_UpdateString(json,'CurrentDeliveryStreamVersionId','string');
CkJsonObject_UpdateString(json,'DeliveryStreamName','string');
CkJsonObject_UpdateString(json,'DestinationId','string');
CkJsonObject_UpdateInt(json,'ElasticsearchDestinationUpdate.BufferingHints.IntervalInSeconds',123);
CkJsonObject_UpdateInt(json,'ElasticsearchDestinationUpdate.BufferingHints.SizeInMBs',123);
CkJsonObject_UpdateInt(json,'ElasticsearchDestinationUpdate.CloudWatchLoggingOptions.Enabled',123);
CkJsonObject_UpdateString(json,'ElasticsearchDestinationUpdate.CloudWatchLoggingOptions.LogGroupName','string');
CkJsonObject_UpdateString(json,'ElasticsearchDestinationUpdate.CloudWatchLoggingOptions.LogStreamName','string');
CkJsonObject_UpdateString(json,'ElasticsearchDestinationUpdate.ClusterEndpoint','string');
CkJsonObject_UpdateString(json,'ElasticsearchDestinationUpdate.DomainARN','string');
CkJsonObject_UpdateString(json,'ElasticsearchDestinationUpdate.IndexName','string');
CkJsonObject_UpdateString(json,'ElasticsearchDestinationUpdate.IndexRotationPeriod','string');
CkJsonObject_UpdateInt(json,'ElasticsearchDestinationUpdate.ProcessingConfiguration.Enabled',123);
CkJsonObject_UpdateString(json,'ElasticsearchDestinationUpdate.ProcessingConfiguration.Processors[0].Parameters[0].ParameterName','string');
CkJsonObject_UpdateString(json,'ElasticsearchDestinationUpdate.ProcessingConfiguration.Processors[0].Parameters[0].ParameterValue','string');
CkJsonObject_UpdateString(json,'ElasticsearchDestinationUpdate.ProcessingConfiguration.Processors[0].Type','string');
CkJsonObject_UpdateInt(json,'ElasticsearchDestinationUpdate.RetryOptions.DurationInSeconds',123);
CkJsonObject_UpdateString(json,'ElasticsearchDestinationUpdate.RoleARN','string');
CkJsonObject_UpdateString(json,'ElasticsearchDestinationUpdate.S3Update.BucketARN','string');
CkJsonObject_UpdateInt(json,'ElasticsearchDestinationUpdate.S3Update.BufferingHints.IntervalInSeconds',123);
CkJsonObject_UpdateInt(json,'ElasticsearchDestinationUpdate.S3Update.BufferingHints.SizeInMBs',123);
CkJsonObject_UpdateInt(json,'ElasticsearchDestinationUpdate.S3Update.CloudWatchLoggingOptions.Enabled',123);
CkJsonObject_UpdateString(json,'ElasticsearchDestinationUpdate.S3Update.CloudWatchLoggingOptions.LogGroupName','string');
CkJsonObject_UpdateString(json,'ElasticsearchDestinationUpdate.S3Update.CloudWatchLoggingOptions.LogStreamName','string');
CkJsonObject_UpdateString(json,'ElasticsearchDestinationUpdate.S3Update.CompressionFormat','string');
CkJsonObject_UpdateString(json,'ElasticsearchDestinationUpdate.S3Update.EncryptionConfiguration.KMSEncryptionConfig.AWSKMSKeyARN','string');
CkJsonObject_UpdateString(json,'ElasticsearchDestinationUpdate.S3Update.EncryptionConfiguration.NoEncryptionConfig','string');
CkJsonObject_UpdateString(json,'ElasticsearchDestinationUpdate.S3Update.ErrorOutputPrefix','string');
CkJsonObject_UpdateString(json,'ElasticsearchDestinationUpdate.S3Update.Prefix','string');
CkJsonObject_UpdateString(json,'ElasticsearchDestinationUpdate.S3Update.RoleARN','string');
CkJsonObject_UpdateString(json,'ElasticsearchDestinationUpdate.TypeName','string');
CkJsonObject_UpdateString(json,'ExtendedS3DestinationUpdate.BucketARN','string');
CkJsonObject_UpdateInt(json,'ExtendedS3DestinationUpdate.BufferingHints.IntervalInSeconds',123);
CkJsonObject_UpdateInt(json,'ExtendedS3DestinationUpdate.BufferingHints.SizeInMBs',123);
CkJsonObject_UpdateInt(json,'ExtendedS3DestinationUpdate.CloudWatchLoggingOptions.Enabled',123);
CkJsonObject_UpdateString(json,'ExtendedS3DestinationUpdate.CloudWatchLoggingOptions.LogGroupName','string');
CkJsonObject_UpdateString(json,'ExtendedS3DestinationUpdate.CloudWatchLoggingOptions.LogStreamName','string');
CkJsonObject_UpdateString(json,'ExtendedS3DestinationUpdate.CompressionFormat','string');
CkJsonObject_UpdateInt(json,'ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.Enabled',123);
CkJsonObject_UpdateString(json,'ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.InputFormatConfiguration.Deserializer.HiveJsonSerDe.TimestampFormats[0]','string');
CkJsonObject_UpdateInt(json,'ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.InputFormatConfiguration.Deserializer.OpenXJsonSerDe.CaseInsensitive',123);
CkJsonObject_UpdateString(json,'ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.InputFormatConfiguration.Deserializer.OpenXJsonSerDe.ColumnToJsonKeyMappings.string','string');
CkJsonObject_UpdateInt(json,'ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.InputFormatConfiguration.Deserializer.OpenXJsonSerDe.ConvertDotsInJsonKeysToUnderscores',123);
CkJsonObject_UpdateInt(json,'ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.OutputFormatConfiguration.Serializer.OrcSerDe.BlockSizeBytes',123);
CkJsonObject_UpdateString(json,'ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.OutputFormatConfiguration.Serializer.OrcSerDe.BloomFilterColumns[0]','string');
CkJsonObject_UpdateInt(json,'ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.OutputFormatConfiguration.Serializer.OrcSerDe.BloomFilterFalsePositiveProbability',123);
CkJsonObject_UpdateString(json,'ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.OutputFormatConfiguration.Serializer.OrcSerDe.Compression','string');
CkJsonObject_UpdateInt(json,'ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.OutputFormatConfiguration.Serializer.OrcSerDe.DictionaryKeyThreshold',123);
CkJsonObject_UpdateInt(json,'ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.OutputFormatConfiguration.Serializer.OrcSerDe.EnablePadding',123);
CkJsonObject_UpdateString(json,'ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.OutputFormatConfiguration.Serializer.OrcSerDe.FormatVersion','string');
CkJsonObject_UpdateInt(json,'ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.OutputFormatConfiguration.Serializer.OrcSerDe.PaddingTolerance',123);
CkJsonObject_UpdateInt(json,'ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.OutputFormatConfiguration.Serializer.OrcSerDe.RowIndexStride',123);
CkJsonObject_UpdateInt(json,'ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.OutputFormatConfiguration.Serializer.OrcSerDe.StripeSizeBytes',123);
CkJsonObject_UpdateInt(json,'ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.OutputFormatConfiguration.Serializer.ParquetSerDe.BlockSizeBytes',123);
CkJsonObject_UpdateString(json,'ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.OutputFormatConfiguration.Serializer.ParquetSerDe.Compression','string');
CkJsonObject_UpdateInt(json,'ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.OutputFormatConfiguration.Serializer.ParquetSerDe.EnableDictionaryCompression',123);
CkJsonObject_UpdateInt(json,'ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.OutputFormatConfiguration.Serializer.ParquetSerDe.MaxPaddingBytes',123);
CkJsonObject_UpdateInt(json,'ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.OutputFormatConfiguration.Serializer.ParquetSerDe.PageSizeBytes',123);
CkJsonObject_UpdateString(json,'ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.OutputFormatConfiguration.Serializer.ParquetSerDe.WriterVersion','string');
CkJsonObject_UpdateString(json,'ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.SchemaConfiguration.CatalogId','string');
CkJsonObject_UpdateString(json,'ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.SchemaConfiguration.DatabaseName','string');
CkJsonObject_UpdateString(json,'ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.SchemaConfiguration.Region','string');
CkJsonObject_UpdateString(json,'ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.SchemaConfiguration.RoleARN','string');
CkJsonObject_UpdateString(json,'ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.SchemaConfiguration.TableName','string');
CkJsonObject_UpdateString(json,'ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.SchemaConfiguration.VersionId','string');
CkJsonObject_UpdateInt(json,'ExtendedS3DestinationUpdate.DynamicPartitioningConfiguration.Enabled',123);
CkJsonObject_UpdateInt(json,'ExtendedS3DestinationUpdate.DynamicPartitioningConfiguration.RetryOptions.DurationInSeconds',123);
CkJsonObject_UpdateString(json,'ExtendedS3DestinationUpdate.EncryptionConfiguration.KMSEncryptionConfig.AWSKMSKeyARN','string');
CkJsonObject_UpdateString(json,'ExtendedS3DestinationUpdate.EncryptionConfiguration.NoEncryptionConfig','string');
CkJsonObject_UpdateString(json,'ExtendedS3DestinationUpdate.ErrorOutputPrefix','string');
CkJsonObject_UpdateString(json,'ExtendedS3DestinationUpdate.Prefix','string');
CkJsonObject_UpdateInt(json,'ExtendedS3DestinationUpdate.ProcessingConfiguration.Enabled',123);
CkJsonObject_UpdateString(json,'ExtendedS3DestinationUpdate.ProcessingConfiguration.Processors[0].Parameters[0].ParameterName','string');
CkJsonObject_UpdateString(json,'ExtendedS3DestinationUpdate.ProcessingConfiguration.Processors[0].Parameters[0].ParameterValue','string');
CkJsonObject_UpdateString(json,'ExtendedS3DestinationUpdate.ProcessingConfiguration.Processors[0].Type','string');
CkJsonObject_UpdateString(json,'ExtendedS3DestinationUpdate.RoleARN','string');
CkJsonObject_UpdateString(json,'ExtendedS3DestinationUpdate.S3BackupMode','string');
CkJsonObject_UpdateString(json,'ExtendedS3DestinationUpdate.S3BackupUpdate.BucketARN','string');
CkJsonObject_UpdateInt(json,'ExtendedS3DestinationUpdate.S3BackupUpdate.BufferingHints.IntervalInSeconds',123);
CkJsonObject_UpdateInt(json,'ExtendedS3DestinationUpdate.S3BackupUpdate.BufferingHints.SizeInMBs',123);
CkJsonObject_UpdateInt(json,'ExtendedS3DestinationUpdate.S3BackupUpdate.CloudWatchLoggingOptions.Enabled',123);
CkJsonObject_UpdateString(json,'ExtendedS3DestinationUpdate.S3BackupUpdate.CloudWatchLoggingOptions.LogGroupName','string');
CkJsonObject_UpdateString(json,'ExtendedS3DestinationUpdate.S3BackupUpdate.CloudWatchLoggingOptions.LogStreamName','string');
CkJsonObject_UpdateString(json,'ExtendedS3DestinationUpdate.S3BackupUpdate.CompressionFormat','string');
CkJsonObject_UpdateString(json,'ExtendedS3DestinationUpdate.S3BackupUpdate.EncryptionConfiguration.KMSEncryptionConfig.AWSKMSKeyARN','string');
CkJsonObject_UpdateString(json,'ExtendedS3DestinationUpdate.S3BackupUpdate.EncryptionConfiguration.NoEncryptionConfig','string');
CkJsonObject_UpdateString(json,'ExtendedS3DestinationUpdate.S3BackupUpdate.ErrorOutputPrefix','string');
CkJsonObject_UpdateString(json,'ExtendedS3DestinationUpdate.S3BackupUpdate.Prefix','string');
CkJsonObject_UpdateString(json,'ExtendedS3DestinationUpdate.S3BackupUpdate.RoleARN','string');
CkJsonObject_UpdateInt(json,'HttpEndpointDestinationUpdate.BufferingHints.IntervalInSeconds',123);
CkJsonObject_UpdateInt(json,'HttpEndpointDestinationUpdate.BufferingHints.SizeInMBs',123);
CkJsonObject_UpdateInt(json,'HttpEndpointDestinationUpdate.CloudWatchLoggingOptions.Enabled',123);
CkJsonObject_UpdateString(json,'HttpEndpointDestinationUpdate.CloudWatchLoggingOptions.LogGroupName','string');
CkJsonObject_UpdateString(json,'HttpEndpointDestinationUpdate.CloudWatchLoggingOptions.LogStreamName','string');
CkJsonObject_UpdateString(json,'HttpEndpointDestinationUpdate.EndpointConfiguration.AccessKey','string');
CkJsonObject_UpdateString(json,'HttpEndpointDestinationUpdate.EndpointConfiguration.Name','string');
CkJsonObject_UpdateString(json,'HttpEndpointDestinationUpdate.EndpointConfiguration.Url','string');
CkJsonObject_UpdateInt(json,'HttpEndpointDestinationUpdate.ProcessingConfiguration.Enabled',123);
CkJsonObject_UpdateString(json,'HttpEndpointDestinationUpdate.ProcessingConfiguration.Processors[0].Parameters[0].ParameterName','string');
CkJsonObject_UpdateString(json,'HttpEndpointDestinationUpdate.ProcessingConfiguration.Processors[0].Parameters[0].ParameterValue','string');
CkJsonObject_UpdateString(json,'HttpEndpointDestinationUpdate.ProcessingConfiguration.Processors[0].Type','string');
CkJsonObject_UpdateString(json,'HttpEndpointDestinationUpdate.RequestConfiguration.CommonAttributes[0].AttributeName','string');
CkJsonObject_UpdateString(json,'HttpEndpointDestinationUpdate.RequestConfiguration.CommonAttributes[0].AttributeValue','string');
CkJsonObject_UpdateString(json,'HttpEndpointDestinationUpdate.RequestConfiguration.ContentEncoding','string');
CkJsonObject_UpdateInt(json,'HttpEndpointDestinationUpdate.RetryOptions.DurationInSeconds',123);
CkJsonObject_UpdateString(json,'HttpEndpointDestinationUpdate.RoleARN','string');
CkJsonObject_UpdateString(json,'HttpEndpointDestinationUpdate.S3BackupMode','string');
CkJsonObject_UpdateString(json,'HttpEndpointDestinationUpdate.S3Update.BucketARN','string');
CkJsonObject_UpdateInt(json,'HttpEndpointDestinationUpdate.S3Update.BufferingHints.IntervalInSeconds',123);
CkJsonObject_UpdateInt(json,'HttpEndpointDestinationUpdate.S3Update.BufferingHints.SizeInMBs',123);
CkJsonObject_UpdateInt(json,'HttpEndpointDestinationUpdate.S3Update.CloudWatchLoggingOptions.Enabled',123);
CkJsonObject_UpdateString(json,'HttpEndpointDestinationUpdate.S3Update.CloudWatchLoggingOptions.LogGroupName','string');
CkJsonObject_UpdateString(json,'HttpEndpointDestinationUpdate.S3Update.CloudWatchLoggingOptions.LogStreamName','string');
CkJsonObject_UpdateString(json,'HttpEndpointDestinationUpdate.S3Update.CompressionFormat','string');
CkJsonObject_UpdateString(json,'HttpEndpointDestinationUpdate.S3Update.EncryptionConfiguration.KMSEncryptionConfig.AWSKMSKeyARN','string');
CkJsonObject_UpdateString(json,'HttpEndpointDestinationUpdate.S3Update.EncryptionConfiguration.NoEncryptionConfig','string');
CkJsonObject_UpdateString(json,'HttpEndpointDestinationUpdate.S3Update.ErrorOutputPrefix','string');
CkJsonObject_UpdateString(json,'HttpEndpointDestinationUpdate.S3Update.Prefix','string');
CkJsonObject_UpdateString(json,'HttpEndpointDestinationUpdate.S3Update.RoleARN','string');
CkJsonObject_UpdateInt(json,'RedshiftDestinationUpdate.CloudWatchLoggingOptions.Enabled',123);
CkJsonObject_UpdateString(json,'RedshiftDestinationUpdate.CloudWatchLoggingOptions.LogGroupName','string');
CkJsonObject_UpdateString(json,'RedshiftDestinationUpdate.CloudWatchLoggingOptions.LogStreamName','string');
CkJsonObject_UpdateString(json,'RedshiftDestinationUpdate.ClusterJDBCURL','string');
CkJsonObject_UpdateString(json,'RedshiftDestinationUpdate.CopyCommand.CopyOptions','string');
CkJsonObject_UpdateString(json,'RedshiftDestinationUpdate.CopyCommand.DataTableColumns','string');
CkJsonObject_UpdateString(json,'RedshiftDestinationUpdate.CopyCommand.DataTableName','string');
CkJsonObject_UpdateString(json,'RedshiftDestinationUpdate.Password','string');
CkJsonObject_UpdateInt(json,'RedshiftDestinationUpdate.ProcessingConfiguration.Enabled',123);
CkJsonObject_UpdateString(json,'RedshiftDestinationUpdate.ProcessingConfiguration.Processors[0].Parameters[0].ParameterName','string');
CkJsonObject_UpdateString(json,'RedshiftDestinationUpdate.ProcessingConfiguration.Processors[0].Parameters[0].ParameterValue','string');
CkJsonObject_UpdateString(json,'RedshiftDestinationUpdate.ProcessingConfiguration.Processors[0].Type','string');
CkJsonObject_UpdateInt(json,'RedshiftDestinationUpdate.RetryOptions.DurationInSeconds',123);
CkJsonObject_UpdateString(json,'RedshiftDestinationUpdate.RoleARN','string');
CkJsonObject_UpdateString(json,'RedshiftDestinationUpdate.S3BackupMode','string');
CkJsonObject_UpdateString(json,'RedshiftDestinationUpdate.S3BackupUpdate.BucketARN','string');
CkJsonObject_UpdateInt(json,'RedshiftDestinationUpdate.S3BackupUpdate.BufferingHints.IntervalInSeconds',123);
CkJsonObject_UpdateInt(json,'RedshiftDestinationUpdate.S3BackupUpdate.BufferingHints.SizeInMBs',123);
CkJsonObject_UpdateInt(json,'RedshiftDestinationUpdate.S3BackupUpdate.CloudWatchLoggingOptions.Enabled',123);
CkJsonObject_UpdateString(json,'RedshiftDestinationUpdate.S3BackupUpdate.CloudWatchLoggingOptions.LogGroupName','string');
CkJsonObject_UpdateString(json,'RedshiftDestinationUpdate.S3BackupUpdate.CloudWatchLoggingOptions.LogStreamName','string');
CkJsonObject_UpdateString(json,'RedshiftDestinationUpdate.S3BackupUpdate.CompressionFormat','string');
CkJsonObject_UpdateString(json,'RedshiftDestinationUpdate.S3BackupUpdate.EncryptionConfiguration.KMSEncryptionConfig.AWSKMSKeyARN','string');
CkJsonObject_UpdateString(json,'RedshiftDestinationUpdate.S3BackupUpdate.EncryptionConfiguration.NoEncryptionConfig','string');
CkJsonObject_UpdateString(json,'RedshiftDestinationUpdate.S3BackupUpdate.ErrorOutputPrefix','string');
CkJsonObject_UpdateString(json,'RedshiftDestinationUpdate.S3BackupUpdate.Prefix','string');
CkJsonObject_UpdateString(json,'RedshiftDestinationUpdate.S3BackupUpdate.RoleARN','string');
CkJsonObject_UpdateString(json,'RedshiftDestinationUpdate.S3Update.BucketARN','string');
CkJsonObject_UpdateInt(json,'RedshiftDestinationUpdate.S3Update.BufferingHints.IntervalInSeconds',123);
CkJsonObject_UpdateInt(json,'RedshiftDestinationUpdate.S3Update.BufferingHints.SizeInMBs',123);
CkJsonObject_UpdateInt(json,'RedshiftDestinationUpdate.S3Update.CloudWatchLoggingOptions.Enabled',123);
CkJsonObject_UpdateString(json,'RedshiftDestinationUpdate.S3Update.CloudWatchLoggingOptions.LogGroupName','string');
CkJsonObject_UpdateString(json,'RedshiftDestinationUpdate.S3Update.CloudWatchLoggingOptions.LogStreamName','string');
CkJsonObject_UpdateString(json,'RedshiftDestinationUpdate.S3Update.CompressionFormat','string');
CkJsonObject_UpdateString(json,'RedshiftDestinationUpdate.S3Update.EncryptionConfiguration.KMSEncryptionConfig.AWSKMSKeyARN','string');
CkJsonObject_UpdateString(json,'RedshiftDestinationUpdate.S3Update.EncryptionConfiguration.NoEncryptionConfig','string');
CkJsonObject_UpdateString(json,'RedshiftDestinationUpdate.S3Update.ErrorOutputPrefix','string');
CkJsonObject_UpdateString(json,'RedshiftDestinationUpdate.S3Update.Prefix','string');
CkJsonObject_UpdateString(json,'RedshiftDestinationUpdate.S3Update.RoleARN','string');
CkJsonObject_UpdateString(json,'RedshiftDestinationUpdate.Username','string');
CkJsonObject_UpdateString(json,'S3DestinationUpdate.BucketARN','string');
CkJsonObject_UpdateInt(json,'S3DestinationUpdate.BufferingHints.IntervalInSeconds',123);
CkJsonObject_UpdateInt(json,'S3DestinationUpdate.BufferingHints.SizeInMBs',123);
CkJsonObject_UpdateInt(json,'S3DestinationUpdate.CloudWatchLoggingOptions.Enabled',123);
CkJsonObject_UpdateString(json,'S3DestinationUpdate.CloudWatchLoggingOptions.LogGroupName','string');
CkJsonObject_UpdateString(json,'S3DestinationUpdate.CloudWatchLoggingOptions.LogStreamName','string');
CkJsonObject_UpdateString(json,'S3DestinationUpdate.CompressionFormat','string');
CkJsonObject_UpdateString(json,'S3DestinationUpdate.EncryptionConfiguration.KMSEncryptionConfig.AWSKMSKeyARN','string');
CkJsonObject_UpdateString(json,'S3DestinationUpdate.EncryptionConfiguration.NoEncryptionConfig','string');
CkJsonObject_UpdateString(json,'S3DestinationUpdate.ErrorOutputPrefix','string');
CkJsonObject_UpdateString(json,'S3DestinationUpdate.Prefix','string');
CkJsonObject_UpdateString(json,'S3DestinationUpdate.RoleARN','string');
CkJsonObject_UpdateInt(json,'SplunkDestinationUpdate.CloudWatchLoggingOptions.Enabled',123);
CkJsonObject_UpdateString(json,'SplunkDestinationUpdate.CloudWatchLoggingOptions.LogGroupName','string');
CkJsonObject_UpdateString(json,'SplunkDestinationUpdate.CloudWatchLoggingOptions.LogStreamName','string');
CkJsonObject_UpdateInt(json,'SplunkDestinationUpdate.HECAcknowledgmentTimeoutInSeconds',123);
CkJsonObject_UpdateString(json,'SplunkDestinationUpdate.HECEndpoint','string');
CkJsonObject_UpdateString(json,'SplunkDestinationUpdate.HECEndpointType','string');
CkJsonObject_UpdateString(json,'SplunkDestinationUpdate.HECToken','string');
CkJsonObject_UpdateInt(json,'SplunkDestinationUpdate.ProcessingConfiguration.Enabled',123);
CkJsonObject_UpdateString(json,'SplunkDestinationUpdate.ProcessingConfiguration.Processors[0].Parameters[0].ParameterName','string');
CkJsonObject_UpdateString(json,'SplunkDestinationUpdate.ProcessingConfiguration.Processors[0].Parameters[0].ParameterValue','string');
CkJsonObject_UpdateString(json,'SplunkDestinationUpdate.ProcessingConfiguration.Processors[0].Type','string');
CkJsonObject_UpdateInt(json,'SplunkDestinationUpdate.RetryOptions.DurationInSeconds',123);
CkJsonObject_UpdateString(json,'SplunkDestinationUpdate.S3BackupMode','string');
CkJsonObject_UpdateString(json,'SplunkDestinationUpdate.S3Update.BucketARN','string');
CkJsonObject_UpdateInt(json,'SplunkDestinationUpdate.S3Update.BufferingHints.IntervalInSeconds',123);
CkJsonObject_UpdateInt(json,'SplunkDestinationUpdate.S3Update.BufferingHints.SizeInMBs',123);
CkJsonObject_UpdateInt(json,'SplunkDestinationUpdate.S3Update.CloudWatchLoggingOptions.Enabled',123);
CkJsonObject_UpdateString(json,'SplunkDestinationUpdate.S3Update.CloudWatchLoggingOptions.LogGroupName','string');
CkJsonObject_UpdateString(json,'SplunkDestinationUpdate.S3Update.CloudWatchLoggingOptions.LogStreamName','string');
CkJsonObject_UpdateString(json,'SplunkDestinationUpdate.S3Update.CompressionFormat','string');
CkJsonObject_UpdateString(json,'SplunkDestinationUpdate.S3Update.EncryptionConfiguration.KMSEncryptionConfig.AWSKMSKeyARN','string');
CkJsonObject_UpdateString(json,'SplunkDestinationUpdate.S3Update.EncryptionConfiguration.NoEncryptionConfig','string');
CkJsonObject_UpdateString(json,'SplunkDestinationUpdate.S3Update.ErrorOutputPrefix','string');
CkJsonObject_UpdateString(json,'SplunkDestinationUpdate.S3Update.Prefix','string');
CkJsonObject_UpdateString(json,'SplunkDestinationUpdate.S3Update.RoleARN','string');

// The JSON request body created by the above code:

// {
//   "AmazonopensearchserviceDestinationUpdate": {
//     "BufferingHints": {
//       "IntervalInSeconds": number,
//       "SizeInMBs": number
//     },
//     "CloudWatchLoggingOptions": {
//       "Enabled": boolean,
//       "LogGroupName": "string",
//       "LogStreamName": "string"
//     },
//     "ClusterEndpoint": "string",
//     "DomainARN": "string",
//     "IndexName": "string",
//     "IndexRotationPeriod": "string",
//     "ProcessingConfiguration": {
//       "Enabled": boolean,
//       "Processors": [
//         {
//           "Parameters": [
//             {
//               "ParameterName": "string",
//               "ParameterValue": "string"
//             }
//           ],
//           "Type": "string"
//         }
//       ]
//     },
//     "RetryOptions": {
//       "DurationInSeconds": number
//     },
//     "RoleARN": "string",
//     "S3Update": {
//       "BucketARN": "string",
//       "BufferingHints": {
//         "IntervalInSeconds": number,
//         "SizeInMBs": number
//       },
//       "CloudWatchLoggingOptions": {
//         "Enabled": boolean,
//         "LogGroupName": "string",
//         "LogStreamName": "string"
//       },
//       "CompressionFormat": "string",
//       "EncryptionConfiguration": {
//         "KMSEncryptionConfig": {
//           "AWSKMSKeyARN": "string"
//         },
//         "NoEncryptionConfig": "string"
//       },
//       "ErrorOutputPrefix": "string",
//       "Prefix": "string",
//       "RoleARN": "string"
//     },
//     "TypeName": "string"
//   },
//   "CurrentDeliveryStreamVersionId": "string",
//   "DeliveryStreamName": "string",
//   "DestinationId": "string",
//   "ElasticsearchDestinationUpdate": {
//     "BufferingHints": {
//       "IntervalInSeconds": number,
//       "SizeInMBs": number
//     },
//     "CloudWatchLoggingOptions": {
//       "Enabled": boolean,
//       "LogGroupName": "string",
//       "LogStreamName": "string"
//     },
//     "ClusterEndpoint": "string",
//     "DomainARN": "string",
//     "IndexName": "string",
//     "IndexRotationPeriod": "string",
//     "ProcessingConfiguration": {
//       "Enabled": boolean,
//       "Processors": [
//         {
//           "Parameters": [
//             {
//               "ParameterName": "string",
//               "ParameterValue": "string"
//             }
//           ],
//           "Type": "string"
//         }
//       ]
//     },
//     "RetryOptions": {
//       "DurationInSeconds": number
//     },
//     "RoleARN": "string",
//     "S3Update": {
//       "BucketARN": "string",
//       "BufferingHints": {
//         "IntervalInSeconds": number,
//         "SizeInMBs": number
//       },
//       "CloudWatchLoggingOptions": {
//         "Enabled": boolean,
//         "LogGroupName": "string",
//         "LogStreamName": "string"
//       },
//       "CompressionFormat": "string",
//       "EncryptionConfiguration": {
//         "KMSEncryptionConfig": {
//           "AWSKMSKeyARN": "string"
//         },
//         "NoEncryptionConfig": "string"
//       },
//       "ErrorOutputPrefix": "string",
//       "Prefix": "string",
//       "RoleARN": "string"
//     },
//     "TypeName": "string"
//   },
//   "ExtendedS3DestinationUpdate": {
//     "BucketARN": "string",
//     "BufferingHints": {
//       "IntervalInSeconds": number,
//       "SizeInMBs": number
//     },
//     "CloudWatchLoggingOptions": {
//       "Enabled": boolean,
//       "LogGroupName": "string",
//       "LogStreamName": "string"
//     },
//     "CompressionFormat": "string",
//     "DataFormatConversionConfiguration": {
//       "Enabled": boolean,
//       "InputFormatConfiguration": {
//         "Deserializer": {
//           "HiveJsonSerDe": {
//             "TimestampFormats": [
//               "string"
//             ]
//           },
//           "OpenXJsonSerDe": {
//             "CaseInsensitive": boolean,
//             "ColumnToJsonKeyMappings": {
//               "string": "string"
//             },
//             "ConvertDotsInJsonKeysToUnderscores": boolean
//           }
//         }
//       },
//       "OutputFormatConfiguration": {
//         "Serializer": {
//           "OrcSerDe": {
//             "BlockSizeBytes": number,
//             "BloomFilterColumns": [
//               "string"
//             ],
//             "BloomFilterFalsePositiveProbability": number,
//             "Compression": "string",
//             "DictionaryKeyThreshold": number,
//             "EnablePadding": boolean,
//             "FormatVersion": "string",
//             "PaddingTolerance": number,
//             "RowIndexStride": number,
//             "StripeSizeBytes": number
//           },
//           "ParquetSerDe": {
//             "BlockSizeBytes": number,
//             "Compression": "string",
//             "EnableDictionaryCompression": boolean,
//             "MaxPaddingBytes": number,
//             "PageSizeBytes": number,
//             "WriterVersion": "string"
//           }
//         }
//       },
//       "SchemaConfiguration": {
//         "CatalogId": "string",
//         "DatabaseName": "string",
//         "Region": "string",
//         "RoleARN": "string",
//         "TableName": "string",
//         "VersionId": "string"
//       }
//     },
//     "DynamicPartitioningConfiguration": {
//       "Enabled": boolean,
//       "RetryOptions": {
//         "DurationInSeconds": number
//       }
//     },
//     "EncryptionConfiguration": {
//       "KMSEncryptionConfig": {
//         "AWSKMSKeyARN": "string"
//       },
//       "NoEncryptionConfig": "string"
//     },
//     "ErrorOutputPrefix": "string",
//     "Prefix": "string",
//     "ProcessingConfiguration": {
//       "Enabled": boolean,
//       "Processors": [
//         {
//           "Parameters": [
//             {
//               "ParameterName": "string",
//               "ParameterValue": "string"
//             }
//           ],
//           "Type": "string"
//         }
//       ]
//     },
//     "RoleARN": "string",
//     "S3BackupMode": "string",
//     "S3BackupUpdate": {
//       "BucketARN": "string",
//       "BufferingHints": {
//         "IntervalInSeconds": number,
//         "SizeInMBs": number
//       },
//       "CloudWatchLoggingOptions": {
//         "Enabled": boolean,
//         "LogGroupName": "string",
//         "LogStreamName": "string"
//       },
//       "CompressionFormat": "string",
//       "EncryptionConfiguration": {
//         "KMSEncryptionConfig": {
//           "AWSKMSKeyARN": "string"
//         },
//         "NoEncryptionConfig": "string"
//       },
//       "ErrorOutputPrefix": "string",
//       "Prefix": "string",
//       "RoleARN": "string"
//     }
//   },
//   "HttpEndpointDestinationUpdate": {
//     "BufferingHints": {
//       "IntervalInSeconds": number,
//       "SizeInMBs": number
//     },
//     "CloudWatchLoggingOptions": {
//       "Enabled": boolean,
//       "LogGroupName": "string",
//       "LogStreamName": "string"
//     },
//     "EndpointConfiguration": {
//       "AccessKey": "string",
//       "Name": "string",
//       "Url": "string"
//     },
//     "ProcessingConfiguration": {
//       "Enabled": boolean,
//       "Processors": [
//         {
//           "Parameters": [
//             {
//               "ParameterName": "string",
//               "ParameterValue": "string"
//             }
//           ],
//           "Type": "string"
//         }
//       ]
//     },
//     "RequestConfiguration": {
//       "CommonAttributes": [
//         {
//           "AttributeName": "string",
//           "AttributeValue": "string"
//         }
//       ],
//       "ContentEncoding": "string"
//     },
//     "RetryOptions": {
//       "DurationInSeconds": number
//     },
//     "RoleARN": "string",
//     "S3BackupMode": "string",
//     "S3Update": {
//       "BucketARN": "string",
//       "BufferingHints": {
//         "IntervalInSeconds": number,
//         "SizeInMBs": number
//       },
//       "CloudWatchLoggingOptions": {
//         "Enabled": boolean,
//         "LogGroupName": "string",
//         "LogStreamName": "string"
//       },
//       "CompressionFormat": "string",
//       "EncryptionConfiguration": {
//         "KMSEncryptionConfig": {
//           "AWSKMSKeyARN": "string"
//         },
//         "NoEncryptionConfig": "string"
//       },
//       "ErrorOutputPrefix": "string",
//       "Prefix": "string",
//       "RoleARN": "string"
//     }
//   },
//   "RedshiftDestinationUpdate": {
//     "CloudWatchLoggingOptions": {
//       "Enabled": boolean,
//       "LogGroupName": "string",
//       "LogStreamName": "string"
//     },
//     "ClusterJDBCURL": "string",
//     "CopyCommand": {
//       "CopyOptions": "string",
//       "DataTableColumns": "string",
//       "DataTableName": "string"
//     },
//     "Password": "string",
//     "ProcessingConfiguration": {
//       "Enabled": boolean,
//       "Processors": [
//         {
//           "Parameters": [
//             {
//               "ParameterName": "string",
//               "ParameterValue": "string"
//             }
//           ],
//           "Type": "string"
//         }
//       ]
//     },
//     "RetryOptions": {
//       "DurationInSeconds": number
//     },
//     "RoleARN": "string",
//     "S3BackupMode": "string",
//     "S3BackupUpdate": {
//       "BucketARN": "string",
//       "BufferingHints": {
//         "IntervalInSeconds": number,
//         "SizeInMBs": number
//       },
//       "CloudWatchLoggingOptions": {
//         "Enabled": boolean,
//         "LogGroupName": "string",
//         "LogStreamName": "string"
//       },
//       "CompressionFormat": "string",
//       "EncryptionConfiguration": {
//         "KMSEncryptionConfig": {
//           "AWSKMSKeyARN": "string"
//         },
//         "NoEncryptionConfig": "string"
//       },
//       "ErrorOutputPrefix": "string",
//       "Prefix": "string",
//       "RoleARN": "string"
//     },
//     "S3Update": {
//       "BucketARN": "string",
//       "BufferingHints": {
//         "IntervalInSeconds": number,
//         "SizeInMBs": number
//       },
//       "CloudWatchLoggingOptions": {
//         "Enabled": boolean,
//         "LogGroupName": "string",
//         "LogStreamName": "string"
//       },
//       "CompressionFormat": "string",
//       "EncryptionConfiguration": {
//         "KMSEncryptionConfig": {
//           "AWSKMSKeyARN": "string"
//         },
//         "NoEncryptionConfig": "string"
//       },
//       "ErrorOutputPrefix": "string",
//       "Prefix": "string",
//       "RoleARN": "string"
//     },
//     "Username": "string"
//   },
//   "S3DestinationUpdate": {
//     "BucketARN": "string",
//     "BufferingHints": {
//       "IntervalInSeconds": number,
//       "SizeInMBs": number
//     },
//     "CloudWatchLoggingOptions": {
//       "Enabled": boolean,
//       "LogGroupName": "string",
//       "LogStreamName": "string"
//     },
//     "CompressionFormat": "string",
//     "EncryptionConfiguration": {
//       "KMSEncryptionConfig": {
//         "AWSKMSKeyARN": "string"
//       },
//       "NoEncryptionConfig": "string"
//     },
//     "ErrorOutputPrefix": "string",
//     "Prefix": "string",
//     "RoleARN": "string"
//   },
//   "SplunkDestinationUpdate": {
//     "CloudWatchLoggingOptions": {
//       "Enabled": boolean,
//       "LogGroupName": "string",
//       "LogStreamName": "string"
//     },
//     "HECAcknowledgmentTimeoutInSeconds": number,
//     "HECEndpoint": "string",
//     "HECEndpointType": "string",
//     "HECToken": "string",
//     "ProcessingConfiguration": {
//       "Enabled": boolean,
//       "Processors": [
//         {
//           "Parameters": [
//             {
//               "ParameterName": "string",
//               "ParameterValue": "string"
//             }
//           ],
//           "Type": "string"
//         }
//       ]
//     },
//     "RetryOptions": {
//       "DurationInSeconds": number
//     },
//     "S3BackupMode": "string",
//     "S3Update": {
//       "BucketARN": "string",
//       "BufferingHints": {
//         "IntervalInSeconds": number,
//         "SizeInMBs": number
//       },
//       "CloudWatchLoggingOptions": {
//         "Enabled": boolean,
//         "LogGroupName": "string",
//         "LogStreamName": "string"
//       },
//       "CompressionFormat": "string",
//       "EncryptionConfiguration": {
//         "KMSEncryptionConfig": {
//           "AWSKMSKeyARN": "string"
//         },
//         "NoEncryptionConfig": "string"
//       },
//       "ErrorOutputPrefix": "string",
//       "Prefix": "string",
//       "RoleARN": "string"
//     }
//   }
// }

CkRest_AddHeader(rest,'Content-Type','application/x-amz-json-1.1');
CkRest_AddHeader(rest,'X-Amz-Target','Firehose_20150804.UpdateDestination');

sbRequestBody := CkStringBuilder_Create();
CkJsonObject_EmitSb(json,sbRequestBody);
sbResponseBody := CkStringBuilder_Create();
success := CkRest_FullRequestSb(rest,'POST','/',sbRequestBody,sbResponseBody);
if (success <> True) then
  begin
    Memo1.Lines.Add(CkRest__lastErrorText(rest));
    Exit;
  end;
respStatusCode := CkRest_getResponseStatusCode(rest);
Memo1.Lines.Add('response status code = ' + IntToStr(respStatusCode));
if (respStatusCode <> 200) then
  begin
    Memo1.Lines.Add('Response Header:');
    Memo1.Lines.Add(CkRest__responseHeader(rest));
    Memo1.Lines.Add('Response Body:');
    Memo1.Lines.Add(CkStringBuilder__getAsString(sbResponseBody));
    Exit;
  end;

// If the action is successful, the service sends back an HTTP 200 response with an empty HTTP body.

CkRest_Dispose(rest);
CkAuthAws_Dispose(authAws);
CkJsonObject_Dispose(json);
CkStringBuilder_Dispose(sbRequestBody);
CkStringBuilder_Dispose(sbResponseBody);