File Coverage

lib/eBay/API/XML/DataType/StoreCustomListingHeaderType.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::StoreCustomListingHeaderType;
4              
5 1     1   1184 use strict;
  1         2  
  1         34  
6 1     1   5 use warnings;
  1         3  
  1         32  
7              
8             ##########################################################################
9             #
10             # Module: ............... eBay/API/XML
11             # File: ................. StoreCustomListingHeaderType.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::StoreCustomListingHeaderType
21              
22             =head1 DESCRIPTION
23              
24             Configuration of a Store custom listing header.
25              
26              
27              
28             =head1 SYNOPSIS
29              
30             =cut
31              
32              
33             =head1 INHERITANCE
34              
35             eBay::API::XML::DataType::StoreCustomListingHeaderType inherits from the L class
36              
37             =cut
38              
39 1     1   47 use eBay::API::XML::BaseDataType;
  0            
  0            
40             our @ISA = ("eBay::API::XML::BaseDataType");
41              
42             use eBay::API::XML::DataType::StoreCustomListingHeaderLinkType;
43             use eBay::API::XML::DataType::Enum::StoreCustomListingHeaderDisplayCodeType;
44              
45              
46             my @gaProperties = ( [ 'AddToFavoriteStores', 'xs:boolean', '', '', '' ]
47             , [ 'DisplayType', 'ns:StoreCustomListingHeaderDisplayCodeType', ''
48             ,'eBay::API::XML::DataType::Enum::StoreCustomListingHeaderDisplayCodeType', '' ]
49             , [ 'LinkToInclude', 'ns:StoreCustomListingHeaderLinkType', '1'
50             ,'eBay::API::XML::DataType::StoreCustomListingHeaderLinkType', '1' ]
51             , [ 'Logo', 'xs:boolean', '', '', '' ]
52             , [ 'SearchBox', 'xs:boolean', '', '', '' ]
53             , [ 'SignUpForStoreNewsletter', 'xs:boolean', '', '', '' ]
54             );
55             push @gaProperties, @{eBay::API::XML::BaseDataType::getPropertiesList()};
56              
57             my @gaAttributes = (
58             );
59             push @gaAttributes, @{eBay::API::XML::BaseDataType::getAttributesList()};
60              
61             =head1 Subroutines:
62              
63             =cut
64              
65             sub new {
66             my $classname = shift;
67             my %args = @_;
68             my $self = $classname->SUPER::new(%args);
69             return $self;
70             }
71              
72             sub isScalar {
73             return 0;
74             }
75              
76              
77              
78             =head2 setAddToFavoriteStores()
79              
80             Specifies whether the custom header has a link to Add to
81             Favorite Stores.
82              
83             Calls: SetStore
84             RequiredInput: Conditionally
85              
86             # Argument: 'xs:boolean'
87              
88             =cut
89              
90             sub setAddToFavoriteStores {
91             my $self = shift;
92             $self->{'AddToFavoriteStores'} = shift
93             }
94              
95             =head2 isAddToFavoriteStores()
96              
97             Calls: GetStore
98             Returned: Conditionally
99              
100             # Returns: 'xs:boolean'
101              
102             =cut
103              
104             sub isAddToFavoriteStores {
105             my $self = shift;
106             return $self->{'AddToFavoriteStores'};
107             }
108              
109              
110             =head2 setDisplayType()
111              
112             Display type for the custom listing header.
113              
114             Calls: SetStore
115             RequiredInput: Conditionally
116              
117             # Argument: 'ns:StoreCustomListingHeaderDisplayCodeType'
118              
119             =cut
120              
121             sub setDisplayType {
122             my $self = shift;
123             $self->{'DisplayType'} = shift
124             }
125              
126             =head2 getDisplayType()
127              
128             Calls: GetStore
129             Returned: Conditionally
130              
131             # Returns: 'ns:StoreCustomListingHeaderDisplayCodeType'
132              
133             =cut
134              
135             sub getDisplayType {
136             my $self = shift;
137             return $self->{'DisplayType'};
138             }
139              
140              
141             =head2 setLinkToInclude()
142              
143             Link to include in the custom header.
144              
145             Calls: SetStore
146             RequiredInput: Conditionally
147              
148             # Argument: reference to an array
149             of 'ns:StoreCustomListingHeaderLinkType'
150              
151             =cut
152              
153             sub setLinkToInclude {
154             my $self = shift;
155             $self->{'LinkToInclude'} =
156             $self->convertArray_To_RefToArrayIfNeeded(@_);
157             }
158              
159             =head2 getLinkToInclude()
160              
161             Calls: GetStore
162             Returned: Conditionally
163              
164             # Returns: reference to an array
165             of 'ns:StoreCustomListingHeaderLinkType'
166              
167             =cut
168              
169             sub getLinkToInclude {
170             my $self = shift;
171             return $self->_getDataTypeArray('LinkToInclude');
172             }
173              
174              
175             =head2 setLogo()
176              
177             Specifies whether the custom header has a logo.
178              
179             Calls: SetStore
180             RequiredInput: Conditionally
181              
182             # Argument: 'xs:boolean'
183              
184             =cut
185              
186             sub setLogo {
187             my $self = shift;
188             $self->{'Logo'} = shift
189             }
190              
191             =head2 isLogo()
192              
193             Calls: GetStore
194             Returned: Conditionally
195              
196             # Returns: 'xs:boolean'
197              
198             =cut
199              
200             sub isLogo {
201             my $self = shift;
202             return $self->{'Logo'};
203             }
204              
205              
206             =head2 setSearchBox()
207              
208             Specifies whether the custom header has a search box.
209              
210             Calls: SetStore
211             RequiredInput: Conditionally
212              
213             # Argument: 'xs:boolean'
214              
215             =cut
216              
217             sub setSearchBox {
218             my $self = shift;
219             $self->{'SearchBox'} = shift
220             }
221              
222             =head2 isSearchBox()
223              
224             Calls: GetStore
225             Returned: Conditionally
226              
227             # Returns: 'xs:boolean'
228              
229             =cut
230              
231             sub isSearchBox {
232             my $self = shift;
233             return $self->{'SearchBox'};
234             }
235              
236              
237             =head2 setSignUpForStoreNewsletter()
238              
239             Specifies whether the custom header has a link to Sign up for Store
240             Newsletter.
241              
242             Calls: SetStore
243             RequiredInput: Conditionally
244              
245             # Argument: 'xs:boolean'
246              
247             =cut
248              
249             sub setSignUpForStoreNewsletter {
250             my $self = shift;
251             $self->{'SignUpForStoreNewsletter'} = shift
252             }
253              
254             =head2 isSignUpForStoreNewsletter()
255              
256             Calls: GetStore
257             Returned: Conditionally
258              
259             # Returns: 'xs:boolean'
260              
261             =cut
262              
263             sub isSignUpForStoreNewsletter {
264             my $self = shift;
265             return $self->{'SignUpForStoreNewsletter'};
266             }
267              
268              
269              
270              
271              
272             ## Attribute and Property lists
273             sub getPropertiesList {
274             my $self = shift;
275             return \@gaProperties;
276             }
277              
278             sub getAttributesList {
279             my $self = shift;
280             return \@gaAttributes;
281             }
282              
283              
284              
285             1;