File Coverage

lib/eBay/API/XML/DataType/SellerType.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::SellerType;
4              
5 1     1   1431 use strict;
  1         2  
  1         38  
6 1     1   6 use warnings;
  1         2  
  1         40  
7              
8             ##########################################################################
9             #
10             # Module: ............... eBay/API/XML
11             # File: ................. SellerType.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::SellerType
21              
22             =head1 DESCRIPTION
23              
24             Information about a user returned in the context of an item's seller.
25              
26              
27              
28             =head1 SYNOPSIS
29              
30             =cut
31              
32              
33             =head1 INHERITANCE
34              
35             eBay::API::XML::DataType::SellerType inherits from the L class
36              
37             =cut
38              
39 1     1   41 use eBay::API::XML::BaseDataType;
  0            
  0            
40             our @ISA = ("eBay::API::XML::BaseDataType");
41              
42             use eBay::API::XML::DataType::AddressType;
43             use eBay::API::XML::DataType::CharityAffiliationDetailsType;
44             use eBay::API::XML::DataType::ProStoresCheckoutPreferenceType;
45             use eBay::API::XML::DataType::SchedulingInfoType;
46             use eBay::API::XML::DataType::Enum::CurrencyCodeType;
47             use eBay::API::XML::DataType::Enum::MerchandizingPrefCodeType;
48             use eBay::API::XML::DataType::Enum::SellerBusinessCodeType;
49             use eBay::API::XML::DataType::Enum::SellerGuaranteeLevelCodeType;
50             use eBay::API::XML::DataType::Enum::SellerLevelCodeType;
51             use eBay::API::XML::DataType::Enum::SellerPaymentMethodCodeType;
52             use eBay::API::XML::DataType::Enum::SiteCodeType;
53              
54              
55             my @gaProperties = ( [ 'AllowPaymentEdit', 'xs:boolean', '', '', '' ]
56             , [ 'BillingCurrency', 'ns:CurrencyCodeType', ''
57             ,'eBay::API::XML::DataType::Enum::CurrencyCodeType', '' ]
58             , [ 'CIPBankAccountStored', 'xs:boolean', '', '', '' ]
59             , [ 'CharityAffiliationDetails', 'ns:CharityAffiliationDetailsType', ''
60             ,'eBay::API::XML::DataType::CharityAffiliationDetailsType', '1' ]
61             , [ 'CharityRegistered', 'xs:boolean', '', '', '' ]
62             , [ 'CheckoutEnabled', 'xs:boolean', '', '', '' ]
63             , [ 'GoodStanding', 'xs:boolean', '', '', '' ]
64             , [ 'LiveAuctionAuthorized', 'xs:boolean', '', '', '' ]
65             , [ 'MerchandizingPref', 'ns:MerchandizingPrefCodeType', ''
66             ,'eBay::API::XML::DataType::Enum::MerchandizingPrefCodeType', '' ]
67             , [ 'PaisaPayEscrowEMIStatus', 'xs:int', '', '', '' ]
68             , [ 'PaisaPayStatus', 'xs:int', '', '', '' ]
69             , [ 'PaymentMethod', 'ns:SellerPaymentMethodCodeType', ''
70             ,'eBay::API::XML::DataType::Enum::SellerPaymentMethodCodeType', '' ]
71             , [ 'ProStoresPreference', 'ns:ProStoresCheckoutPreferenceType', ''
72             ,'eBay::API::XML::DataType::ProStoresCheckoutPreferenceType', '1' ]
73             , [ 'QualifiesForB2BVAT', 'xs:boolean', '', '', '' ]
74             , [ 'RegisteredBusinessSeller', 'xs:boolean', '', '', '' ]
75             , [ 'SafePaymentExempt', 'xs:boolean', '', '', '' ]
76             , [ 'SchedulingInfo', 'ns:SchedulingInfoType', ''
77             ,'eBay::API::XML::DataType::SchedulingInfoType', '1' ]
78             , [ 'SellerBusinessType', 'ns:SellerBusinessCodeType', ''
79             ,'eBay::API::XML::DataType::Enum::SellerBusinessCodeType', '' ]
80             , [ 'SellerGuaranteeLevel', 'ns:SellerGuaranteeLevelCodeType', ''
81             ,'eBay::API::XML::DataType::Enum::SellerGuaranteeLevelCodeType', '' ]
82             , [ 'SellerLevel', 'ns:SellerLevelCodeType', ''
83             ,'eBay::API::XML::DataType::Enum::SellerLevelCodeType', '' ]
84             , [ 'SellerPaymentAddress', 'ns:AddressType', ''
85             ,'eBay::API::XML::DataType::AddressType', '1' ]
86             , [ 'StoreOwner', 'xs:boolean', '', '', '' ]
87             , [ 'StoreSite', 'ns:SiteCodeType', ''
88             ,'eBay::API::XML::DataType::Enum::SiteCodeType', '' ]
89             , [ 'StoreURL', 'xs:anyURI', '', '', '' ]
90             , [ 'TransactionPercent', 'xs:float', '', '', '' ]
91             );
92             push @gaProperties, @{eBay::API::XML::BaseDataType::getPropertiesList()};
93              
94             my @gaAttributes = (
95             );
96             push @gaAttributes, @{eBay::API::XML::BaseDataType::getAttributesList()};
97              
98             =head1 Subroutines:
99              
100             =cut
101              
102             sub new {
103             my $classname = shift;
104             my %args = @_;
105             my $self = $classname->SUPER::new(%args);
106             return $self;
107             }
108              
109             sub isScalar {
110             return 0;
111             }
112              
113              
114              
115             =head2 setAllowPaymentEdit()
116              
117             Indicates whether the user as a seller by default allows buyers to edit the
118             total cost of an item (while in checkout). (Sellers enable this property in
119             their My eBay user preferences on the eBay site.)
120              
121             # Argument: 'xs:boolean'
122              
123             =cut
124              
125             sub setAllowPaymentEdit {
126             my $self = shift;
127             $self->{'AllowPaymentEdit'} = shift
128             }
129              
130             =head2 isAllowPaymentEdit()
131              
132             Calls: GetBidderList
133             Returned: Always
134              
135             Calls: GetUser
136             Returned: Conditionally
137             Details: DetailLevel: none, ReturnSummary, ReturnAll
138              
139             Calls: GetItem
140             Returned: Always
141             Details: DetailLevel: none, ItemReturnDescription, ItemReturnAttributes, ReturnAll
142             Context: Seller
143              
144             Calls: GetSellerList
145             Returned: Always
146             Details: DetailLevel: none, ItemReturnDescription, ReturnAll
147             GranularityLevel: Fine
148              
149             Context: SellerInfo
150              
151             Calls: GetItemTransactions
152             GetSellerTransactions
153             Returned: Always
154             Details: DetailLevel: none, ReturnAll
155              
156             # Returns: 'xs:boolean'
157              
158             =cut
159              
160             sub isAllowPaymentEdit {
161             my $self = shift;
162             return $self->{'AllowPaymentEdit'};
163             }
164              
165              
166             =head2 setBillingCurrency()
167              
168             Currency type in which the user is billed seller fees.
169              
170             # Argument: 'ns:CurrencyCodeType'
171              
172             =cut
173              
174             sub setBillingCurrency {
175             my $self = shift;
176             $self->{'BillingCurrency'} = shift
177             }
178              
179             =head2 getBillingCurrency()
180              
181             # Returns: 'ns:CurrencyCodeType'
182              
183             =cut
184              
185             sub getBillingCurrency {
186             my $self = shift;
187             return $self->{'BillingCurrency'};
188             }
189              
190              
191             =head2 setCIPBankAccountStored()
192              
193             If true, indicates that the user has stored bank account information with eBay
194             in order to use the "CIP in checkout" feature. Applicable to all eBay sites
195             that support CIP as a payment method.
196              
197             # Argument: 'xs:boolean'
198              
199             =cut
200              
201             sub setCIPBankAccountStored {
202             my $self = shift;
203             $self->{'CIPBankAccountStored'} = shift
204             }
205              
206             =head2 isCIPBankAccountStored()
207              
208             Calls: GetBidderList
209             Returned: Always
210              
211             Calls: GetUser
212             Returned: Conditionally
213             Details: DetailLevel: none, ReturnSummary, ReturnAll
214              
215             Calls: GetSellerList
216             Returned: Always
217             Details: DetailLevel: none, ItemReturnDescription, ReturnAll
218             GranularityLevel: Fine
219              
220             Context: SellerInfo
221              
222             Calls: GetItem
223             Returned: Always
224             Details: DetailLevel: none, ItemReturnDescription, ItemReturnAttributes, ReturnAll
225             Context: Seller
226              
227             Calls: GetItemTransactions
228             GetSellerTransactions
229             Returned: Always
230             Details: DetailLevel: none, ReturnAll
231              
232             # Returns: 'xs:boolean'
233              
234             =cut
235              
236             sub isCIPBankAccountStored {
237             my $self = shift;
238             return $self->{'CIPBankAccountStored'};
239             }
240              
241              
242             =head2 setCharityAffiliationDetails()
243              
244             Contains information about the seller's charity affiliations detail.
245             Returned if the user is affiliated with one or more
246             charities. Seller must be registered with the eBay Giving
247             Works provider to be affiliated with a charity non-profit
248             organization.
249              
250             SeeLink: URL: http://givingworks.ebay.com/
251             Title: eBay Giving Works Program
252              
253             # Argument: 'ns:CharityAffiliationDetailsType'
254              
255             =cut
256              
257             sub setCharityAffiliationDetails {
258             my $self = shift;
259             $self->{'CharityAffiliationDetails'} = shift
260             }
261              
262             =head2 getCharityAffiliationDetails()
263              
264             Calls: GetUser
265             Returned: Conditionally
266             Details: DetailLevel: none, ReturnSummary, ReturnAll
267              
268             # Returns: 'ns:CharityAffiliationDetailsType'
269              
270             =cut
271              
272             sub getCharityAffiliationDetails {
273             my $self = shift;
274             return $self->_getDataTypeInstance( 'CharityAffiliationDetails'
275             ,'eBay::API::XML::DataType::CharityAffiliationDetailsType');
276             }
277              
278              
279             =head2 setCharityRegistered()
280              
281             Indicates whether or not the seller is a registered charity
282             seller. If CharityRegistered is false, the user must
283             register with the eBay Giving Works provider to list items
284             with eBay Giving Works.
285              
286             SeeLink: URL: http://givingworks.ebay.com/sell/
287             Title: eBay Giving Works for Seller
288              
289             # Argument: 'xs:boolean'
290              
291             =cut
292              
293             sub setCharityRegistered {
294             my $self = shift;
295             $self->{'CharityRegistered'} = shift
296             }
297              
298             =head2 isCharityRegistered()
299              
300             Calls: GetUser
301             Returned: Always
302             Details: DetailLevel: none, ReturnSummary, ReturnAll
303              
304             # Returns: 'xs:boolean'
305              
306             =cut
307              
308             sub isCharityRegistered {
309             my $self = shift;
310             return $self->{'CharityRegistered'};
311             }
312              
313              
314             =head2 setCheckoutEnabled()
315              
316             Indicates whether the user as a seller has the option set to default new
317             item listings to go through checkout. (Sellers enable this property in
318             their My eBay user preferences on the eBay site.)
319              
320             # Argument: 'xs:boolean'
321              
322             =cut
323              
324             sub setCheckoutEnabled {
325             my $self = shift;
326             $self->{'CheckoutEnabled'} = shift
327             }
328              
329             =head2 isCheckoutEnabled()
330              
331             Calls: GetBidderList
332             Returned: Always
333              
334             Calls: GetUser
335             Returned: Conditionally
336             Details: DetailLevel: none, ReturnSummary, ReturnAll
337              
338             Calls: GetItem
339             Returned: Always
340             Details: DetailLevel: none, ItemReturnDescription, ItemReturnAttributes, ReturnAll
341             Context: Seller
342              
343             Calls: GetItemTransactions
344             GetSellerTransactions
345             Returned: Always
346             Details: DetailLevel: none, ReturnAll
347              
348             Calls: GetSellerList
349             Returned: Always
350             Details: DetailLevel: none, ItemReturnDescription, ReturnAll
351             GranularityLevel: Fine
352              
353             Context: SellerInfo
354              
355             # Returns: 'xs:boolean'
356              
357             =cut
358              
359             sub isCheckoutEnabled {
360             my $self = shift;
361             return $self->{'CheckoutEnabled'};
362             }
363              
364              
365             =head2 setGoodStanding()
366              
367             If true, indicates that the user is in good standing with eBay. (One of the
368             requirements for listing a new item with Immediate Payment.)
369              
370             # Argument: 'xs:boolean'
371              
372             =cut
373              
374             sub setGoodStanding {
375             my $self = shift;
376             $self->{'GoodStanding'} = shift
377             }
378              
379             =head2 isGoodStanding()
380              
381             Calls: GetBidderList
382             Returned: Always
383              
384             Calls: GetUser
385             Returned: Conditionally
386             Details: DetailLevel: none, ReturnSummary, ReturnAll
387              
388             Calls: GetItem
389             Returned: Always
390             Details: DetailLevel: none, ItemReturnDescription, ItemReturnAttributes, ReturnAll
391             Context: Seller
392              
393             Calls: GetSellerList
394             Returned: Always
395             Details: DetailLevel: none, ItemReturnDescription, ReturnAll
396             GranularityLevel: Fine
397              
398             Context: SellerInfo
399              
400             Calls: GetItemTransactions
401             GetSellerTransactions
402             Returned: Always
403             Details: DetailLevel: none, ReturnAll
404              
405             # Returns: 'xs:boolean'
406              
407             =cut
408              
409             sub isGoodStanding {
410             my $self = shift;
411             return $self->{'GoodStanding'};
412             }
413              
414              
415             =head2 setLiveAuctionAuthorized()
416              
417             If true, the user is authorized to list lot items to the eBay Live Auctions
418             site.
419              
420             # Argument: 'xs:boolean'
421              
422             =cut
423              
424             sub setLiveAuctionAuthorized {
425             my $self = shift;
426             $self->{'LiveAuctionAuthorized'} = shift
427             }
428              
429             =head2 isLiveAuctionAuthorized()
430              
431             Calls: GetBidderList
432             Returned: Always
433              
434             Calls: GetUser
435             Returned: Conditionally
436             Details: DetailLevel: none, ReturnSummary, ReturnAll
437              
438             Calls: GetItem
439             Returned: Always
440             Details: DetailLevel: none, ItemReturnDescription, ItemReturnAttributes, ReturnAll
441             Context: Seller
442              
443             Calls: GetSellerList
444             Returned: Always
445             Details: DetailLevel: none, ItemReturnDescription, ReturnAll
446             GranularityLevel: Fine
447              
448             Context: SellerInfo
449              
450             Calls: GetItemTransactions
451             GetSellerTransactions
452             Returned: Always
453             Details: DetailLevel: none, ReturnAll
454              
455             # Returns: 'xs:boolean'
456              
457             =cut
458              
459             sub isLiveAuctionAuthorized {
460             my $self = shift;
461             return $self->{'LiveAuctionAuthorized'};
462             }
463              
464              
465             =head2 setMerchandizingPref()
466              
467             Indicates whether the seller participates in the
468             Merchandising Manager feature. If so, the seller can
469             set up rules for cross-promoting items from the seller's store.
470             If not, eBay cross-promotes items as the seller's items are
471             being viewed or purchased.
472              
473             # Argument: 'ns:MerchandizingPrefCodeType'
474              
475             =cut
476              
477             sub setMerchandizingPref {
478             my $self = shift;
479             $self->{'MerchandizingPref'} = shift
480             }
481              
482             =head2 getMerchandizingPref()
483              
484             Calls: GetBidderList
485             Returned: Always
486              
487             Calls: GetSellerList
488             Returned: Always
489             Details: DetailLevel: none, ItemReturnDescription, ReturnAll
490             GranularityLevel: Fine
491              
492             Context: SellerInfo
493              
494             Calls: GetUser
495             Returned: Conditionally
496             Details: DetailLevel: none, ReturnSummary, ReturnAll
497              
498             Calls: GetItem
499             Returned: Always
500             Details: DetailLevel: none, ItemReturnDescription, ItemReturnAttributes, ReturnAll
501             Context: Seller
502              
503             Calls: GetItemTransactions
504             GetSellerTransactions
505             Returned: Always
506             Details: DetailLevel: none, ReturnAll
507              
508             # Returns: 'ns:MerchandizingPrefCodeType'
509              
510             =cut
511              
512             sub getMerchandizingPref {
513             my $self = shift;
514             return $self->{'MerchandizingPref'};
515             }
516              
517              
518             =head2 setPaisaPayEscrowEMIStatus()
519              
520             Indicates the seller's PaisaPayEscrowEMI (Equal Monthly Installment) registration status. India site only.
521             0 - Seller not registered
522             1 - Seller registered
523             7 - Seller eligible
524              
525             # Argument: 'xs:int'
526              
527             =cut
528              
529             sub setPaisaPayEscrowEMIStatus {
530             my $self = shift;
531             $self->{'PaisaPayEscrowEMIStatus'} = shift
532             }
533              
534             =head2 getPaisaPayEscrowEMIStatus()
535              
536             Calls: GetUser
537             Returned: Conditionally
538             Details: DetailLevel: none, ReturnAll
539              
540             # Returns: 'xs:int'
541              
542             =cut
543              
544             sub getPaisaPayEscrowEMIStatus {
545             my $self = shift;
546             return $self->{'PaisaPayEscrowEMIStatus'};
547             }
548              
549              
550             =head2 setPaisaPayStatus()
551              
552             Indicates the seller's PaisaPay and PaisapayEscrow registration status. India site only.
553             0 - Seller not registered
554             1 - Seller registered
555             2 - Seller registered but registration suspended
556             3 - Seller registered but outbound payment suspended
557              
558             # Argument: 'xs:int'
559              
560             =cut
561              
562             sub setPaisaPayStatus {
563             my $self = shift;
564             $self->{'PaisaPayStatus'} = shift
565             }
566              
567             =head2 getPaisaPayStatus()
568              
569             Calls: GetUser
570             Returned: Conditionally
571             Details: DetailLevel: none, ReturnAll
572              
573             # Returns: 'xs:int'
574              
575             =cut
576              
577             sub getPaisaPayStatus {
578             my $self = shift;
579             return $self->{'PaisaPayStatus'};
580             }
581              
582              
583             =head2 setPaymentMethod()
584              
585             # Argument: 'ns:SellerPaymentMethodCodeType'
586              
587             =cut
588              
589             sub setPaymentMethod {
590             my $self = shift;
591             $self->{'PaymentMethod'} = shift
592             }
593              
594             =head2 getPaymentMethod()
595              
596             # Returns: 'ns:SellerPaymentMethodCodeType'
597              
598             =cut
599              
600             sub getPaymentMethod {
601             my $self = shift;
602             return $self->{'PaymentMethod'};
603             }
604              
605              
606             =head2 setProStoresPreference()
607              
608             Details about the checkout preferences related to the ProStores store. Returned
609             only if set.
610              
611             # Argument: 'ns:ProStoresCheckoutPreferenceType'
612              
613             =cut
614              
615             sub setProStoresPreference {
616             my $self = shift;
617             $self->{'ProStoresPreference'} = shift
618             }
619              
620             =head2 getProStoresPreference()
621              
622             Calls: GetUser
623             Returned: Conditionally
624             Details: DetailLevel: none, ReturnSummary, ReturnAll
625              
626             # Returns: 'ns:ProStoresCheckoutPreferenceType'
627              
628             =cut
629              
630             sub getProStoresPreference {
631             my $self = shift;
632             return $self->_getDataTypeInstance( 'ProStoresPreference'
633             ,'eBay::API::XML::DataType::ProStoresCheckoutPreferenceType');
634             }
635              
636              
637             =head2 setQualifiesForB2BVAT()
638              
639             Indicates whether the user is subject to VAT. Users who have registered with
640             eBay as VAT-exempt are not subject to VAT.
641              
642             # Argument: 'xs:boolean'
643              
644             =cut
645              
646             sub setQualifiesForB2BVAT {
647             my $self = shift;
648             $self->{'QualifiesForB2BVAT'} = shift
649             }
650              
651             =head2 isQualifiesForB2BVAT()
652              
653             Calls: GetBidderList
654             Returned: Always
655              
656             Calls: GetUser
657             Returned: Conditionally
658             Details: DetailLevel: none, ReturnSummary, ReturnAll
659              
660             Calls: GetItem
661             Returned: Always
662             Details: DetailLevel: none, ItemReturnDescription, ItemReturnAttributes, ReturnAll
663             Context: Seller
664              
665             Calls: GetSellerList
666             Returned: Always
667             Details: DetailLevel: none, ItemReturnDescription, ReturnAll
668             GranularityLevel: Fine
669              
670             Context: SellerInfo
671              
672             Calls: GetItemTransactions
673             GetSellerTransactions
674             Returned: Always
675             Details: DetailLevel: none, ReturnAll
676              
677             # Returns: 'xs:boolean'
678              
679             =cut
680              
681             sub isQualifiesForB2BVAT {
682             my $self = shift;
683             return $self->{'QualifiesForB2BVAT'};
684             }
685              
686              
687             =head2 setRegisteredBusinessSeller()
688              
689             If true, the user is registered as a vehicle dealer on the eBay Motors site.
690              
691             # Argument: 'xs:boolean'
692              
693             =cut
694              
695             sub setRegisteredBusinessSeller {
696             my $self = shift;
697             $self->{'RegisteredBusinessSeller'} = shift
698             }
699              
700             =head2 isRegisteredBusinessSeller()
701              
702             Calls: GetUser
703             Returned: Conditionally
704             Details: DetailLevel: none, ReturnSummary, ReturnAll
705              
706             # Returns: 'xs:boolean'
707              
708             =cut
709              
710             sub isRegisteredBusinessSeller {
711             my $self = shift;
712             return $self->{'RegisteredBusinessSeller'};
713             }
714              
715              
716             =head2 setSafePaymentExempt()
717              
718             If true, the user is currently exempt from the requirement to offer at least
719             one safe payment method (PayPal/PaisaPay or one of the credit cards specified
720             in Item.PaymentMethods) when listing items. This value should only return true
721             for sellers who have registered before January 17, 2007. Otherwise, it should
722             return false. This setting overrides both the site and category values for
723             SafePaymentRequired.
724              
725             Default: false
726              
727             # Argument: 'xs:boolean'
728              
729             =cut
730              
731             sub setSafePaymentExempt {
732             my $self = shift;
733             $self->{'SafePaymentExempt'} = shift
734             }
735              
736             =head2 isSafePaymentExempt()
737              
738             Calls: GetBidderList
739             Returned: Always
740             Details: DetailLevel: none, ReturnAll
741             Context: Seller
742              
743             Calls: GetItem
744             Returned: Always
745             Details: DetailLevel: none, ItemReturnAttributes, ItemReturnDescription,ReturnAll
746             Context: Seller
747              
748             Calls: GetItemTransactions
749             GetSellerTransactions
750             Returned: Always
751             Details: DetailLevel: none, ItemReturnDescription, ReturnAll
752              
753             Calls: GetUser
754             Returned: Always
755             Details: DetailLevel: none, ReturnSummary, ReturnAll
756              
757             Calls: GetSellerList
758             Returned: Always
759             Details: DetailLevel: none, ItemReturnDescription, ReturnAll
760             GranularityLevel: Fine
761              
762             Context: Seller
763              
764             # Returns: 'xs:boolean'
765              
766             =cut
767              
768             sub isSafePaymentExempt {
769             my $self = shift;
770             return $self->{'SafePaymentExempt'};
771             }
772              
773              
774             =head2 setSchedulingInfo()
775              
776             Container for scheduling limits for the user.
777             Conveys the minimum and maximum
778             minutes the user may schedule listings in advance, as well as the maximum
779             number of items the user may schedule.
780              
781             # Argument: 'ns:SchedulingInfoType'
782              
783             =cut
784              
785             sub setSchedulingInfo {
786             my $self = shift;
787             $self->{'SchedulingInfo'} = shift
788             }
789              
790             =head2 getSchedulingInfo()
791              
792             Calls: GetUser
793             Returned: Conditionally
794             Details: DetailLevel: none, ReturnAll
795              
796             # Returns: 'ns:SchedulingInfoType'
797              
798             =cut
799              
800             sub getSchedulingInfo {
801             my $self = shift;
802             return $self->_getDataTypeInstance( 'SchedulingInfo'
803             ,'eBay::API::XML::DataType::SchedulingInfoType');
804             }
805              
806              
807             =head2 setSellerBusinessType()
808              
809             Type of seller account. This value is returned if the German
810             (ID 77), UK (ID 3), Ireland (ID 205), or eBay Motors (ID 100) sites are specified.
811              
812             # Argument: 'ns:SellerBusinessCodeType'
813              
814             =cut
815              
816             sub setSellerBusinessType {
817             my $self = shift;
818             $self->{'SellerBusinessType'} = shift
819             }
820              
821             =head2 getSellerBusinessType()
822              
823             Calls: GetItem
824             Returned: Conditionally
825             Details: DetailLevel: none, ItemReturnDescription, ItemReturnAttributes, ReturnAll
826              
827             Calls: GetUser
828             Returned: Conditionally
829             Details: DetailLevel: none, ReturnSummary, ReturnAll
830              
831             # Returns: 'ns:SellerBusinessCodeType'
832              
833             =cut
834              
835             sub getSellerBusinessType {
836             my $self = shift;
837             return $self->{'SellerBusinessType'};
838             }
839              
840              
841             =head2 setSellerGuaranteeLevel()
842              
843             Maximum level of Motor's Seller guarantee the seller is authorized to offer.
844              
845             # Argument: 'ns:SellerGuaranteeLevelCodeType'
846              
847             =cut
848              
849             sub setSellerGuaranteeLevel {
850             my $self = shift;
851             $self->{'SellerGuaranteeLevel'} = shift
852             }
853              
854             =head2 getSellerGuaranteeLevel()
855              
856             Calls: GetUser
857             Returned: Conditionally
858             Details: DetailLevel: none, ReturnSummary, ReturnAll
859              
860             Calls: GetItemTransactions
861             GetSellerTransactions
862             Returned: Conditionally
863             Details: DetailLevel: none, ReturnAll
864              
865             # Returns: 'ns:SellerGuaranteeLevelCodeType'
866              
867             =cut
868              
869             sub getSellerGuaranteeLevel {
870             my $self = shift;
871             return $self->{'SellerGuaranteeLevel'};
872             }
873              
874              
875             =head2 setSellerLevel()
876              
877             The user's eBay PowerSeller tier. Possible values are enumerated in the
878             SellerLevelCodeType code list.
879              
880             # Argument: 'ns:SellerLevelCodeType'
881              
882             =cut
883              
884             sub setSellerLevel {
885             my $self = shift;
886             $self->{'SellerLevel'} = shift
887             }
888              
889             =head2 getSellerLevel()
890              
891             Calls: GetBidderList
892             Returned: Always
893              
894             Calls: GetSellerList
895             Returned: Always
896             Details: DetailLevel: none, ItemReturnDescription, ReturnAll
897             GranularityLevel: Fine
898              
899             Context: SellerInfo
900              
901             Calls: GetUser
902             Returned: Conditionally
903             Details: DetailLevel: none, ReturnSummary, ReturnAll
904              
905             Calls: GetItem
906             Returned: Always
907             Details: DetailLevel: none, ItemReturnDescription, ItemReturnAttributes, ReturnAll
908             Context: Seller
909              
910             Calls: GetItemTransactions
911             GetSellerTransactions
912             Returned: Always
913             Details: DetailLevel: none, ReturnAll
914              
915             # Returns: 'ns:SellerLevelCodeType'
916              
917             =cut
918              
919             sub getSellerLevel {
920             my $self = shift;
921             return $self->{'SellerLevel'};
922             }
923              
924              
925             =head2 setSellerPaymentAddress()
926              
927             Address used by eBay for purposes of billing the user for seller fees.
928              
929             # Argument: 'ns:AddressType'
930              
931             =cut
932              
933             sub setSellerPaymentAddress {
934             my $self = shift;
935             $self->{'SellerPaymentAddress'} = shift
936             }
937              
938             =head2 getSellerPaymentAddress()
939              
940             Calls: GetUser
941             Returned: Conditionally
942             Details: DetailLevel: ReturnAll
943              
944             # Returns: 'ns:AddressType'
945              
946             =cut
947              
948             sub getSellerPaymentAddress {
949             my $self = shift;
950             return $self->_getDataTypeInstance( 'SellerPaymentAddress'
951             ,'eBay::API::XML::DataType::AddressType');
952             }
953              
954              
955             =head2 setStoreOwner()
956              
957             Indicates whether the user has an eBay Store (boolean value).
958              
959             # Argument: 'xs:boolean'
960              
961             =cut
962              
963             sub setStoreOwner {
964             my $self = shift;
965             $self->{'StoreOwner'} = shift
966             }
967              
968             =head2 isStoreOwner()
969              
970             Calls: GetBidderList
971             Returned: Always
972              
973             Calls: GetSellerList
974             Returned: Conditionally
975             Details: DetailLevel: none, ItemReturnDescription, ReturnAll
976             GranularityLevel: Fine
977              
978             Context: SellerInfo
979              
980             Calls: GetUser
981             Returned: Conditionally
982             Details: DetailLevel: none, ReturnSummary, ReturnAll
983              
984             Calls: GetItem
985             Returned: Always
986             Details: DetailLevel: none, ItemReturnDescription, ItemReturnAttributes, ReturnAll
987             Context: Seller
988              
989             Calls: GetItemTransactions
990             GetSellerTransactions
991             Returned: Always
992             Details: DetailLevel: none, ReturnAll
993              
994             # Returns: 'xs:boolean'
995              
996             =cut
997              
998             sub isStoreOwner {
999             my $self = shift;
1000             return $self->{'StoreOwner'};
1001             }
1002              
1003              
1004             =head2 setStoreSite()
1005              
1006             The site associated with the seller's eBay Store.
1007              
1008             # Argument: 'ns:SiteCodeType'
1009              
1010             =cut
1011              
1012             sub setStoreSite {
1013             my $self = shift;
1014             $self->{'StoreSite'} = shift
1015             }
1016              
1017             =head2 getStoreSite()
1018              
1019             Calls: GetUser
1020             Returned: Conditionally
1021              
1022             # Returns: 'ns:SiteCodeType'
1023              
1024             =cut
1025              
1026             sub getStoreSite {
1027             my $self = shift;
1028             return $self->{'StoreSite'};
1029             }
1030              
1031              
1032             =head2 setStoreURL()
1033              
1034             URL for the user's eBay Store, if the user is a Store owner. Blank if not.
1035              
1036             # Argument: 'xs:anyURI'
1037              
1038             =cut
1039              
1040             sub setStoreURL {
1041             my $self = shift;
1042             $self->{'StoreURL'} = shift
1043             }
1044              
1045             =head2 getStoreURL()
1046              
1047             Calls: GetItem
1048             Returned: Conditionally
1049             Details: DetailLevel: none, ItemReturnDescription, ItemReturnAttributes, ReturnAll
1050              
1051             Calls: GetItemTransactions
1052             GetSellerTransactions
1053             Returned: Always
1054             Details: DetailLevel: none, ReturnAll
1055              
1056             Calls: GetSellerList
1057             Returned: Conditionally
1058             Details: DetailLevel: none, ItemReturnDescription, ReturnAll
1059             GranularityLevel: Fine
1060              
1061             Context: SellerInfo
1062              
1063             Calls: GetUser
1064             Returned: Conditionally
1065             Details: DetailLevel: none, ReturnSummary, ReturnAll
1066              
1067             # Returns: 'xs:anyURI'
1068              
1069             =cut
1070              
1071             sub getStoreURL {
1072             my $self = shift;
1073             return $self->{'StoreURL'};
1074             }
1075              
1076              
1077             =head2 setTransactionPercent()
1078              
1079             Percentage of the number of times a member has sold successfully vs.
1080             the number of times a member has bought an item in the preceding 365 days.
1081              
1082             # Argument: 'xs:float'
1083              
1084             =cut
1085              
1086             sub setTransactionPercent {
1087             my $self = shift;
1088             $self->{'TransactionPercent'} = shift
1089             }
1090              
1091             =head2 getTransactionPercent()
1092              
1093             Calls: GetUser
1094             Returned: Conditionally
1095             Details: DetailLevel: none, ReturnSummary, ReturnAll
1096              
1097             # Returns: 'xs:float'
1098              
1099             =cut
1100              
1101             sub getTransactionPercent {
1102             my $self = shift;
1103             return $self->{'TransactionPercent'};
1104             }
1105              
1106              
1107              
1108              
1109              
1110             ## Attribute and Property lists
1111             sub getPropertiesList {
1112             my $self = shift;
1113             return \@gaProperties;
1114             }
1115              
1116             sub getAttributesList {
1117             my $self = shift;
1118             return \@gaAttributes;
1119             }
1120              
1121              
1122              
1123             1;