File Coverage

lib/eBay/API/XML/Call/GetUserPreferences.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::Call::GetUserPreferences;
4              
5 1     1   2310 use strict;
  1         2  
  1         24  
6 1     1   6 use warnings;
  1         2  
  1         32  
7              
8             ##########################################################################
9             #
10             # Module: ............... eBay/API/XML
11             # File: ................. GetUserPreferences.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::Call::GetUserPreferences
21              
22             =head1 DESCRIPTION
23              
24              
25              
26             =head1 SYNOPSIS
27              
28             =cut
29              
30              
31             =head1 INHERITANCE
32              
33             eBay::API::XML::Call::GetUserPreferences inherits from the L class
34              
35             =cut
36              
37 1     1   32 use eBay::API::XML::BaseCall;
  0            
  0            
38             our @ISA = ("eBay::API::XML::BaseCall");
39              
40             use eBay::API::XML::Call::GetUserPreferences::GetUserPreferencesRequestType;
41             use eBay::API::XML::Call::GetUserPreferences::GetUserPreferencesResponseType;
42              
43              
44             =head1 Subroutines:
45              
46             =cut
47              
48             sub getApiCallName {
49             return 'GetUserPreferences';
50             }
51             sub getRequestDataTypeFullPackage {
52             return 'eBay::API::XML::Call::GetUserPreferences::GetUserPreferencesRequestType';
53             }
54             sub getResponseDataTypeFullPackage {
55             return 'eBay::API::XML::Call::GetUserPreferences::GetUserPreferencesResponseType';
56             }
57              
58             #
59             # input properties
60             #
61              
62             =head2 setShowBidderNoticePreferences()
63              
64             If true, requests a seller's preferences for receiving bidder notices.
65              
66             RequiredInput: No
67             # Argument: 'xs:boolean'
68              
69             =cut
70            
71             sub setShowBidderNoticePreferences {
72             my $self = shift;
73             my $sShowBidderNoticePreferences = shift;
74             $self->getRequestDataType()->setShowBidderNoticePreferences($sShowBidderNoticePreferences);
75             }
76              
77             =head2 setShowCombinedPaymentPreferences()
78              
79             DO NOT USE THIS FIELD. Use 'GetShippingDiscountProfiles' to access
80             similar information.
81             If true, requests a seller's preferences for accepting payments
82             that combine item purchases into one order.
83              
84             RequiredInput: No
85             # Argument: 'xs:boolean'
86              
87             =cut
88            
89             sub setShowCombinedPaymentPreferences {
90             my $self = shift;
91             my $sShowCombinedPaymentPreferences = shift;
92             $self->getRequestDataType()->setShowCombinedPaymentPreferences($sShowCombinedPaymentPreferences);
93             }
94              
95             =head2 setShowCrossPromotionPreferences()
96              
97             If true, requests a seller's cross-promotion preferences, such as
98             whether cross-promotions are enabled and the sort filters used.
99              
100             RequiredInput: No
101             # Argument: 'xs:boolean'
102              
103             =cut
104            
105             sub setShowCrossPromotionPreferences {
106             my $self = shift;
107             my $sShowCrossPromotionPreferences = shift;
108             $self->getRequestDataType()->setShowCrossPromotionPreferences($sShowCrossPromotionPreferences);
109             }
110              
111             =head2 setShowEmailShipmentTrackingNumberPreference()
112              
113             If true, returns the preference related to emailing the email shipment tracking number.
114              
115             Default: false
116              
117             RequiredInput: No
118             # Argument: 'xs:boolean'
119              
120             =cut
121            
122             sub setShowEmailShipmentTrackingNumberPreference {
123             my $self = shift;
124             my $sShowEmailShipmentTrackingNumberPreference = shift;
125             $self->getRequestDataType()->setShowEmailShipmentTrackingNumberPreference($sShowEmailShipmentTrackingNumberPreference);
126             }
127              
128             =head2 setShowEndOfAuctionEmailPreferences()
129              
130             If true, displays the seller's end of auction email preferences.
131              
132             RequiredInput: No
133             # Argument: 'xs:boolean'
134              
135             =cut
136            
137             sub setShowEndOfAuctionEmailPreferences {
138             my $self = shift;
139             my $sShowEndOfAuctionEmailPreferences = shift;
140             $self->getRequestDataType()->setShowEndOfAuctionEmailPreferences($sShowEndOfAuctionEmailPreferences);
141             }
142              
143             =head2 setShowProStoresPreferences()
144              
145             If true, returns ProStores checkout preferences.
146              
147             Default: false
148              
149             RequiredInput: No
150             # Argument: 'xs:boolean'
151              
152             =cut
153            
154             sub setShowProStoresPreferences {
155             my $self = shift;
156             my $sShowProStoresPreferences = shift;
157             $self->getRequestDataType()->setShowProStoresPreferences($sShowProStoresPreferences);
158             }
159              
160             =head2 setShowSellerFavoriteItemPreferences()
161              
162             If true, retrieves preferences the seller has set for displaying items
163             on a buyer's favorite sellers page and in the favorite sellers email digest.
164              
165             RequiredInput: No
166             # Argument: 'xs:boolean'
167              
168             =cut
169            
170             sub setShowSellerFavoriteItemPreferences {
171             my $self = shift;
172             my $sShowSellerFavoriteItemPreferences = shift;
173             $self->getRequestDataType()->setShowSellerFavoriteItemPreferences($sShowSellerFavoriteItemPreferences);
174             }
175              
176             =head2 setShowSellerPaymentPreferences()
177              
178             If true, displays a seller's payment preferences, for displaying
179             a Pay Now button, accepting PayPal, and so on.
180              
181             RequiredInput: No
182             # Argument: 'xs:boolean'
183              
184             =cut
185            
186             sub setShowSellerPaymentPreferences {
187             my $self = shift;
188             my $sShowSellerPaymentPreferences = shift;
189             $self->getRequestDataType()->setShowSellerPaymentPreferences($sShowSellerPaymentPreferences);
190             }
191              
192              
193              
194             #
195             # output properties
196             #
197              
198             =head2 getBidderNoticePreferences()
199              
200             Contains a seller's preferences for receiving bidder notices.
201             Returned when the request sets ShowBidderNoticePreferences to true.
202              
203             Returned: Conditionally
204             # Returns: 'ns:BidderNoticePreferencesType'
205              
206             =cut
207            
208             sub getBidderNoticePreferences {
209             my $self = shift;
210             return $self->getResponseDataType()->getBidderNoticePreferences();
211             }
212              
213             =head2 getCombinedPaymentPreferences()
214              
215             DO NOT USE THIS FIELD. Use 'GetShippingDiscountProfiles' to retrieve
216             similar information.
217             Contains a seller's preferences for accepting combined payments.
218             Returned when ShowCombinedPaymentPreferences is true.
219              
220             Returned: Conditionally
221             # Returns: 'ns:CombinedPaymentPreferencesType'
222              
223             =cut
224            
225             sub getCombinedPaymentPreferences {
226             my $self = shift;
227             return $self->getResponseDataType()->getCombinedPaymentPreferences();
228             }
229              
230             =head2 getCrossPromotionPreferences()
231              
232             Contains a seller's cross-promotion preferences.
233             Returned when ShowCrossPromotionPreferences is true.
234              
235             Returned: Conditionally
236             # Returns: 'ns:CrossPromotionPreferencesType'
237              
238             =cut
239            
240             sub getCrossPromotionPreferences {
241             my $self = shift;
242             return $self->getResponseDataType()->getCrossPromotionPreferences();
243             }
244              
245             =head2 isEmailShipmentTrackingNumberPreference()
246              
247             Contains the user's preference for the email shipment tracking number.
248              
249             Returned: Conditionally
250             # Returns: 'xs:boolean'
251              
252             =cut
253            
254             sub isEmailShipmentTrackingNumberPreference {
255             my $self = shift;
256             return $self->getResponseDataType()->isEmailShipmentTrackingNumberPreference();
257             }
258              
259             =head2 getEndOfAuctionEmailPreferences()
260              
261             Contains the user's end of auction email preferences.
262              
263             Returned: Conditionally
264             # Returns: 'ns:EndOfAuctionEmailPreferencesType'
265              
266             =cut
267            
268             sub getEndOfAuctionEmailPreferences {
269             my $self = shift;
270             return $self->getResponseDataType()->getEndOfAuctionEmailPreferences();
271             }
272              
273             =head2 getProStoresPreference()
274              
275             Details about ProStores and checkout preferences. Returned only if requested
276             on input.
277              
278             Returned: Conditionally
279             # Returns: 'ns:ProStoresCheckoutPreferenceType'
280              
281             =cut
282            
283             sub getProStoresPreference {
284             my $self = shift;
285             return $self->getResponseDataType()->getProStoresPreference();
286             }
287              
288             =head2 getSellerFavoriteItemPreferences()
289              
290             Contains a seller's preferences for displaying items on a buyer's
291             Favorite Sellers' Items page or Favorite Sellers' Items digest.
292              
293             Returned: Conditionally
294             # Returns: 'ns:SellerFavoriteItemPreferencesType'
295              
296             =cut
297            
298             sub getSellerFavoriteItemPreferences {
299             my $self = shift;
300             return $self->getResponseDataType()->getSellerFavoriteItemPreferences();
301             }
302              
303             =head2 getSellerPaymentPreferences()
304              
305             Contains a seller's preferences for accepting payments.
306             Returned when ShowSellerPaymentPreferences is true.
307              
308             Returned: Conditionally
309             # Returns: 'ns:SellerPaymentPreferencesType'
310              
311             =cut
312            
313             sub getSellerPaymentPreferences {
314             my $self = shift;
315             return $self->getResponseDataType()->getSellerPaymentPreferences();
316             }
317              
318              
319              
320              
321              
322             1;