EnableSnapshotCopyResult (p.awso.0.9.1.doc.awso.redshift.Awso_redshift.Values.EnableSnapshotCopyResult)

Sourcetype enableSnapshotCopyResult = {

cluster : Cluster.t option;

}

Sourceand responseMetaData = unit

Sourceand t = {

enableSnapshotCopyResult : enableSnapshotCopyResult;
responseMetaData : responseMetaData;

}

Sourcetype error = [

| `ClusterNotFoundFault of ClusterNotFoundFault.t
| `CopyToRegionDisabledFault of CopyToRegionDisabledFault.t
| `DependentServiceRequestThrottlingFault of DependentServiceRequestThrottlingFault.t
| `IncompatibleOrderableOptions of IncompatibleOrderableOptions.t
| `InvalidClusterStateFault of InvalidClusterStateFault.t
| `InvalidRetentionPeriodFault of InvalidRetentionPeriodFault.t
| `LimitExceededFault of LimitExceededFault.t
| `SnapshotCopyAlreadyEnabledFault of SnapshotCopyAlreadyEnabledFault.t
| `SnapshotCopyGrantNotFoundFault of SnapshotCopyGrantNotFoundFault.t
| `UnauthorizedOperation of UnauthorizedOperation.t
| `UnknownSnapshotCopyRegionFault of UnknownSnapshotCopyRegionFault.t
| `Unknown_operation_error of string * string option

]

Sourceval context_ : string

Sourceval make : ?cluster:??? -> unit -> t

Source

val error_of_json : 
  string ->
  Yojson.Safe.t ->
  [> `ClusterNotFoundFault of unit
  | `CopyToRegionDisabledFault of unit
  | `DependentServiceRequestThrottlingFault of unit
  | `IncompatibleOrderableOptions of unit
  | `InvalidClusterStateFault of unit
  | `InvalidRetentionPeriodFault of unit
  | `LimitExceededFault of unit
  | `SnapshotCopyAlreadyEnabledFault of unit
  | `SnapshotCopyGrantNotFoundFault of unit
  | `UnauthorizedOperation of unit
  | `UnknownSnapshotCopyRegionFault of unit
  | `Unknown_operation_error of string * string option ]

Source

val error_of_xml : 
  string ->
  Awso.Xml.t ->
  [> `ClusterNotFoundFault of unit
  | `CopyToRegionDisabledFault of unit
  | `DependentServiceRequestThrottlingFault of unit
  | `IncompatibleOrderableOptions of unit
  | `InvalidClusterStateFault of unit
  | `InvalidRetentionPeriodFault of unit
  | `LimitExceededFault of unit
  | `SnapshotCopyAlreadyEnabledFault of unit
  | `SnapshotCopyGrantNotFoundFault of unit
  | `UnauthorizedOperation of unit
  | `UnknownSnapshotCopyRegionFault of unit
  | `Unknown_operation_error of string * string option ]

Sourceval error_to_json : error -> Yojson.Safe.t

Source

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 ]

Sourceval to_query : t -> Awso.Client.Query.t

Sourceval of_xml : Awso.Xml.t -> t

Sourceval of_string : string -> t

Sourceval of_json : Yojson.Safe.t -> t

Sourceval to_json : t -> Yojson.Safe.t