File Coverage

lib/eBay/API/XML/DataType/BestOfferDetailsType.pm
Criterion Covered Total %
statement 7 9 77.7
branch n/a
condition n/a
subroutine 3 3 100.0
pod n/a
total 10 12 83.3


line stmt bran cond sub pod time code
1             #!/usr/bin/perl
2              
3             package eBay::API::XML::DataType::BestOfferDetailsType;
4              
5 1     1   2199 use strict;
  1         185  
  1         52  
6 1     1   6 use warnings;
  1         2  
  1         37  
7              
8             ##########################################################################
9             #
10             # Module: ............... eBay/API/XML
11             # File: ................. BestOfferDetailsType.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::BestOfferDetailsType
21              
22             =head1 DESCRIPTION
23              
24             Container for BestOffer properties associated with the item.
25              
26              
27              
28             =head1 SYNOPSIS
29              
30             =cut
31              
32              
33             =head1 INHERITANCE
34              
35             eBay::API::XML::DataType::BestOfferDetailsType inherits from the L class
36              
37             =cut
38              
39 1     1   52 use eBay::API::XML::BaseDataType;
  0            
  0            
40             our @ISA = ("eBay::API::XML::BaseDataType");
41              
42             use eBay::API::XML::DataType::AmountType;
43             use eBay::API::XML::DataType::Enum::BestOfferStatusCodeType;
44             use eBay::API::XML::DataType::Enum::BestOfferTypeCodeType;
45              
46              
47             my @gaProperties = ( [ 'BestOffer', 'ns:AmountType', ''
48             ,'eBay::API::XML::DataType::AmountType', '1' ]
49             , [ 'BestOfferCount', 'xs:int', '', '', '' ]
50             , [ 'BestOfferEnabled', 'xs:boolean', '', '', '' ]
51             , [ 'BestOfferStatus', 'ns:BestOfferStatusCodeType', ''
52             ,'eBay::API::XML::DataType::Enum::BestOfferStatusCodeType', '' ]
53             , [ 'BestOfferType', 'ns:BestOfferTypeCodeType', ''
54             ,'eBay::API::XML::DataType::Enum::BestOfferTypeCodeType', '' ]
55             );
56             push @gaProperties, @{eBay::API::XML::BaseDataType::getPropertiesList()};
57              
58             my @gaAttributes = (
59             );
60             push @gaAttributes, @{eBay::API::XML::BaseDataType::getAttributesList()};
61              
62             =head1 Subroutines:
63              
64             =cut
65              
66             sub new {
67             my $classname = shift;
68             my %args = @_;
69             my $self = $classname->SUPER::new(%args);
70             return $self;
71             }
72              
73             sub isScalar {
74             return 0;
75             }
76              
77              
78              
79             =head2 setBestOffer()
80              
81             (GetMyeBayBuying only) Indicates the latest BestOffer the user has provided for the item.
82              
83             # Argument: 'ns:AmountType'
84              
85             =cut
86              
87             sub setBestOffer {
88             my $self = shift;
89             $self->{'BestOffer'} = shift
90             }
91              
92             =head2 getBestOffer()
93              
94             Calls: GetMyeBayBuying
95             Returned: Conditionally
96             Details: DetailLevel: none, ReturnSummary, ReturnAll
97             Context: BestOfferList
98              
99             # Returns: 'ns:AmountType'
100              
101             =cut
102              
103             sub getBestOffer {
104             my $self = shift;
105             return $self->_getDataTypeInstance( 'BestOffer'
106             ,'eBay::API::XML::DataType::AmountType');
107             }
108              
109              
110             =head2 setBestOfferCount()
111              
112             The number of best offers made for this item, if any.
113              
114             # Argument: 'xs:int'
115              
116             =cut
117              
118             sub setBestOfferCount {
119             my $self = shift;
120             $self->{'BestOfferCount'} = shift
121             }
122              
123             =head2 getBestOfferCount()
124              
125             Calls: GetBidderList
126             GetSellerList
127             Returned: Conditionally
128              
129             Calls: GetItem
130             Returned: Conditionally
131             Details: DetailLevel: none, ItemReturnDescription, ItemReturnAttributes, ReturnAll
132              
133             # Returns: 'xs:int'
134              
135             =cut
136              
137             sub getBestOfferCount {
138             my $self = shift;
139             return $self->{'BestOfferCount'};
140             }
141              
142              
143             =head2 setBestOfferEnabled()
144              
145             Whether best offer is enabled for this item.
146             A seller of a fixed price format item (in a category for which Best Offer is also enabled) can opt that item into the Best Offer feature. This feature enables a buyer to make a lower priced binding offer on that item.
147             If a listing has no active best offers, you can change this value (true to false, and vice versa).
148             If a listing does have active best offers, you cannot change the value to false.
149              
150             Calls: AddItem
151             GetItemRecommendations
152             RelistItem
153             ReviseItem
154             VerifyAddItem
155             RequiredInput: No
156              
157             # Argument: 'xs:boolean'
158              
159             =cut
160              
161             sub setBestOfferEnabled {
162             my $self = shift;
163             $self->{'BestOfferEnabled'} = shift
164             }
165              
166             =head2 isBestOfferEnabled()
167              
168             Calls: GetBidderList
169             Returned: Conditionally
170              
171             Calls: GetItem
172             Returned: Conditionally
173             Details: DetailLevel: none, ItemReturnDescription, ItemReturnAttributes, ReturnAll
174              
175             Calls: GetSellerEvents
176             Returned: Conditionally
177             Details: DetailLevel: none, ReturnAll
178              
179             # Returns: 'xs:boolean'
180              
181             =cut
182              
183             sub isBestOfferEnabled {
184             my $self = shift;
185             return $self->{'BestOfferEnabled'};
186             }
187              
188              
189             =head2 setBestOfferStatus()
190              
191             (GetMyeBayBuying only) Indicates the status of the latest BestOffer the user has provided for the item.
192              
193             # Argument: 'ns:BestOfferStatusCodeType'
194              
195             =cut
196              
197             sub setBestOfferStatus {
198             my $self = shift;
199             $self->{'BestOfferStatus'} = shift
200             }
201              
202             =head2 getBestOfferStatus()
203              
204             Calls: GetMyeBayBuying
205             Returned: Conditionally
206             Details: DetailLevel: none, ReturnSummary, ReturnAll
207             Context: BestOfferList
208              
209             # Returns: 'ns:BestOfferStatusCodeType'
210              
211             =cut
212              
213             sub getBestOfferStatus {
214             my $self = shift;
215             return $self->{'BestOfferStatus'};
216             }
217              
218              
219             =head2 setBestOfferType()
220              
221             Indicates the best offer type of the latest BestOffer the user has provided for the item.
222              
223             # Argument: 'ns:BestOfferTypeCodeType'
224              
225             =cut
226              
227             sub setBestOfferType {
228             my $self = shift;
229             $self->{'BestOfferType'} = shift
230             }
231              
232             =head2 getBestOfferType()
233              
234             # Returns: 'ns:BestOfferTypeCodeType'
235              
236             =cut
237              
238             sub getBestOfferType {
239             my $self = shift;
240             return $self->{'BestOfferType'};
241             }
242              
243              
244              
245              
246              
247             ## Attribute and Property lists
248             sub getPropertiesList {
249             my $self = shift;
250             return \@gaProperties;
251             }
252              
253             sub getAttributesList {
254             my $self = shift;
255             return \@gaAttributes;
256             }
257              
258              
259              
260             1;