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

Sourcetype describeEventSubscriptionsResult = {

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.
*)
eventSubscriptionsList : EventSubscriptionsList.t option;
(*
A list of event subscriptions.
*)

}

Sourceand responseMetaData = unit

Sourceand t = {

describeEventSubscriptionsResult : describeEventSubscriptionsResult;
responseMetaData : responseMetaData;

}

Sourcetype error = [

| `InvalidTagFault of InvalidTagFault.t
| `SubscriptionNotFoundFault of SubscriptionNotFoundFault.t
| `Unknown_operation_error of string * string option

]

Sourceval context_ : string

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

Source

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

Source

val error_of_xml : 
  string ->
  Awso.Xml.t ->
  [> `InvalidTagFault of unit
  | `SubscriptionNotFoundFault 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
                * [> `List of
                       [> `Structure of
                            (string
                             * [> `Boolean of Boolean.t
                               | `List of
                                 [> `String of String_.t
                                 | `Structure of
                                   (string * [> `String of String_.t ]) list ]
                                   list
                               | `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