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
open Awso_customer_profiles
open Awso_async
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 add_profile_key ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.AddProfileKey input
let batch_get_calculated_attribute_for_profile ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.BatchGetCalculatedAttributeForProfile
input
let batch_get_profile ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.BatchGetProfile input
let create_calculated_attribute_definition ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CreateCalculatedAttributeDefinition input
let create_domain ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CreateDomain input
let create_domain_layout ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CreateDomainLayout input
let create_event_stream ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CreateEventStream input
let create_event_trigger ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CreateEventTrigger input
let create_integration_workflow ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CreateIntegrationWorkflow input
let create_profile ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CreateProfile input
let create_recommender ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CreateRecommender input
let create_recommender_filter ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CreateRecommenderFilter input
let create_recommender_schema ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CreateRecommenderSchema input
let create_segment_definition ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CreateSegmentDefinition input
let create_segment_estimate ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CreateSegmentEstimate input
let create_segment_snapshot ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CreateSegmentSnapshot input
let create_upload_job ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CreateUploadJob input
let delete_calculated_attribute_definition ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteCalculatedAttributeDefinition input
let delete_domain ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteDomain input
let delete_domain_layout ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteDomainLayout input
let delete_domain_object_type ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteDomainObjectType input
let delete_event_stream ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteEventStream input
let delete_event_trigger ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteEventTrigger input
let delete_integration ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteIntegration input
let delete_profile ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteProfile input
let delete_profile_key ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteProfileKey input
let delete_profile_object ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteProfileObject input
let delete_profile_object_type ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteProfileObjectType input
let delete_recommender ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteRecommender input
let delete_recommender_filter ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteRecommenderFilter input
let delete_recommender_schema ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteRecommenderSchema input
let delete_segment_definition ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteSegmentDefinition input
let delete_workflow ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteWorkflow input
let detect_profile_object_type ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DetectProfileObjectType input
let get_auto_merging_preview ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetAutoMergingPreview input
let get_calculated_attribute_definition ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetCalculatedAttributeDefinition input
let get_calculated_attribute_for_profile ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetCalculatedAttributeForProfile input
let get_domain ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetDomain input
let get_domain_layout ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetDomainLayout input
let get_domain_object_type ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetDomainObjectType input
let get_event_stream ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetEventStream input
let get_event_trigger ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetEventTrigger input
let get_identity_resolution_job ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetIdentityResolutionJob input
let get_integration ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetIntegration input
let get_matches ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetMatches input
let get_object_type_attribute_statistics ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetObjectTypeAttributeStatistics input
let get_profile_history_record ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetProfileHistoryRecord input
let get_profile_object_type ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetProfileObjectType input
let get_profile_object_type_template ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetProfileObjectTypeTemplate input
let get_profile_recommendations ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetProfileRecommendations input
let get_recommender ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetRecommender input
let get_recommender_filter ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetRecommenderFilter input
let get_recommender_schema ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetRecommenderSchema input
let get_segment_definition ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetSegmentDefinition input
let get_segment_estimate ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetSegmentEstimate input
let get_segment_membership ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetSegmentMembership input
let get_segment_snapshot ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetSegmentSnapshot input
let get_similar_profiles ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetSimilarProfiles input
let get_upload_job ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetUploadJob input
let get_upload_job_path ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetUploadJobPath input
let get_workflow ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetWorkflow input
let get_workflow_steps ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetWorkflowSteps input
let list_account_integrations ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListAccountIntegrations input
let list_calculated_attribute_definitions ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListCalculatedAttributeDefinitions input
let list_calculated_attributes_for_profile ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListCalculatedAttributesForProfile input
let list_domain_layouts ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListDomainLayouts input
let list_domain_object_types ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListDomainObjectTypes input
let list_domains ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListDomains input
let list_event_streams ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListEventStreams input
let list_event_triggers ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListEventTriggers input
let list_identity_resolution_jobs ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListIdentityResolutionJobs input
let list_integrations ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListIntegrations input
let list_object_type_attribute_values ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListObjectTypeAttributeValues input
let list_object_type_attributes ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListObjectTypeAttributes input
let list_profile_attribute_values ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListProfileAttributeValues input
let list_profile_history_records ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListProfileHistoryRecords input
let list_profile_object_type_templates ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListProfileObjectTypeTemplates input
let list_profile_object_types ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListProfileObjectTypes input
let list_profile_objects ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListProfileObjects input
let list_recommender_filters ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListRecommenderFilters input
let list_recommender_recipes ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListRecommenderRecipes input
let list_recommender_schemas ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListRecommenderSchemas input
let list_recommenders ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListRecommenders input
let list_rule_based_matches ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListRuleBasedMatches input
let list_segment_definitions ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListSegmentDefinitions input
let list_tags_for_resource ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListTagsForResource input
let list_upload_jobs ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListUploadJobs input
let list_workflows ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListWorkflows input
let merge_profiles ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.MergeProfiles input
let put_domain_object_type ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.PutDomainObjectType input
let put_integration ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.PutIntegration input
let put_profile_object ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.PutProfileObject input
let put_profile_object_type ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.PutProfileObjectType input
let search_profiles ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.SearchProfiles input
let start_recommender ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.StartRecommender input
let start_upload_job ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.StartUploadJob input
let stop_recommender ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.StopRecommender input
let stop_upload_job ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.StopUploadJob 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_calculated_attribute_definition ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.UpdateCalculatedAttributeDefinition input
let update_domain ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.UpdateDomain input
let update_domain_layout ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.UpdateDomainLayout input
let update_event_trigger ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.UpdateEventTrigger input
let update_profile ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.UpdateProfile input
let update_recommender ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.UpdateRecommender input