File Coverage

lib/eBay/API/XML/DataType/ContextSearchAssetType.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::ContextSearchAssetType;
4              
5 1     1   1345 use strict;
  1         2  
  1         29  
6 1     1   5 use warnings;
  1         2  
  1         30  
7              
8             ##########################################################################
9             #
10             # Module: ............... eBay/API/XML
11             # File: ................. ContextSearchAssetType.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::ContextSearchAssetType
21              
22             =head1 DESCRIPTION
23              
24             Score and rank for a keyword identified for a web page.
25              
26              
27              
28             =head1 SYNOPSIS
29              
30             =cut
31              
32              
33             =head1 INHERITANCE
34              
35             eBay::API::XML::DataType::ContextSearchAssetType inherits from the L class
36              
37             =cut
38              
39 1     1   38 use eBay::API::XML::BaseDataType;
  0            
  0            
40             our @ISA = ("eBay::API::XML::BaseDataType");
41              
42             use eBay::API::XML::DataType::CategoryType;
43              
44              
45             my @gaProperties = ( [ 'Category', 'ns:CategoryType', ''
46             ,'eBay::API::XML::DataType::CategoryType', '1' ]
47             , [ 'Keyword', 'xs:string', '', '', '' ]
48             , [ 'Ranking', 'xs:int', '', '', '' ]
49             );
50             push @gaProperties, @{eBay::API::XML::BaseDataType::getPropertiesList()};
51              
52             my @gaAttributes = (
53             );
54             push @gaAttributes, @{eBay::API::XML::BaseDataType::getAttributesList()};
55              
56             =head1 Subroutines:
57              
58             =cut
59              
60             sub new {
61             my $classname = shift;
62             my %args = @_;
63             my $self = $classname->SUPER::new(%args);
64             return $self;
65             }
66              
67             sub isScalar {
68             return 0;
69             }
70              
71              
72              
73             =head2 setCategory()
74              
75             The eBay category in which the keyword is used.
76              
77             # Argument: 'ns:CategoryType'
78              
79             =cut
80              
81             sub setCategory {
82             my $self = shift;
83             $self->{'Category'} = shift
84             }
85              
86             =head2 getCategory()
87              
88             Calls: GetContextualKeywords
89             Returned: Always
90              
91             # Returns: 'ns:CategoryType'
92              
93             =cut
94              
95             sub getCategory {
96             my $self = shift;
97             return $self->_getDataTypeInstance( 'Category'
98             ,'eBay::API::XML::DataType::CategoryType');
99             }
100              
101              
102             =head2 setKeyword()
103              
104             The keyword.
105              
106             MaxLength: 64
107              
108             # Argument: 'xs:string'
109              
110             =cut
111              
112             sub setKeyword {
113             my $self = shift;
114             $self->{'Keyword'} = shift
115             }
116              
117             =head2 getKeyword()
118              
119             Calls: GetContextualKeywords
120             Returned: Always
121              
122             # Returns: 'xs:string'
123              
124             =cut
125              
126             sub getKeyword {
127             my $self = shift;
128             return $self->{'Keyword'};
129             }
130              
131              
132             =head2 setRanking()
133              
134             The ranking of this keyword and category relative to
135             other keywords and categories (when scores are sorted).
136              
137             Max: 2147483647
138             Min: 1
139              
140             # Argument: 'xs:int'
141              
142             =cut
143              
144             sub setRanking {
145             my $self = shift;
146             $self->{'Ranking'} = shift
147             }
148              
149             =head2 getRanking()
150              
151             Calls: GetContextualKeywords
152             Returned: Always
153              
154             # Returns: 'xs:int'
155              
156             =cut
157              
158             sub getRanking {
159             my $self = shift;
160             return $self->{'Ranking'};
161             }
162              
163              
164              
165              
166              
167             ## Attribute and Property lists
168             sub getPropertiesList {
169             my $self = shift;
170             return \@gaProperties;
171             }
172              
173             sub getAttributesList {
174             my $self = shift;
175             return \@gaAttributes;
176             }
177              
178              
179              
180             1;