File Coverage

lib/eBay/API/XML/DataType/BiddingDetailsType.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::BiddingDetailsType;
4              
5 1     1   1543 use strict;
  1         2  
  1         29  
6 1     1   4 use warnings;
  1         2  
  1         27  
7              
8             ##########################################################################
9             #
10             # Module: ............... eBay/API/XML
11             # File: ................. BiddingDetailsType.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::BiddingDetailsType
21              
22             =head1 DESCRIPTION
23              
24             Contains detailed information about a bid.
25              
26              
27              
28             =head1 SYNOPSIS
29              
30             =cut
31              
32              
33             =head1 INHERITANCE
34              
35             eBay::API::XML::DataType::BiddingDetailsType inherits from the L class
36              
37             =cut
38              
39 1     1   34 use eBay::API::XML::BaseDataType;
  0            
  0            
40             our @ISA = ("eBay::API::XML::BaseDataType");
41              
42             use eBay::API::XML::DataType::AmountType;
43              
44              
45             my @gaProperties = ( [ 'BidAssistant', 'xs:boolean', '', '', '' ]
46             , [ 'ConvertedMaxBid', 'ns:AmountType', ''
47             ,'eBay::API::XML::DataType::AmountType', '1' ]
48             , [ 'MaxBid', 'ns:AmountType', ''
49             ,'eBay::API::XML::DataType::AmountType', '1' ]
50             , [ 'QuantityBid', 'xs:int', '', '', '' ]
51             , [ 'QuantityWon', 'xs:int', '', '', '' ]
52             , [ 'Winning', 'xs:boolean', '', '', '' ]
53             );
54             push @gaProperties, @{eBay::API::XML::BaseDataType::getPropertiesList()};
55              
56             my @gaAttributes = (
57             );
58             push @gaAttributes, @{eBay::API::XML::BaseDataType::getAttributesList()};
59              
60             =head1 Subroutines:
61              
62             =cut
63              
64             sub new {
65             my $classname = shift;
66             my %args = @_;
67             my $self = $classname->SUPER::new(%args);
68             return $self;
69             }
70              
71             sub isScalar {
72             return 0;
73             }
74              
75              
76              
77             =head2 setBidAssistant()
78              
79             Indicates whether the current bid was placed by BidAssistant.
80             Only returns if true.
81              
82             # Argument: 'xs:boolean'
83              
84             =cut
85              
86             sub setBidAssistant {
87             my $self = shift;
88             $self->{'BidAssistant'} = shift
89             }
90              
91             =head2 isBidAssistant()
92              
93             Calls: GetMyeBayBuying
94             Returned: Conditionally
95             Details: DetailLevel: none, ReturnSummary, ReturnAll
96             Context: BidList
97             LostList
98             WonList
99             DeletedFromWonList
100             DeletedFromLostList
101             WatchList
102              
103             Calls: GetMyeBaySelling
104             Returned: Conditionally
105             Details: DetailLevel: none, ReturnSummary, ReturnAll
106             Context: BidList
107              
108             # Returns: 'xs:boolean'
109              
110             =cut
111              
112             sub isBidAssistant {
113             my $self = shift;
114             return $self->{'BidAssistant'};
115             }
116              
117              
118             =head2 setConvertedMaxBid()
119              
120             Converted value of the amount in MaxBidAmount, in the currency
121             indicated by SiteCurrency.
122             For active items, refresh the listing's data every 24 hours to
123             pick up the current conversion rates. Under conditions where this
124             value would be N/A on the eBay site, this element is not returned
125             at all.
126              
127             # Argument: 'ns:AmountType'
128              
129             =cut
130              
131             sub setConvertedMaxBid {
132             my $self = shift;
133             $self->{'ConvertedMaxBid'} = shift
134             }
135              
136             =head2 getConvertedMaxBid()
137              
138             Calls: GetMyeBayBuying
139             Returned: Conditionally
140             Details: DetailLevel: none, ReturnSummary, ReturnAll
141             Context: BidList
142             LostList
143             WonList
144             DeletedFromWonList
145             DeletedFromLostList
146              
147             Calls: GetMyeBaySelling
148             Returned: Conditionally
149             Details: DetailLevel: none, ReturnSummary, ReturnAll
150             Context: BidList
151              
152             # Returns: 'ns:AmountType'
153              
154             =cut
155              
156             sub getConvertedMaxBid {
157             my $self = shift;
158             return $self->_getDataTypeInstance( 'ConvertedMaxBid'
159             ,'eBay::API::XML::DataType::AmountType');
160             }
161              
162              
163             =head2 setMaxBid()
164              
165             Indicates the maximum amount the user has agreed to pay for the item when the
166             user last submitted a bid. Under conditions where this value would be
167             N/A on the eBay site, this element is not returned at all.
168              
169             # Argument: 'ns:AmountType'
170              
171             =cut
172              
173             sub setMaxBid {
174             my $self = shift;
175             $self->{'MaxBid'} = shift
176             }
177              
178             =head2 getMaxBid()
179              
180             Calls: GetMyeBayBuying
181             Returned: Conditionally
182             Details: DetailLevel: none, ReturnSummary, ReturnAll
183             Context: BidList
184             LostList
185             WonList
186             DeletedFromWonList
187             DeletedFromLostList
188              
189             Calls: GetMyeBaySelling
190             Returned: Conditionally
191             Details: DetailLevel: none, ReturnSummary, ReturnAll
192             Context: BidList
193              
194             # Returns: 'ns:AmountType'
195              
196             =cut
197              
198             sub getMaxBid {
199             my $self = shift;
200             return $self->_getDataTypeInstance( 'MaxBid'
201             ,'eBay::API::XML::DataType::AmountType');
202             }
203              
204              
205             =head2 setQuantityBid()
206              
207             Number of items from the listing the user agreed to
208             purchase with a bid. For single-item listings, always 1.
209             For multi-item listings, will be between 1 and the number of items offered in the auction.
210             Number of items purchased so far.
211              
212             # Argument: 'xs:int'
213              
214             =cut
215              
216             sub setQuantityBid {
217             my $self = shift;
218             $self->{'QuantityBid'} = shift
219             }
220              
221             =head2 getQuantityBid()
222              
223             Calls: GetMyeBayBuying
224             Returned: Conditionally
225             Details: DetailLevel: none, ReturnSummary, ReturnAll
226             Context: BidList
227             LostList
228             WonList
229             DeletedFromWonList
230             DeletedFromLostList
231              
232             Calls: GetMyeBaySelling
233             Returned: Conditionally
234             Details: DetailLevel: none, ReturnSummary, ReturnAll
235             Context: BidList
236              
237             # Returns: 'xs:int'
238              
239             =cut
240              
241             sub getQuantityBid {
242             my $self = shift;
243             return $self->{'QuantityBid'};
244             }
245              
246              
247             =head2 setQuantityWon()
248              
249             Used mainly for Dutch auction. For an active listing,
250             number of items the user stands to win if the user is a current winning bidder.
251             For an ended listing, number of items the user actually won.
252             In both cases, the number may be less than that returned in
253             QuantityBid as the lowest winning bidder in a Dutch auction might not win
254             the number of items the user has bid on.
255              
256             # Argument: 'xs:int'
257              
258             =cut
259              
260             sub setQuantityWon {
261             my $self = shift;
262             $self->{'QuantityWon'} = shift
263             }
264              
265             =head2 getQuantityWon()
266              
267             Calls: GetMyeBayBuying
268             Returned: Conditionally
269             Details: DetailLevel: none, ReturnSummary, ReturnAll
270             Context: BidList
271             LostList
272             WonList
273             DeletedFromWonList
274             DeletedFromLostList
275              
276             Calls: GetMyeBaySelling
277             Returned: Conditionally
278             Details: DetailLevel: none, ReturnSummary, ReturnAll
279             Context: BidList
280              
281             # Returns: 'xs:int'
282              
283             =cut
284              
285             sub getQuantityWon {
286             my $self = shift;
287             return $self->{'QuantityWon'};
288             }
289              
290              
291             =head2 setWinning()
292              
293             (GetMyeBay only) Indicates whether the user is the current
294             high bidder in a currently active listing.
295              
296             # Argument: 'xs:boolean'
297              
298             =cut
299              
300             sub setWinning {
301             my $self = shift;
302             $self->{'Winning'} = shift
303             }
304              
305             =head2 isWinning()
306              
307             # Returns: 'xs:boolean'
308              
309             =cut
310              
311             sub isWinning {
312             my $self = shift;
313             return $self->{'Winning'};
314             }
315              
316              
317              
318              
319              
320             ## Attribute and Property lists
321             sub getPropertiesList {
322             my $self = shift;
323             return \@gaProperties;
324             }
325              
326             sub getAttributesList {
327             my $self = shift;
328             return \@gaAttributes;
329             }
330              
331              
332              
333             1;