Values.DisableSnapshotCopyResultSourceDisables the automatic copying of snapshots from one region to another region for a specified cluster. If your cluster and its snapshots are encrypted using an encrypted symmetric key from Key Management Service, use DeleteSnapshotCopyGrant to delete the grant that grants Amazon Redshift permission to the key in the destination region.
and t = {disableSnapshotCopyResult : disableSnapshotCopyResult;responseMetaData : responseMetaData;}type error = [ | `ClusterNotFoundFault of ClusterNotFoundFault.t| `InvalidClusterStateFault of InvalidClusterStateFault.t| `SnapshotCopyAlreadyDisabledFault of SnapshotCopyAlreadyDisabledFault.t| `UnsupportedOperationFault of UnsupportedOperationFault.t| `Unknown_operation_error of string * string option ]val error_of_json :
string ->
Yojson.Safe.t ->
[> `ClusterNotFoundFault of unit
| `InvalidClusterStateFault of unit
| `SnapshotCopyAlreadyDisabledFault of unit
| `UnauthorizedOperation of unit
| `Unknown_operation_error of string * string option
| `UnsupportedOperationFault of unit ]val error_of_xml :
string ->
Awso.Xml.t ->
[> `ClusterNotFoundFault of unit
| `InvalidClusterStateFault of unit
| `SnapshotCopyAlreadyDisabledFault of unit
| `UnauthorizedOperation of unit
| `Unknown_operation_error of string * string option
| `UnsupportedOperationFault of unit ]val to_value :
t ->
[> `Structure of
(string
* [> `Structure of
(string
* [> `Structure of
(string
* [> `Boolean of Boolean.t
| `Enum of string
| `Integer of Integer.t
| `List of
[> `String of String_.t
| `Structure of
(string
* [> `List of
[> `Structure of
(string * [> `String of String_.t ])
list ]
list
| `String of String_.t
| `Timestamp of TStamp.t ])
list ]
list
| `Long of LongOptional.t
| `String of String_.t
| `Structure of
(string
* [> `Boolean of BooleanOptional.t
| `Double of Double.t
| `Enum of string
| `Integer of Integer.t
| `List of
[> `Structure of
(string
* [> `List of
[> `Structure of
(string
* [> `String of String_.t ])
list ]
list
| `String of String_.t ])
list ]
list
| `Long of Long.t
| `String of String_.t
| `Timestamp of TStamp.t ])
list
| `Timestamp of TStamp.t ])
list ])
list ])
list ]