Smaws_Client_Redshift.CreateSnapshotScheduleCreate a snapshot schedule that can be associated to a cluster and which overrides the default system backup schedule.
val error_to_string :
[ Smaws_Lib.Protocols.AwsQuery.error
| `InvalidScheduleFault of Types.invalid_schedule_fault
| `InvalidTagFault of Types.invalid_tag_fault
| `ScheduleDefinitionTypeUnsupportedFault of
Types.schedule_definition_type_unsupported_fault
| `SnapshotScheduleAlreadyExistsFault of
Types.snapshot_schedule_already_exists_fault
| `SnapshotScheduleQuotaExceededFault of
Types.snapshot_schedule_quota_exceeded_fault
| `TagLimitExceededFault of Types.tag_limit_exceeded_fault ] ->
stringval request :
'http_type Smaws_Lib.Context.t ->
Types.create_snapshot_schedule_message ->
(Types.snapshot_schedule,
[> Smaws_Lib.Protocols.AwsQuery.error
| `InvalidScheduleFault of Types.invalid_schedule_fault
| `InvalidTagFault of Types.invalid_tag_fault
| `ScheduleDefinitionTypeUnsupportedFault of
Types.schedule_definition_type_unsupported_fault
| `SnapshotScheduleAlreadyExistsFault of
Types.snapshot_schedule_already_exists_fault
| `SnapshotScheduleQuotaExceededFault of
Types.snapshot_schedule_quota_exceeded_fault
| `TagLimitExceededFault of Types.tag_limit_exceeded_fault ])
Stdlib.resultval request_with_metadata :
'http_type Smaws_Lib.Context.t ->
Types.create_snapshot_schedule_message ->
(Types.snapshot_schedule Smaws_Lib.Response.t,
[> Smaws_Lib.Protocols.AwsQuery.error
| `InvalidScheduleFault of Types.invalid_schedule_fault
| `InvalidTagFault of Types.invalid_tag_fault
| `ScheduleDefinitionTypeUnsupportedFault of
Types.schedule_definition_type_unsupported_fault
| `SnapshotScheduleAlreadyExistsFault of
Types.snapshot_schedule_already_exists_fault
| `SnapshotScheduleQuotaExceededFault of
Types.snapshot_schedule_quota_exceeded_fault
| `TagLimitExceededFault of Types.tag_limit_exceeded_fault ]
* Smaws_Lib.Response.metadata)
Stdlib.result