Module Types.RecordHandlerProgressInput

type t = {
bearer_token : Aws.BaseTypes.String.t;
operation_status : OperationStatus.t;
current_operation_status : OperationStatus.t option;
status_message : Aws.BaseTypes.String.t option;
error_code : HandlerErrorCode.t option;
resource_model : Aws.BaseTypes.String.t option;
client_request_token : Aws.BaseTypes.String.t option;
}
val make : bearer_token:Aws.BaseTypes.String.t -> operation_status:OperationStatus.t -> ?⁠current_operation_status:OperationStatus.t -> ?⁠status_message:Aws.BaseTypes.String.t -> ?⁠error_code:HandlerErrorCode.t -> ?⁠resource_model:Aws.BaseTypes.String.t -> ?⁠client_request_token:Aws.BaseTypes.String.t -> unit -> t
val parse : Ezxmlm.nodes -> t option
val to_query : t -> Aws.Query.t
val to_json : t -> [> `Assoc of (string * Aws.Json.t) list ]
val of_json : Aws.Json.t -> t