Smaws_Client_Redshift.CreateSnapshotCopyGrantCreates a snapshot copy grant that permits Amazon Redshift to use an encrypted symmetric key from Key Management Service (KMS) to encrypt copied snapshots in a destination region.
For more information about managing snapshot copy grants, go to Amazon Redshift Database Encryption in the Amazon Redshift Cluster Management Guide.
val error_to_string :
[ Smaws_Lib.Protocols.AwsQuery.error
| `DependentServiceRequestThrottlingFault of
Types.dependent_service_request_throttling_fault
| `InvalidTagFault of Types.invalid_tag_fault
| `LimitExceededFault of Types.limit_exceeded_fault
| `SnapshotCopyGrantAlreadyExistsFault of
Types.snapshot_copy_grant_already_exists_fault
| `SnapshotCopyGrantQuotaExceededFault of
Types.snapshot_copy_grant_quota_exceeded_fault
| `TagLimitExceededFault of Types.tag_limit_exceeded_fault ] ->
stringval request :
'http_type Smaws_Lib.Context.t ->
Types.create_snapshot_copy_grant_message ->
(Types.create_snapshot_copy_grant_result,
[> Smaws_Lib.Protocols.AwsQuery.error
| `DependentServiceRequestThrottlingFault of
Types.dependent_service_request_throttling_fault
| `InvalidTagFault of Types.invalid_tag_fault
| `LimitExceededFault of Types.limit_exceeded_fault
| `SnapshotCopyGrantAlreadyExistsFault of
Types.snapshot_copy_grant_already_exists_fault
| `SnapshotCopyGrantQuotaExceededFault of
Types.snapshot_copy_grant_quota_exceeded_fault
| `TagLimitExceededFault of Types.tag_limit_exceeded_fault ])
Stdlib.resultval request_with_metadata :
'http_type Smaws_Lib.Context.t ->
Types.create_snapshot_copy_grant_message ->
(Types.create_snapshot_copy_grant_result Smaws_Lib.Response.t,
[> Smaws_Lib.Protocols.AwsQuery.error
| `DependentServiceRequestThrottlingFault of
Types.dependent_service_request_throttling_fault
| `InvalidTagFault of Types.invalid_tag_fault
| `LimitExceededFault of Types.limit_exceeded_fault
| `SnapshotCopyGrantAlreadyExistsFault of
Types.snapshot_copy_grant_already_exists_fault
| `SnapshotCopyGrantQuotaExceededFault of
Types.snapshot_copy_grant_quota_exceeded_fault
| `TagLimitExceededFault of Types.tag_limit_exceeded_fault ]
* Smaws_Lib.Response.metadata)
Stdlib.result