Smaws_Client_Redshift.UpdatePartnerStatusUpdates the status of a partner integration.
val error_to_string :
[ Smaws_Lib.Protocols.AwsQuery.error
| `ClusterNotFoundFault of Types.cluster_not_found_fault
| `PartnerNotFoundFault of Types.partner_not_found_fault
| `UnauthorizedPartnerIntegrationFault of
Types.unauthorized_partner_integration_fault
| `UnsupportedOperationFault of Types.unsupported_operation_fault ] ->
stringval request :
'http_type Smaws_Lib.Context.t ->
Types.update_partner_status_input_message ->
(Types.partner_integration_output_message,
[> Smaws_Lib.Protocols.AwsQuery.error
| `ClusterNotFoundFault of Types.cluster_not_found_fault
| `PartnerNotFoundFault of Types.partner_not_found_fault
| `UnauthorizedPartnerIntegrationFault of
Types.unauthorized_partner_integration_fault
| `UnsupportedOperationFault of Types.unsupported_operation_fault ])
Stdlib.resultval request_with_metadata :
'http_type Smaws_Lib.Context.t ->
Types.update_partner_status_input_message ->
(Types.partner_integration_output_message Smaws_Lib.Response.t,
[> Smaws_Lib.Protocols.AwsQuery.error
| `ClusterNotFoundFault of Types.cluster_not_found_fault
| `PartnerNotFoundFault of Types.partner_not_found_fault
| `UnauthorizedPartnerIntegrationFault of
Types.unauthorized_partner_integration_fault
| `UnsupportedOperationFault of Types.unsupported_operation_fault ]
* Smaws_Lib.Response.metadata)
Stdlib.result