line |
stmt |
bran |
cond |
sub |
pod |
time |
code |
1
|
|
|
|
|
|
|
#!/usr/bin/perl |
2
|
|
|
|
|
|
|
|
3
|
|
|
|
|
|
|
package eBay::API::XML::DataType::FeedbackSummaryType; |
4
|
|
|
|
|
|
|
|
5
|
1
|
|
|
1
|
|
1342
|
use strict; |
|
1
|
|
|
|
|
3
|
|
|
1
|
|
|
|
|
39
|
|
6
|
1
|
|
|
1
|
|
6
|
use warnings; |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
36
|
|
7
|
|
|
|
|
|
|
|
8
|
|
|
|
|
|
|
########################################################################## |
9
|
|
|
|
|
|
|
# |
10
|
|
|
|
|
|
|
# Module: ............... eBay/API/XML |
11
|
|
|
|
|
|
|
# File: ................. FeedbackSummaryType.pm |
12
|
|
|
|
|
|
|
# Generated by: ......... genEBayApiDataTypes.pl |
13
|
|
|
|
|
|
|
# Last Generated: ....... 08/24/2008 16:44 |
14
|
|
|
|
|
|
|
# API Release Number: ... 579 |
15
|
|
|
|
|
|
|
# |
16
|
|
|
|
|
|
|
########################################################################## |
17
|
|
|
|
|
|
|
|
18
|
|
|
|
|
|
|
=head1 NAME |
19
|
|
|
|
|
|
|
|
20
|
|
|
|
|
|
|
eBay::API::XML::DataType::FeedbackSummaryType |
21
|
|
|
|
|
|
|
|
22
|
|
|
|
|
|
|
=head1 DESCRIPTION |
23
|
|
|
|
|
|
|
|
24
|
|
|
|
|
|
|
Specifies all feedback summary information (except Score). Contains |
25
|
|
|
|
|
|
|
FeedbackPeriodArrayType objects that each convey feedback counts for |
26
|
|
|
|
|
|
|
positive, negative, neutral, and total feedback counts - for various |
27
|
|
|
|
|
|
|
time periods each. Also conveys counts of bid retractions for the |
28
|
|
|
|
|
|
|
predefined time periods. |
29
|
|
|
|
|
|
|
|
30
|
|
|
|
|
|
|
|
31
|
|
|
|
|
|
|
|
32
|
|
|
|
|
|
|
=head1 SYNOPSIS |
33
|
|
|
|
|
|
|
|
34
|
|
|
|
|
|
|
=cut |
35
|
|
|
|
|
|
|
|
36
|
|
|
|
|
|
|
|
37
|
|
|
|
|
|
|
=head1 INHERITANCE |
38
|
|
|
|
|
|
|
|
39
|
|
|
|
|
|
|
eBay::API::XML::DataType::FeedbackSummaryType inherits from the L class |
40
|
|
|
|
|
|
|
|
41
|
|
|
|
|
|
|
=cut |
42
|
|
|
|
|
|
|
|
43
|
1
|
|
|
1
|
|
47
|
use eBay::API::XML::BaseDataType; |
|
0
|
|
|
|
|
|
|
|
0
|
|
|
|
|
|
|
44
|
|
|
|
|
|
|
our @ISA = ("eBay::API::XML::BaseDataType"); |
45
|
|
|
|
|
|
|
|
46
|
|
|
|
|
|
|
use eBay::API::XML::DataType::BuyerRoleMetricsType; |
47
|
|
|
|
|
|
|
use eBay::API::XML::DataType::FeedbackPeriodArrayType; |
48
|
|
|
|
|
|
|
use eBay::API::XML::DataType::SellerRatingSummaryArrayType; |
49
|
|
|
|
|
|
|
use eBay::API::XML::DataType::SellerRoleMetricsType; |
50
|
|
|
|
|
|
|
|
51
|
|
|
|
|
|
|
|
52
|
|
|
|
|
|
|
my @gaProperties = ( [ 'BidRetractionFeedbackPeriodArray', 'ns:FeedbackPeriodArrayType', '' |
53
|
|
|
|
|
|
|
,'eBay::API::XML::DataType::FeedbackPeriodArrayType', '1' ] |
54
|
|
|
|
|
|
|
, [ 'BuyerRoleMetrics', 'ns:BuyerRoleMetricsType', '' |
55
|
|
|
|
|
|
|
,'eBay::API::XML::DataType::BuyerRoleMetricsType', '1' ] |
56
|
|
|
|
|
|
|
, [ 'NegativeFeedbackPeriodArray', 'ns:FeedbackPeriodArrayType', '' |
57
|
|
|
|
|
|
|
,'eBay::API::XML::DataType::FeedbackPeriodArrayType', '1' ] |
58
|
|
|
|
|
|
|
, [ 'NeutralCommentCountFromSuspendedUsers', 'xs:int', '', '', '' ] |
59
|
|
|
|
|
|
|
, [ 'NeutralFeedbackPeriodArray', 'ns:FeedbackPeriodArrayType', '' |
60
|
|
|
|
|
|
|
,'eBay::API::XML::DataType::FeedbackPeriodArrayType', '1' ] |
61
|
|
|
|
|
|
|
, [ 'PositiveFeedbackPeriodArray', 'ns:FeedbackPeriodArrayType', '' |
62
|
|
|
|
|
|
|
,'eBay::API::XML::DataType::FeedbackPeriodArrayType', '1' ] |
63
|
|
|
|
|
|
|
, [ 'SellerRatingSummaryArray', 'ns:SellerRatingSummaryArrayType', '' |
64
|
|
|
|
|
|
|
,'eBay::API::XML::DataType::SellerRatingSummaryArrayType', '1' ] |
65
|
|
|
|
|
|
|
, [ 'SellerRoleMetrics', 'ns:SellerRoleMetricsType', '' |
66
|
|
|
|
|
|
|
,'eBay::API::XML::DataType::SellerRoleMetricsType', '1' ] |
67
|
|
|
|
|
|
|
, [ 'TotalFeedbackPeriodArray', 'ns:FeedbackPeriodArrayType', '' |
68
|
|
|
|
|
|
|
,'eBay::API::XML::DataType::FeedbackPeriodArrayType', '1' ] |
69
|
|
|
|
|
|
|
, [ 'UniqueNegativeFeedbackCount', 'xs:int', '', '', '' ] |
70
|
|
|
|
|
|
|
, [ 'UniqueNeutralFeedbackCount', 'xs:int', '', '', '' ] |
71
|
|
|
|
|
|
|
, [ 'UniquePositiveFeedbackCount', 'xs:int', '', '', '' ] |
72
|
|
|
|
|
|
|
); |
73
|
|
|
|
|
|
|
push @gaProperties, @{eBay::API::XML::BaseDataType::getPropertiesList()}; |
74
|
|
|
|
|
|
|
|
75
|
|
|
|
|
|
|
my @gaAttributes = ( |
76
|
|
|
|
|
|
|
); |
77
|
|
|
|
|
|
|
push @gaAttributes, @{eBay::API::XML::BaseDataType::getAttributesList()}; |
78
|
|
|
|
|
|
|
|
79
|
|
|
|
|
|
|
=head1 Subroutines: |
80
|
|
|
|
|
|
|
|
81
|
|
|
|
|
|
|
=cut |
82
|
|
|
|
|
|
|
|
83
|
|
|
|
|
|
|
sub new { |
84
|
|
|
|
|
|
|
my $classname = shift; |
85
|
|
|
|
|
|
|
my %args = @_; |
86
|
|
|
|
|
|
|
my $self = $classname->SUPER::new(%args); |
87
|
|
|
|
|
|
|
return $self; |
88
|
|
|
|
|
|
|
} |
89
|
|
|
|
|
|
|
|
90
|
|
|
|
|
|
|
sub isScalar { |
91
|
|
|
|
|
|
|
return 0; |
92
|
|
|
|
|
|
|
} |
93
|
|
|
|
|
|
|
|
94
|
|
|
|
|
|
|
|
95
|
|
|
|
|
|
|
|
96
|
|
|
|
|
|
|
=head2 setBidRetractionFeedbackPeriodArray() |
97
|
|
|
|
|
|
|
|
98
|
|
|
|
|
|
|
Bid retractions count, for multiple predefined time periods preceding |
99
|
|
|
|
|
|
|
the call. Returned if no detail level is specified. |
100
|
|
|
|
|
|
|
|
101
|
|
|
|
|
|
|
# Argument: 'ns:FeedbackPeriodArrayType' |
102
|
|
|
|
|
|
|
|
103
|
|
|
|
|
|
|
=cut |
104
|
|
|
|
|
|
|
|
105
|
|
|
|
|
|
|
sub setBidRetractionFeedbackPeriodArray { |
106
|
|
|
|
|
|
|
my $self = shift; |
107
|
|
|
|
|
|
|
$self->{'BidRetractionFeedbackPeriodArray'} = shift |
108
|
|
|
|
|
|
|
} |
109
|
|
|
|
|
|
|
|
110
|
|
|
|
|
|
|
=head2 getBidRetractionFeedbackPeriodArray() |
111
|
|
|
|
|
|
|
|
112
|
|
|
|
|
|
|
Calls: GetFeedback |
113
|
|
|
|
|
|
|
Returned: Conditionally |
114
|
|
|
|
|
|
|
Details: DetailLevel: none, ReturnAll |
115
|
|
|
|
|
|
|
|
116
|
|
|
|
|
|
|
# Returns: 'ns:FeedbackPeriodArrayType' |
117
|
|
|
|
|
|
|
|
118
|
|
|
|
|
|
|
=cut |
119
|
|
|
|
|
|
|
|
120
|
|
|
|
|
|
|
sub getBidRetractionFeedbackPeriodArray { |
121
|
|
|
|
|
|
|
my $self = shift; |
122
|
|
|
|
|
|
|
return $self->_getDataTypeInstance( 'BidRetractionFeedbackPeriodArray' |
123
|
|
|
|
|
|
|
,'eBay::API::XML::DataType::FeedbackPeriodArrayType'); |
124
|
|
|
|
|
|
|
} |
125
|
|
|
|
|
|
|
|
126
|
|
|
|
|
|
|
|
127
|
|
|
|
|
|
|
=head2 setBuyerRoleMetrics() |
128
|
|
|
|
|
|
|
|
129
|
|
|
|
|
|
|
Container for information about 1 year feedback metric as buyer. |
130
|
|
|
|
|
|
|
|
131
|
|
|
|
|
|
|
# Argument: 'ns:BuyerRoleMetricsType' |
132
|
|
|
|
|
|
|
|
133
|
|
|
|
|
|
|
=cut |
134
|
|
|
|
|
|
|
|
135
|
|
|
|
|
|
|
sub setBuyerRoleMetrics { |
136
|
|
|
|
|
|
|
my $self = shift; |
137
|
|
|
|
|
|
|
$self->{'BuyerRoleMetrics'} = shift |
138
|
|
|
|
|
|
|
} |
139
|
|
|
|
|
|
|
|
140
|
|
|
|
|
|
|
=head2 getBuyerRoleMetrics() |
141
|
|
|
|
|
|
|
|
142
|
|
|
|
|
|
|
Calls: GetFeedback |
143
|
|
|
|
|
|
|
Returned: Conditionally |
144
|
|
|
|
|
|
|
Details: DetailLevel: none, ReturnAll |
145
|
|
|
|
|
|
|
|
146
|
|
|
|
|
|
|
# Returns: 'ns:BuyerRoleMetricsType' |
147
|
|
|
|
|
|
|
|
148
|
|
|
|
|
|
|
=cut |
149
|
|
|
|
|
|
|
|
150
|
|
|
|
|
|
|
sub getBuyerRoleMetrics { |
151
|
|
|
|
|
|
|
my $self = shift; |
152
|
|
|
|
|
|
|
return $self->_getDataTypeInstance( 'BuyerRoleMetrics' |
153
|
|
|
|
|
|
|
,'eBay::API::XML::DataType::BuyerRoleMetricsType'); |
154
|
|
|
|
|
|
|
} |
155
|
|
|
|
|
|
|
|
156
|
|
|
|
|
|
|
|
157
|
|
|
|
|
|
|
=head2 setNegativeFeedbackPeriodArray() |
158
|
|
|
|
|
|
|
|
159
|
|
|
|
|
|
|
Negative feedback entries count, for multiple predefined time periods preceding |
160
|
|
|
|
|
|
|
the call. Returned if no detail level is specified. |
161
|
|
|
|
|
|
|
|
162
|
|
|
|
|
|
|
# Argument: 'ns:FeedbackPeriodArrayType' |
163
|
|
|
|
|
|
|
|
164
|
|
|
|
|
|
|
=cut |
165
|
|
|
|
|
|
|
|
166
|
|
|
|
|
|
|
sub setNegativeFeedbackPeriodArray { |
167
|
|
|
|
|
|
|
my $self = shift; |
168
|
|
|
|
|
|
|
$self->{'NegativeFeedbackPeriodArray'} = shift |
169
|
|
|
|
|
|
|
} |
170
|
|
|
|
|
|
|
|
171
|
|
|
|
|
|
|
=head2 getNegativeFeedbackPeriodArray() |
172
|
|
|
|
|
|
|
|
173
|
|
|
|
|
|
|
Calls: GetFeedback |
174
|
|
|
|
|
|
|
Returned: Conditionally |
175
|
|
|
|
|
|
|
Details: DetailLevel: none, ReturnAll |
176
|
|
|
|
|
|
|
|
177
|
|
|
|
|
|
|
# Returns: 'ns:FeedbackPeriodArrayType' |
178
|
|
|
|
|
|
|
|
179
|
|
|
|
|
|
|
=cut |
180
|
|
|
|
|
|
|
|
181
|
|
|
|
|
|
|
sub getNegativeFeedbackPeriodArray { |
182
|
|
|
|
|
|
|
my $self = shift; |
183
|
|
|
|
|
|
|
return $self->_getDataTypeInstance( 'NegativeFeedbackPeriodArray' |
184
|
|
|
|
|
|
|
,'eBay::API::XML::DataType::FeedbackPeriodArrayType'); |
185
|
|
|
|
|
|
|
} |
186
|
|
|
|
|
|
|
|
187
|
|
|
|
|
|
|
|
188
|
|
|
|
|
|
|
=head2 setNeutralCommentCountFromSuspendedUsers() |
189
|
|
|
|
|
|
|
|
190
|
|
|
|
|
|
|
Number of neutral comments received from suspended users. Returned if no |
191
|
|
|
|
|
|
|
detail level is specified. |
192
|
|
|
|
|
|
|
|
193
|
|
|
|
|
|
|
# Argument: 'xs:int' |
194
|
|
|
|
|
|
|
|
195
|
|
|
|
|
|
|
=cut |
196
|
|
|
|
|
|
|
|
197
|
|
|
|
|
|
|
sub setNeutralCommentCountFromSuspendedUsers { |
198
|
|
|
|
|
|
|
my $self = shift; |
199
|
|
|
|
|
|
|
$self->{'NeutralCommentCountFromSuspendedUsers'} = shift |
200
|
|
|
|
|
|
|
} |
201
|
|
|
|
|
|
|
|
202
|
|
|
|
|
|
|
=head2 getNeutralCommentCountFromSuspendedUsers() |
203
|
|
|
|
|
|
|
|
204
|
|
|
|
|
|
|
Calls: GetFeedback |
205
|
|
|
|
|
|
|
Returned: Conditionally |
206
|
|
|
|
|
|
|
Details: DetailLevel: none, ReturnAll |
207
|
|
|
|
|
|
|
|
208
|
|
|
|
|
|
|
# Returns: 'xs:int' |
209
|
|
|
|
|
|
|
|
210
|
|
|
|
|
|
|
=cut |
211
|
|
|
|
|
|
|
|
212
|
|
|
|
|
|
|
sub getNeutralCommentCountFromSuspendedUsers { |
213
|
|
|
|
|
|
|
my $self = shift; |
214
|
|
|
|
|
|
|
return $self->{'NeutralCommentCountFromSuspendedUsers'}; |
215
|
|
|
|
|
|
|
} |
216
|
|
|
|
|
|
|
|
217
|
|
|
|
|
|
|
|
218
|
|
|
|
|
|
|
=head2 setNeutralFeedbackPeriodArray() |
219
|
|
|
|
|
|
|
|
220
|
|
|
|
|
|
|
Neutral feedback entries count, for multiple predefined time periods preceding |
221
|
|
|
|
|
|
|
the call. Returned if no detail level is specified. |
222
|
|
|
|
|
|
|
|
223
|
|
|
|
|
|
|
# Argument: 'ns:FeedbackPeriodArrayType' |
224
|
|
|
|
|
|
|
|
225
|
|
|
|
|
|
|
=cut |
226
|
|
|
|
|
|
|
|
227
|
|
|
|
|
|
|
sub setNeutralFeedbackPeriodArray { |
228
|
|
|
|
|
|
|
my $self = shift; |
229
|
|
|
|
|
|
|
$self->{'NeutralFeedbackPeriodArray'} = shift |
230
|
|
|
|
|
|
|
} |
231
|
|
|
|
|
|
|
|
232
|
|
|
|
|
|
|
=head2 getNeutralFeedbackPeriodArray() |
233
|
|
|
|
|
|
|
|
234
|
|
|
|
|
|
|
Calls: GetFeedback |
235
|
|
|
|
|
|
|
Returned: Conditionally |
236
|
|
|
|
|
|
|
Details: DetailLevel: none, ReturnAll |
237
|
|
|
|
|
|
|
|
238
|
|
|
|
|
|
|
# Returns: 'ns:FeedbackPeriodArrayType' |
239
|
|
|
|
|
|
|
|
240
|
|
|
|
|
|
|
=cut |
241
|
|
|
|
|
|
|
|
242
|
|
|
|
|
|
|
sub getNeutralFeedbackPeriodArray { |
243
|
|
|
|
|
|
|
my $self = shift; |
244
|
|
|
|
|
|
|
return $self->_getDataTypeInstance( 'NeutralFeedbackPeriodArray' |
245
|
|
|
|
|
|
|
,'eBay::API::XML::DataType::FeedbackPeriodArrayType'); |
246
|
|
|
|
|
|
|
} |
247
|
|
|
|
|
|
|
|
248
|
|
|
|
|
|
|
|
249
|
|
|
|
|
|
|
=head2 setPositiveFeedbackPeriodArray() |
250
|
|
|
|
|
|
|
|
251
|
|
|
|
|
|
|
Positive feedback entries count, for multiple predefined time periods |
252
|
|
|
|
|
|
|
preceding the call. Returned if no detail level is specified. |
253
|
|
|
|
|
|
|
|
254
|
|
|
|
|
|
|
# Argument: 'ns:FeedbackPeriodArrayType' |
255
|
|
|
|
|
|
|
|
256
|
|
|
|
|
|
|
=cut |
257
|
|
|
|
|
|
|
|
258
|
|
|
|
|
|
|
sub setPositiveFeedbackPeriodArray { |
259
|
|
|
|
|
|
|
my $self = shift; |
260
|
|
|
|
|
|
|
$self->{'PositiveFeedbackPeriodArray'} = shift |
261
|
|
|
|
|
|
|
} |
262
|
|
|
|
|
|
|
|
263
|
|
|
|
|
|
|
=head2 getPositiveFeedbackPeriodArray() |
264
|
|
|
|
|
|
|
|
265
|
|
|
|
|
|
|
Calls: GetFeedback |
266
|
|
|
|
|
|
|
Returned: Conditionally |
267
|
|
|
|
|
|
|
Details: DetailLevel: none, ReturnAll |
268
|
|
|
|
|
|
|
|
269
|
|
|
|
|
|
|
# Returns: 'ns:FeedbackPeriodArrayType' |
270
|
|
|
|
|
|
|
|
271
|
|
|
|
|
|
|
=cut |
272
|
|
|
|
|
|
|
|
273
|
|
|
|
|
|
|
sub getPositiveFeedbackPeriodArray { |
274
|
|
|
|
|
|
|
my $self = shift; |
275
|
|
|
|
|
|
|
return $self->_getDataTypeInstance( 'PositiveFeedbackPeriodArray' |
276
|
|
|
|
|
|
|
,'eBay::API::XML::DataType::FeedbackPeriodArrayType'); |
277
|
|
|
|
|
|
|
} |
278
|
|
|
|
|
|
|
|
279
|
|
|
|
|
|
|
|
280
|
|
|
|
|
|
|
=head2 setSellerRatingSummaryArray() |
281
|
|
|
|
|
|
|
|
282
|
|
|
|
|
|
|
Container for information about detailed seller ratings (DSRs) |
283
|
|
|
|
|
|
|
that buyers have left for a seller. |
284
|
|
|
|
|
|
|
Sellers have access to the number of ratings they've received, as well as |
285
|
|
|
|
|
|
|
to the averages of DSRs they've received in each |
286
|
|
|
|
|
|
|
DSR area (i.e., to the average of ratings in the item-description area, etc.). |
287
|
|
|
|
|
|
|
The DSR feature is available on the United Kingdom site |
288
|
|
|
|
|
|
|
and on the following other sites: AU (site ID 15), BEFR (site ID 23), |
289
|
|
|
|
|
|
|
BENL (site ID 123), FR (site ID 71), IE (site ID 205), IN (site ID 203), |
290
|
|
|
|
|
|
|
IT (site ID 101), and PL (site ID 212). The DSR feature is available on the other |
291
|
|
|
|
|
|
|
API-enabled country sites, including the US site (site ID 0). |
292
|
|
|
|
|
|
|
|
293
|
|
|
|
|
|
|
SeeLink: URL: http://developer.ebay.com/DevZone/XML/docs/WebHelp/index.htm?context=eBay_XML_API&topic=DetailedSellerRatings |
294
|
|
|
|
|
|
|
Title: Detailed Seller Ratings |
295
|
|
|
|
|
|
|
|
296
|
|
|
|
|
|
|
# Argument: 'ns:SellerRatingSummaryArrayType' |
297
|
|
|
|
|
|
|
|
298
|
|
|
|
|
|
|
=cut |
299
|
|
|
|
|
|
|
|
300
|
|
|
|
|
|
|
sub setSellerRatingSummaryArray { |
301
|
|
|
|
|
|
|
my $self = shift; |
302
|
|
|
|
|
|
|
$self->{'SellerRatingSummaryArray'} = shift |
303
|
|
|
|
|
|
|
} |
304
|
|
|
|
|
|
|
|
305
|
|
|
|
|
|
|
=head2 getSellerRatingSummaryArray() |
306
|
|
|
|
|
|
|
|
307
|
|
|
|
|
|
|
Calls: GetFeedback |
308
|
|
|
|
|
|
|
Returned: Conditionally |
309
|
|
|
|
|
|
|
Details: DetailLevel: none, ReturnAll |
310
|
|
|
|
|
|
|
|
311
|
|
|
|
|
|
|
# Returns: 'ns:SellerRatingSummaryArrayType' |
312
|
|
|
|
|
|
|
|
313
|
|
|
|
|
|
|
=cut |
314
|
|
|
|
|
|
|
|
315
|
|
|
|
|
|
|
sub getSellerRatingSummaryArray { |
316
|
|
|
|
|
|
|
my $self = shift; |
317
|
|
|
|
|
|
|
return $self->_getDataTypeInstance( 'SellerRatingSummaryArray' |
318
|
|
|
|
|
|
|
,'eBay::API::XML::DataType::SellerRatingSummaryArrayType'); |
319
|
|
|
|
|
|
|
} |
320
|
|
|
|
|
|
|
|
321
|
|
|
|
|
|
|
|
322
|
|
|
|
|
|
|
=head2 setSellerRoleMetrics() |
323
|
|
|
|
|
|
|
|
324
|
|
|
|
|
|
|
Container for information about 1 year feedback metric as seller. |
325
|
|
|
|
|
|
|
|
326
|
|
|
|
|
|
|
# Argument: 'ns:SellerRoleMetricsType' |
327
|
|
|
|
|
|
|
|
328
|
|
|
|
|
|
|
=cut |
329
|
|
|
|
|
|
|
|
330
|
|
|
|
|
|
|
sub setSellerRoleMetrics { |
331
|
|
|
|
|
|
|
my $self = shift; |
332
|
|
|
|
|
|
|
$self->{'SellerRoleMetrics'} = shift |
333
|
|
|
|
|
|
|
} |
334
|
|
|
|
|
|
|
|
335
|
|
|
|
|
|
|
=head2 getSellerRoleMetrics() |
336
|
|
|
|
|
|
|
|
337
|
|
|
|
|
|
|
Calls: GetFeedback |
338
|
|
|
|
|
|
|
Returned: Conditionally |
339
|
|
|
|
|
|
|
Details: DetailLevel: none, ReturnAll |
340
|
|
|
|
|
|
|
|
341
|
|
|
|
|
|
|
# Returns: 'ns:SellerRoleMetricsType' |
342
|
|
|
|
|
|
|
|
343
|
|
|
|
|
|
|
=cut |
344
|
|
|
|
|
|
|
|
345
|
|
|
|
|
|
|
sub getSellerRoleMetrics { |
346
|
|
|
|
|
|
|
my $self = shift; |
347
|
|
|
|
|
|
|
return $self->_getDataTypeInstance( 'SellerRoleMetrics' |
348
|
|
|
|
|
|
|
,'eBay::API::XML::DataType::SellerRoleMetricsType'); |
349
|
|
|
|
|
|
|
} |
350
|
|
|
|
|
|
|
|
351
|
|
|
|
|
|
|
|
352
|
|
|
|
|
|
|
=head2 setTotalFeedbackPeriodArray() |
353
|
|
|
|
|
|
|
|
354
|
|
|
|
|
|
|
Total feedback score, for multiple predefined time periods preceding the |
355
|
|
|
|
|
|
|
call. Returned if no detail level is specified. |
356
|
|
|
|
|
|
|
|
357
|
|
|
|
|
|
|
# Argument: 'ns:FeedbackPeriodArrayType' |
358
|
|
|
|
|
|
|
|
359
|
|
|
|
|
|
|
=cut |
360
|
|
|
|
|
|
|
|
361
|
|
|
|
|
|
|
sub setTotalFeedbackPeriodArray { |
362
|
|
|
|
|
|
|
my $self = shift; |
363
|
|
|
|
|
|
|
$self->{'TotalFeedbackPeriodArray'} = shift |
364
|
|
|
|
|
|
|
} |
365
|
|
|
|
|
|
|
|
366
|
|
|
|
|
|
|
=head2 getTotalFeedbackPeriodArray() |
367
|
|
|
|
|
|
|
|
368
|
|
|
|
|
|
|
Calls: GetFeedback |
369
|
|
|
|
|
|
|
Returned: Conditionally |
370
|
|
|
|
|
|
|
Details: DetailLevel: none, ReturnAll |
371
|
|
|
|
|
|
|
|
372
|
|
|
|
|
|
|
# Returns: 'ns:FeedbackPeriodArrayType' |
373
|
|
|
|
|
|
|
|
374
|
|
|
|
|
|
|
=cut |
375
|
|
|
|
|
|
|
|
376
|
|
|
|
|
|
|
sub getTotalFeedbackPeriodArray { |
377
|
|
|
|
|
|
|
my $self = shift; |
378
|
|
|
|
|
|
|
return $self->_getDataTypeInstance( 'TotalFeedbackPeriodArray' |
379
|
|
|
|
|
|
|
,'eBay::API::XML::DataType::FeedbackPeriodArrayType'); |
380
|
|
|
|
|
|
|
} |
381
|
|
|
|
|
|
|
|
382
|
|
|
|
|
|
|
|
383
|
|
|
|
|
|
|
=head2 setUniqueNegativeFeedbackCount() |
384
|
|
|
|
|
|
|
|
385
|
|
|
|
|
|
|
Total number of negative Feedback comments, including weekly repeats. Returned if no detail level is specified. |
386
|
|
|
|
|
|
|
|
387
|
|
|
|
|
|
|
# Argument: 'xs:int' |
388
|
|
|
|
|
|
|
|
389
|
|
|
|
|
|
|
=cut |
390
|
|
|
|
|
|
|
|
391
|
|
|
|
|
|
|
sub setUniqueNegativeFeedbackCount { |
392
|
|
|
|
|
|
|
my $self = shift; |
393
|
|
|
|
|
|
|
$self->{'UniqueNegativeFeedbackCount'} = shift |
394
|
|
|
|
|
|
|
} |
395
|
|
|
|
|
|
|
|
396
|
|
|
|
|
|
|
=head2 getUniqueNegativeFeedbackCount() |
397
|
|
|
|
|
|
|
|
398
|
|
|
|
|
|
|
Calls: GetFeedback |
399
|
|
|
|
|
|
|
Returned: Conditionally |
400
|
|
|
|
|
|
|
Details: DetailLevel: none, ReturnAll |
401
|
|
|
|
|
|
|
|
402
|
|
|
|
|
|
|
# Returns: 'xs:int' |
403
|
|
|
|
|
|
|
|
404
|
|
|
|
|
|
|
=cut |
405
|
|
|
|
|
|
|
|
406
|
|
|
|
|
|
|
sub getUniqueNegativeFeedbackCount { |
407
|
|
|
|
|
|
|
my $self = shift; |
408
|
|
|
|
|
|
|
return $self->{'UniqueNegativeFeedbackCount'}; |
409
|
|
|
|
|
|
|
} |
410
|
|
|
|
|
|
|
|
411
|
|
|
|
|
|
|
|
412
|
|
|
|
|
|
|
=head2 setUniqueNeutralFeedbackCount() |
413
|
|
|
|
|
|
|
|
414
|
|
|
|
|
|
|
Total number of neutral Feedback comments, including weekly repeats. Returned if no detail level is specified. |
415
|
|
|
|
|
|
|
|
416
|
|
|
|
|
|
|
# Argument: 'xs:int' |
417
|
|
|
|
|
|
|
|
418
|
|
|
|
|
|
|
=cut |
419
|
|
|
|
|
|
|
|
420
|
|
|
|
|
|
|
sub setUniqueNeutralFeedbackCount { |
421
|
|
|
|
|
|
|
my $self = shift; |
422
|
|
|
|
|
|
|
$self->{'UniqueNeutralFeedbackCount'} = shift |
423
|
|
|
|
|
|
|
} |
424
|
|
|
|
|
|
|
|
425
|
|
|
|
|
|
|
=head2 getUniqueNeutralFeedbackCount() |
426
|
|
|
|
|
|
|
|
427
|
|
|
|
|
|
|
Calls: GetFeedback |
428
|
|
|
|
|
|
|
Returned: Conditionally |
429
|
|
|
|
|
|
|
Details: DetailLevel: none, ReturnAll |
430
|
|
|
|
|
|
|
|
431
|
|
|
|
|
|
|
# Returns: 'xs:int' |
432
|
|
|
|
|
|
|
|
433
|
|
|
|
|
|
|
=cut |
434
|
|
|
|
|
|
|
|
435
|
|
|
|
|
|
|
sub getUniqueNeutralFeedbackCount { |
436
|
|
|
|
|
|
|
my $self = shift; |
437
|
|
|
|
|
|
|
return $self->{'UniqueNeutralFeedbackCount'}; |
438
|
|
|
|
|
|
|
} |
439
|
|
|
|
|
|
|
|
440
|
|
|
|
|
|
|
|
441
|
|
|
|
|
|
|
=head2 setUniquePositiveFeedbackCount() |
442
|
|
|
|
|
|
|
|
443
|
|
|
|
|
|
|
Total number of positive Feedback comments, including weekly repeats. Returned if no detail level is specified. |
444
|
|
|
|
|
|
|
|
445
|
|
|
|
|
|
|
# Argument: 'xs:int' |
446
|
|
|
|
|
|
|
|
447
|
|
|
|
|
|
|
=cut |
448
|
|
|
|
|
|
|
|
449
|
|
|
|
|
|
|
sub setUniquePositiveFeedbackCount { |
450
|
|
|
|
|
|
|
my $self = shift; |
451
|
|
|
|
|
|
|
$self->{'UniquePositiveFeedbackCount'} = shift |
452
|
|
|
|
|
|
|
} |
453
|
|
|
|
|
|
|
|
454
|
|
|
|
|
|
|
=head2 getUniquePositiveFeedbackCount() |
455
|
|
|
|
|
|
|
|
456
|
|
|
|
|
|
|
Calls: GetFeedback |
457
|
|
|
|
|
|
|
Returned: Conditionally |
458
|
|
|
|
|
|
|
Details: DetailLevel: none, ReturnAll |
459
|
|
|
|
|
|
|
|
460
|
|
|
|
|
|
|
# Returns: 'xs:int' |
461
|
|
|
|
|
|
|
|
462
|
|
|
|
|
|
|
=cut |
463
|
|
|
|
|
|
|
|
464
|
|
|
|
|
|
|
sub getUniquePositiveFeedbackCount { |
465
|
|
|
|
|
|
|
my $self = shift; |
466
|
|
|
|
|
|
|
return $self->{'UniquePositiveFeedbackCount'}; |
467
|
|
|
|
|
|
|
} |
468
|
|
|
|
|
|
|
|
469
|
|
|
|
|
|
|
|
470
|
|
|
|
|
|
|
|
471
|
|
|
|
|
|
|
|
472
|
|
|
|
|
|
|
|
473
|
|
|
|
|
|
|
## Attribute and Property lists |
474
|
|
|
|
|
|
|
sub getPropertiesList { |
475
|
|
|
|
|
|
|
my $self = shift; |
476
|
|
|
|
|
|
|
return \@gaProperties; |
477
|
|
|
|
|
|
|
} |
478
|
|
|
|
|
|
|
|
479
|
|
|
|
|
|
|
sub getAttributesList { |
480
|
|
|
|
|
|
|
my $self = shift; |
481
|
|
|
|
|
|
|
return \@gaAttributes; |
482
|
|
|
|
|
|
|
} |
483
|
|
|
|
|
|
|
|
484
|
|
|
|
|
|
|
|
485
|
|
|
|
|
|
|
|
486
|
|
|
|
|
|
|
1; |