SnapshotMessage (p.awso.0.9.1.doc.awso.redshift.Awso

Sourcetype describeClusterSnapshotsResult = {

marker : String_.t option;
(*
A value that indicates the starting point for the next set of response records in a subsequent request. If a value is returned in a response, you can retrieve the next set of records by providing this returned marker value in the Marker parameter and retrying the command. If the Marker field is empty, all response records have been retrieved for the request.
*)
snapshots : SnapshotList.t option;
(*
A list of Snapshot instances.
*)

}

Sourceand responseMetaData = unit

Sourceand t = {

describeClusterSnapshotsResult : describeClusterSnapshotsResult;
responseMetaData : responseMetaData;

}

Sourcetype error = [

| `ClusterNotFoundFault of ClusterNotFoundFault.t
| `ClusterSnapshotNotFoundFault of ClusterSnapshotNotFoundFault.t
| `InvalidTagFault of InvalidTagFault.t
| `UnsupportedOperationFault of UnsupportedOperationFault.t
| `Unknown_operation_error of string * string option

]

Sourceval context_ : string

Sourceval make : ?marker:??? -> ?snapshots:??? -> unit -> t

Source

val error_of_json : 
  string ->
  Yojson.Safe.t ->
  [> `ClusterNotFoundFault of unit
  | `ClusterSnapshotNotFoundFault of unit
  | `InvalidTagFault of unit
  | `Unknown_operation_error of string * string option
  | `UnsupportedOperationFault of unit ]

Source

val error_of_xml : 
  string ->
  Awso.Xml.t ->
  [> `ClusterNotFoundFault of unit
  | `ClusterSnapshotNotFoundFault of unit
  | `InvalidTagFault of unit
  | `Unknown_operation_error of string * string option
  | `UnsupportedOperationFault of unit ]

Sourceval error_to_json : error -> Yojson.Safe.t

Source

val to_value : 
  t ->
  [> `Structure of
       (string
        * [> `Structure of
               (string
                * [> `List of
                       [> `Structure of
                            (string
                             * [> `Boolean of Boolean.t
                               | `Double of Double.t
                               | `Integer of Integer.t
                               | `List of
                                 [> `String of String_.t
                                 | `Structure of
                                   (string * [> `String of String_.t ]) list ]
                                   list
                               | `Long of Long.t
                               | `String of String_.t
                               | `Timestamp of TStamp.t ])
                              list ]
                         list
                  | `String of String_.t ])
                 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