1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
open Awso_pinpoint_sms_voice_v2
open Awso_sync
module Io = Http.Io
let eval ?endpoint_url ?cfg endpoint input =
Io.bind (Io.resolve_cfg cfg)
(fun cfg ->
let meth = Endpoints.method_of_endpoint endpoint in
let uri = Endpoints.uri_of_endpoint endpoint input in
Io.map
(Io.call ?endpoint_url ~cfg ~service:Values.service meth
(Endpoints.to_request endpoint input) uri)
(fun resp_result -> Endpoints.of_response endpoint resp_result))
let associate_origination_identity ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.AssociateOriginationIdentity input
let associate_protect_configuration ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.AssociateProtectConfiguration input
let carrier_lookup ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CarrierLookup input
let create_configuration_set ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CreateConfigurationSet input
let create_event_destination ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CreateEventDestination input
let create_notify_configuration ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CreateNotifyConfiguration input
let create_opt_out_list ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CreateOptOutList input
let create_pool ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CreatePool input
let create_protect_configuration ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CreateProtectConfiguration input
let create_rcs_agent ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CreateRcsAgent input
let create_registration ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CreateRegistration input
let create_registration_association ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CreateRegistrationAssociation input
let create_registration_attachment ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CreateRegistrationAttachment input
let create_registration_version ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CreateRegistrationVersion input
let create_verified_destination_number ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CreateVerifiedDestinationNumber input
let delete_account_default_protect_configuration ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteAccountDefaultProtectConfiguration
input
let delete_configuration_set ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteConfigurationSet input
let delete_default_message_type ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteDefaultMessageType input
let delete_default_sender_id ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteDefaultSenderId input
let delete_event_destination ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteEventDestination input
let delete_keyword ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteKeyword input
let delete_media_message_spend_limit_override ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteMediaMessageSpendLimitOverride
input
let delete_notify_configuration ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteNotifyConfiguration input
let delete_notify_message_spend_limit_override ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteNotifyMessageSpendLimitOverride
input
let delete_opt_out_list ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteOptOutList input
let delete_opted_out_number ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteOptedOutNumber input
let delete_pool ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeletePool input
let delete_protect_configuration ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteProtectConfiguration input
let delete_protect_configuration_rule_set_number_override ?endpoint_url ?cfg
input =
eval ?endpoint_url ?cfg
Endpoints.DeleteProtectConfigurationRuleSetNumberOverride input
let delete_rcs_agent ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteRcsAgent input
let delete_registration ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteRegistration input
let delete_registration_attachment ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteRegistrationAttachment input
let delete_registration_field_value ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteRegistrationFieldValue input
let delete_resource_policy ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteResourcePolicy input
let delete_text_message_spend_limit_override ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteTextMessageSpendLimitOverride input
let delete_verified_destination_number ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteVerifiedDestinationNumber input
let delete_voice_message_spend_limit_override ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteVoiceMessageSpendLimitOverride
input
let describe_account_attributes ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DescribeAccountAttributes input
let describe_account_limits ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DescribeAccountLimits input
let describe_configuration_sets ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DescribeConfigurationSets input
let describe_keywords ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DescribeKeywords input
let describe_notify_configurations ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DescribeNotifyConfigurations input
let describe_notify_templates ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DescribeNotifyTemplates input
let describe_opt_out_lists ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DescribeOptOutLists input
let describe_opted_out_numbers ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DescribeOptedOutNumbers input
let describe_phone_numbers ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DescribePhoneNumbers input
let describe_pools ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DescribePools input
let describe_protect_configurations ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DescribeProtectConfigurations input
let describe_rcs_agent_country_launch_status ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DescribeRcsAgentCountryLaunchStatus input
let describe_rcs_agents ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DescribeRcsAgents input
let describe_registration_attachments ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DescribeRegistrationAttachments input
let describe_registration_field_definitions ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DescribeRegistrationFieldDefinitions
input
let describe_registration_field_values ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DescribeRegistrationFieldValues input
let describe_registration_section_definitions ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DescribeRegistrationSectionDefinitions
input
let describe_registration_type_definitions ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DescribeRegistrationTypeDefinitions input
let describe_registration_versions ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DescribeRegistrationVersions input
let describe_registrations ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DescribeRegistrations input
let describe_sender_ids ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DescribeSenderIds input
let describe_spend_limits ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DescribeSpendLimits input
let describe_verified_destination_numbers ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DescribeVerifiedDestinationNumbers input
let disassociate_origination_identity ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DisassociateOriginationIdentity input
let disassociate_protect_configuration ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DisassociateProtectConfiguration input
let discard_registration_version ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DiscardRegistrationVersion input
let get_protect_configuration_country_rule_set ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetProtectConfigurationCountryRuleSet
input
let get_resource_policy ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetResourcePolicy input
let list_notify_countries ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListNotifyCountries input
let list_pool_origination_identities ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListPoolOriginationIdentities input
let list_protect_configuration_rule_set_number_overrides ?endpoint_url ?cfg
input =
eval ?endpoint_url ?cfg
Endpoints.ListProtectConfigurationRuleSetNumberOverrides input
let list_registration_associations ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListRegistrationAssociations input
let list_tags_for_resource ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListTagsForResource input
let put_keyword ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.PutKeyword input
let put_message_feedback ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.PutMessageFeedback input
let put_opted_out_number ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.PutOptedOutNumber input
let put_protect_configuration_rule_set_number_override ?endpoint_url ?cfg
input =
eval ?endpoint_url ?cfg
Endpoints.PutProtectConfigurationRuleSetNumberOverride input
let put_registration_field_value ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.PutRegistrationFieldValue input
let put_resource_policy ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.PutResourcePolicy input
let release_phone_number ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ReleasePhoneNumber input
let release_sender_id ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ReleaseSenderId input
let request_phone_number ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.RequestPhoneNumber input
let request_sender_id ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.RequestSenderId input
let send_destination_number_verification_code ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.SendDestinationNumberVerificationCode
input
let send_media_message ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.SendMediaMessage input
let send_notify_text_message ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.SendNotifyTextMessage input
let send_notify_voice_message ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.SendNotifyVoiceMessage input
let send_text_message ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.SendTextMessage input
let send_voice_message ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.SendVoiceMessage input
let set_account_default_protect_configuration ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.SetAccountDefaultProtectConfiguration
input
let set_default_message_feedback_enabled ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.SetDefaultMessageFeedbackEnabled input
let set_default_message_type ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.SetDefaultMessageType input
let set_default_sender_id ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.SetDefaultSenderId input
let set_media_message_spend_limit_override ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.SetMediaMessageSpendLimitOverride input
let set_notify_message_spend_limit_override ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.SetNotifyMessageSpendLimitOverride input
let set_text_message_spend_limit_override ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.SetTextMessageSpendLimitOverride input
let set_voice_message_spend_limit_override ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.SetVoiceMessageSpendLimitOverride input
let submit_registration_version ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.SubmitRegistrationVersion input
let tag_resource ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.TagResource input
let untag_resource ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.UntagResource input
let update_event_destination ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.UpdateEventDestination input
let update_notify_configuration ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.UpdateNotifyConfiguration input
let update_phone_number ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.UpdatePhoneNumber input
let update_pool ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.UpdatePool input
let update_protect_configuration ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.UpdateProtectConfiguration input
let update_protect_configuration_country_rule_set ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.UpdateProtectConfigurationCountryRuleSet
input
let update_rcs_agent ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.UpdateRcsAgent input
let update_sender_id ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.UpdateSenderId input
let verify_destination_number ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.VerifyDestinationNumber input