File Coverage

lib/eBay/API/XML/DataType/OfferType.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::OfferType;
4              
5 1     1   1289 use strict;
  1         2  
  1         26  
6 1     1   5 use warnings;
  1         3  
  1         24  
7              
8             ##########################################################################
9             #
10             # Module: ............... eBay/API/XML
11             # File: ................. OfferType.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::OfferType
21              
22             =head1 DESCRIPTION
23              
24             Contains information pertaining to an offer made on an item listing and
25             the current bidding or purchase state of the listing.
26              
27              
28              
29             =head1 SYNOPSIS
30              
31             =cut
32              
33              
34             =head1 INHERITANCE
35              
36             eBay::API::XML::DataType::OfferType inherits from the L class
37              
38             =cut
39              
40 1     1   33 use eBay::API::XML::BaseDataType;
  0            
  0            
41             our @ISA = ("eBay::API::XML::BaseDataType");
42              
43             use eBay::API::XML::DataType::AmountType;
44             use eBay::API::XML::DataType::BestOfferIDType;
45             use eBay::API::XML::DataType::ItemIDType;
46             use eBay::API::XML::DataType::UserType;
47             use eBay::API::XML::DataType::Enum::BidActionCodeType;
48             use eBay::API::XML::DataType::Enum::CurrencyCodeType;
49              
50              
51             my @gaProperties = ( [ 'Action', 'ns:BidActionCodeType', ''
52             ,'eBay::API::XML::DataType::Enum::BidActionCodeType', '' ]
53             , [ 'BestOfferID', 'ns:BestOfferIDType', ''
54             ,'eBay::API::XML::DataType::BestOfferIDType', '1' ]
55             , [ 'BidCount', 'xs:int', '', '', '' ]
56             , [ 'ConvertedPrice', 'ns:AmountType', ''
57             ,'eBay::API::XML::DataType::AmountType', '1' ]
58             , [ 'Currency', 'ns:CurrencyCodeType', ''
59             ,'eBay::API::XML::DataType::Enum::CurrencyCodeType', '' ]
60             , [ 'HighestBid', 'ns:AmountType', ''
61             ,'eBay::API::XML::DataType::AmountType', '1' ]
62             , [ 'ItemID', 'ns:ItemIDType', ''
63             ,'eBay::API::XML::DataType::ItemIDType', '1' ]
64             , [ 'MaxBid', 'ns:AmountType', ''
65             ,'eBay::API::XML::DataType::AmountType', '1' ]
66             , [ 'Message', 'xs:string', '', '', '' ]
67             , [ 'Quantity', 'xs:int', '', '', '' ]
68             , [ 'SecondChanceEnabled', 'xs:boolean', '', '', '' ]
69             , [ 'SiteCurrency', 'ns:CurrencyCodeType', ''
70             ,'eBay::API::XML::DataType::Enum::CurrencyCodeType', '' ]
71             , [ 'TimeBid', 'xs:dateTime', '', '', '' ]
72             , [ 'TransactionID', 'xs:string', '', '', '' ]
73             , [ 'User', 'ns:UserType', ''
74             ,'eBay::API::XML::DataType::UserType', '1' ]
75             , [ 'UserConsent', 'xs:boolean', '', '', '' ]
76             );
77             push @gaProperties, @{eBay::API::XML::BaseDataType::getPropertiesList()};
78              
79             my @gaAttributes = (
80             );
81             push @gaAttributes, @{eBay::API::XML::BaseDataType::getAttributesList()};
82              
83             =head1 Subroutines:
84              
85             =cut
86              
87             sub new {
88             my $classname = shift;
89             my %args = @_;
90             my $self = $classname->SUPER::new(%args);
91             return $self;
92             }
93              
94             sub isScalar {
95             return 0;
96             }
97              
98              
99              
100             =head2 setAction()
101              
102             Indicates the type of offer being made on the specified listing.
103             If the item is best-offer enabled and the buyer
104             makes a best offer (or counter-offer, etc.), then after
105             the PlaceOffer call,
106             the buyer can get the status of the best offer
107             (and of a possible seller-counter-offer, etc.)
108             using the GetBestOffers call. See the
109             Trading Web Services Guide for information
110             about best-offer enabled items and
111             about GetBestOffers.
112              
113             Calls: PlaceOffer
114             RequiredInput: Yes
115             OnlyTheseValues: Bid, Purchase, Accept, Counter, Decline, Offer
116              
117             # Argument: 'ns:BidActionCodeType'
118              
119             =cut
120              
121             sub setAction {
122             my $self = shift;
123             $self->{'Action'} = shift
124             }
125              
126             =head2 getAction()
127              
128             Calls: GetAllBidders
129             GetHighBidders
130             Returned: Always
131              
132             # Returns: 'ns:BidActionCodeType'
133              
134             =cut
135              
136             sub getAction {
137             my $self = shift;
138             return $self->{'Action'};
139             }
140              
141              
142             =head2 setBestOfferID()
143              
144             The ID of a best offer on an item. Must be specified
145             as input to PlaceOffer only if a buyer is
146             accepting or declining a seller's counteroffer
147             (and is not required for a buyer's offer or counteroffer).
148              
149             Calls: PlaceOffer
150             RequiredInput: No
151              
152             # Argument: 'ns:BestOfferIDType'
153              
154             =cut
155              
156             sub setBestOfferID {
157             my $self = shift;
158             $self->{'BestOfferID'} = shift
159             }
160              
161             =head2 getBestOfferID()
162              
163             # Returns: 'ns:BestOfferIDType'
164              
165             =cut
166              
167             sub getBestOfferID {
168             my $self = shift;
169             return $self->_getDataTypeInstance( 'BestOfferID'
170             ,'eBay::API::XML::DataType::BestOfferIDType');
171             }
172              
173              
174             =head2 setBidCount()
175              
176             Total number of offers the user has made on the item.
177              
178             # Argument: 'xs:int'
179              
180             =cut
181              
182             sub setBidCount {
183             my $self = shift;
184             $self->{'BidCount'} = shift
185             }
186              
187             =head2 getBidCount()
188              
189             # Returns: 'xs:int'
190              
191             =cut
192              
193             sub getBidCount {
194             my $self = shift;
195             return $self->{'BidCount'};
196             }
197              
198              
199             =head2 setConvertedPrice()
200              
201             Localized amount for the item's current price.
202              
203             # Argument: 'ns:AmountType'
204              
205             =cut
206              
207             sub setConvertedPrice {
208             my $self = shift;
209             $self->{'ConvertedPrice'} = shift
210             }
211              
212             =head2 getConvertedPrice()
213              
214             Calls: GetAllBidders
215             GetHighBidders
216             Returned: Conditionally
217              
218             # Returns: 'ns:AmountType'
219              
220             =cut
221              
222             sub getConvertedPrice {
223             my $self = shift;
224             return $self->_getDataTypeInstance( 'ConvertedPrice'
225             ,'eBay::API::XML::DataType::AmountType');
226             }
227              
228              
229             =head2 setCurrency()
230              
231             Numeric ID for the currency for the auction. Valid values are
232             enumerated in the CurrencyCodeType code list.
233              
234             # Argument: 'ns:CurrencyCodeType'
235              
236             =cut
237              
238             sub setCurrency {
239             my $self = shift;
240             $self->{'Currency'} = shift
241             }
242              
243             =head2 getCurrency()
244              
245             Calls: GetAllBidders
246             GetHighBidders
247             Returned: Always
248              
249             # Returns: 'ns:CurrencyCodeType'
250              
251             =cut
252              
253             sub getCurrency {
254             my $self = shift;
255             return $self->{'Currency'};
256             }
257              
258              
259             =head2 setHighestBid()
260              
261             Amount the highest bidder had bid on the item. Applicable only to
262             competitive-bidding listings (Chinese and Dutch auctions) where there is
263             progressive bidding and winning bidders are determined based on the highest
264             bid.
265              
266             # Argument: 'ns:AmountType'
267              
268             =cut
269              
270             sub setHighestBid {
271             my $self = shift;
272             $self->{'HighestBid'} = shift
273             }
274              
275             =head2 getHighestBid()
276              
277             Calls: GetAllBidders
278             Returned: Always
279              
280             # Returns: 'ns:AmountType'
281              
282             =cut
283              
284             sub getHighestBid {
285             my $self = shift;
286             return $self->_getDataTypeInstance( 'HighestBid'
287             ,'eBay::API::XML::DataType::AmountType');
288             }
289              
290              
291             =head2 setItemID()
292              
293             The unique identifier of an item listed on the eBay site.
294             Returned by eBay when the item is created.
295              
296             MaxLength: 19 (Note: The eBay database specifies 38. Currently, Item IDs are usually 9 to 12 digits)
297              
298             # Argument: 'ns:ItemIDType'
299              
300             =cut
301              
302             sub setItemID {
303             my $self = shift;
304             $self->{'ItemID'} = shift
305             }
306              
307             =head2 getItemID()
308              
309             # Returns: 'ns:ItemIDType'
310              
311             =cut
312              
313             sub getItemID {
314             my $self = shift;
315             return $self->_getDataTypeInstance( 'ItemID'
316             ,'eBay::API::XML::DataType::ItemIDType');
317             }
318              
319              
320             =head2 setMaxBid()
321              
322             Amount of the offer placed. For competitive-bidding listings, the amount
323             bid on the item (subject to outbid by other buyers). For fixed-price
324             listings, the fixed sale price at which the item is purchased. For
325             competitive-bidding listings with an active Buy It Now option, this amount
326             will be either the Buy It Now price for purchase or the amount of a bid,
327             depending on the offer type (as specified in Action). For PlaceOffer,
328             the currencyID attribute is ignored if provided. Regarding Value-Added Tax (VAT):
329             Even if VAT applies, you do not need to add VAT to the MaxBid value.
330             If VAT applies to the listing, the seller can specify a VAT percent value
331             when they list the item.
332              
333             Calls: PlaceOffer
334             RequiredInput: Yes
335              
336             # Argument: 'ns:AmountType'
337              
338             =cut
339              
340             sub setMaxBid {
341             my $self = shift;
342             $self->{'MaxBid'} = shift
343             }
344              
345             =head2 getMaxBid()
346              
347             Calls: GetAllBidders
348             GetHighBidders
349             Returned: Always
350              
351             # Returns: 'ns:AmountType'
352              
353             =cut
354              
355             sub getMaxBid {
356             my $self = shift;
357             return $self->_getDataTypeInstance( 'MaxBid'
358             ,'eBay::API::XML::DataType::AmountType');
359             }
360              
361              
362             =head2 setMessage()
363              
364             A message from the buyer to the seller. Applies if the buyer
365             is using PlaceOffer to perform a best-offer-related
366             action (best offer, counter-offer, etc.).
367              
368             Calls: PlaceOffer
369             RequiredInput: No
370              
371             # Argument: 'xs:string'
372              
373             =cut
374              
375             sub setMessage {
376             my $self = shift;
377             $self->{'Message'} = shift
378             }
379              
380             =head2 getMessage()
381              
382             # Returns: 'xs:string'
383              
384             =cut
385              
386             sub getMessage {
387             my $self = shift;
388             return $self->{'Message'};
389             }
390              
391              
392             =head2 setQuantity()
393              
394             Specifies the number of items from the specified listing the user
395             tendering the offer intends to purchase, bid on, or make a best offer on.
396             For Chinese auctions and
397             other listing formats that only allow one item per listing, value may not
398             exceed one. For multi-item listings, must be greater than zero and not
399             exceeding the number of items offered for sale in the listing.
400              
401             Calls: PlaceOffer
402             RequiredInput: Yes
403              
404             # Argument: 'xs:int'
405              
406             =cut
407              
408             sub setQuantity {
409             my $self = shift;
410             $self->{'Quantity'} = shift
411             }
412              
413             =head2 getQuantity()
414              
415             Calls: GetAllBidders
416             GetHighBidders
417             Returned: Always
418              
419             # Returns: 'xs:int'
420              
421             =cut
422              
423             sub getQuantity {
424             my $self = shift;
425             return $self->{'Quantity'};
426             }
427              
428              
429             =head2 setSecondChanceEnabled()
430              
431             Indicates the user's preference to accept second chance offers. If true,
432             the user is willing to be the recipient of second chance offers.
433              
434             # Argument: 'xs:boolean'
435              
436             =cut
437              
438             sub setSecondChanceEnabled {
439             my $self = shift;
440             $self->{'SecondChanceEnabled'} = shift
441             }
442              
443             =head2 isSecondChanceEnabled()
444              
445             Calls: GetAllBidders
446             Returned: Always
447              
448             # Returns: 'xs:boolean'
449              
450             =cut
451              
452             sub isSecondChanceEnabled {
453             my $self = shift;
454             return $self->{'SecondChanceEnabled'};
455             }
456              
457              
458             =head2 setSiteCurrency()
459              
460             Unique ID identifying the currency in which the localized offer amounts are
461             expressed.
462              
463             # Argument: 'ns:CurrencyCodeType'
464              
465             =cut
466              
467             sub setSiteCurrency {
468             my $self = shift;
469             $self->{'SiteCurrency'} = shift
470             }
471              
472             =head2 getSiteCurrency()
473              
474             Calls: GetAllBidders
475             GetHighBidders
476             Returned: Always
477              
478             # Returns: 'ns:CurrencyCodeType'
479              
480             =cut
481              
482             sub getSiteCurrency {
483             my $self = shift;
484             return $self->{'SiteCurrency'};
485             }
486              
487              
488             =head2 setTimeBid()
489              
490             Date and time the offer or bid was placed.
491              
492             # Argument: 'xs:dateTime'
493              
494             =cut
495              
496             sub setTimeBid {
497             my $self = shift;
498             $self->{'TimeBid'} = shift
499             }
500              
501             =head2 getTimeBid()
502              
503             Calls: GetAllBidders
504             GetHighBidders
505             Returned: Always
506              
507             # Returns: 'xs:dateTime'
508              
509             =cut
510              
511             sub getTimeBid {
512             my $self = shift;
513             return $self->{'TimeBid'};
514             }
515              
516              
517             =head2 setTransactionID()
518              
519             The unique identifier of the transaction. The transaction
520             is created when a winning bidder commits to purchasing an
521             item, even before the bidder has paid.
522              
523             MaxLength: 19 (Note: The eBay database specifies 38. Currently, transaction IDs are usually 9 to 12 digits.)
524              
525             # Argument: 'xs:string'
526              
527             =cut
528              
529             sub setTransactionID {
530             my $self = shift;
531             $self->{'TransactionID'} = shift
532             }
533              
534             =head2 getTransactionID()
535              
536             # Returns: 'xs:string'
537              
538             =cut
539              
540             sub getTransactionID {
541             my $self = shift;
542             return $self->{'TransactionID'};
543             }
544              
545              
546             =head2 setUser()
547              
548             Bidder information. See the schema documentation for UserType for details
549             on its properties and their meanings.
550              
551             # Argument: 'ns:UserType'
552              
553             =cut
554              
555             sub setUser {
556             my $self = shift;
557             $self->{'User'} = shift
558             }
559              
560             =head2 getUser()
561              
562             Calls: GetAllBidders
563             GetHighBidders
564             Returned: Always
565              
566             # Returns: 'ns:UserType'
567              
568             =cut
569              
570             sub getUser {
571             my $self = shift;
572             return $self->_getDataTypeInstance( 'User'
573             ,'eBay::API::XML::DataType::UserType');
574             }
575              
576              
577             =head2 setUserConsent()
578              
579             If true, confirms that the bidder read and agrees to eBay's
580             privacy policy. Applies if the subject item is in a category
581             that requires user consent. If user consent (that is,
582             confirmation that a bidder read and agrees to eBay's privacy
583             policy) is required for a category that the subject item is in,
584             this value must be true for a bid to occur.
585              
586             Calls: PlaceOffer
587             RequiredInput: No
588              
589             # Argument: 'xs:boolean'
590              
591             =cut
592              
593             sub setUserConsent {
594             my $self = shift;
595             $self->{'UserConsent'} = shift
596             }
597              
598             =head2 isUserConsent()
599              
600             # Returns: 'xs:boolean'
601              
602             =cut
603              
604             sub isUserConsent {
605             my $self = shift;
606             return $self->{'UserConsent'};
607             }
608              
609              
610              
611              
612              
613             ## Attribute and Property lists
614             sub getPropertiesList {
615             my $self = shift;
616             return \@gaProperties;
617             }
618              
619             sub getAttributesList {
620             my $self = shift;
621             return \@gaAttributes;
622             }
623              
624              
625              
626             1;