File Coverage

lib/eBay/API/XML/Call/GetPopularKeywords.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::GetPopularKeywords;
4              
5 1     1   2262 use strict;
  1         2  
  1         25  
6 1     1   4 use warnings;
  1         2  
  1         24  
7              
8             ##########################################################################
9             #
10             # Module: ............... eBay/API/XML
11             # File: ................. GetPopularKeywords.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::GetPopularKeywords
21              
22             =head1 DESCRIPTION
23              
24              
25              
26             =head1 SYNOPSIS
27              
28             =cut
29              
30              
31             =head1 INHERITANCE
32              
33             eBay::API::XML::Call::GetPopularKeywords inherits from the L class
34              
35             =cut
36              
37 1     1   33 use eBay::API::XML::BaseCall;
  0            
  0            
38             our @ISA = ("eBay::API::XML::BaseCall");
39              
40             use eBay::API::XML::Call::GetPopularKeywords::GetPopularKeywordsRequestType;
41             use eBay::API::XML::Call::GetPopularKeywords::GetPopularKeywordsResponseType;
42              
43              
44             =head1 Subroutines:
45              
46             =cut
47              
48             sub getApiCallName {
49             return 'GetPopularKeywords';
50             }
51             sub getRequestDataTypeFullPackage {
52             return 'eBay::API::XML::Call::GetPopularKeywords::GetPopularKeywordsRequestType';
53             }
54             sub getResponseDataTypeFullPackage {
55             return 'eBay::API::XML::Call::GetPopularKeywords::GetPopularKeywordsResponseType';
56             }
57              
58             #
59             # input properties
60             #
61              
62             =head2 setCategoryID()
63              
64             A category ID for which you want keywords returned.
65             When IncludeChildCategories is true, one and only one
66             CategoryID is allowed. Otherwise, up
67             to 100 CategoryIds are allowed.
68             To retrieve the keywords for root category, set one of
69             the CategoryIDs to -1 or submit no CategoryIDs at all.
70              
71             MaxLength: 10
72              
73             RequiredInput: No
74             # Argument: reference to an array
75             of 'xs:string'
76              
77             =cut
78            
79             sub setCategoryID {
80             my $self = shift;
81             my $sCategoryID = shift;
82             $self->getRequestDataType()->setCategoryID($sCategoryID);
83             }
84              
85             =head2 setIncludeChildCategories()
86              
87             If true, only one CategoryID can be specified, and keywords
88             are returned for that category and its subcategories.
89             If false, keywords are returned only for the categories
90             identified by CategoryID. Default is false.
91              
92             RequiredInput: No
93             # Argument: 'xs:boolean'
94              
95             =cut
96            
97             sub setIncludeChildCategories {
98             my $self = shift;
99             my $sIncludeChildCategories = shift;
100             $self->getRequestDataType()->setIncludeChildCategories($sIncludeChildCategories);
101             }
102              
103             =head2 setMaxKeywordsRetrieved()
104              
105             The maximum number of keywords to be retrieved per category
106             for this call.
107              
108             Max: 1000
109             Default: 20
110             Min: 1
111              
112             RequiredInput: No
113             # Argument: 'xs:int'
114              
115             =cut
116            
117             sub setMaxKeywordsRetrieved {
118             my $self = shift;
119             my $sMaxKeywordsRetrieved = shift;
120             $self->getRequestDataType()->setMaxKeywordsRetrieved($sMaxKeywordsRetrieved);
121             }
122              
123             =head2 setPagination()
124              
125             Details about how many categories to return per
126             page and which page to view.
127              
128             RequiredInput: No
129             # Argument: 'ns:PaginationType'
130              
131             =cut
132            
133             sub setPagination {
134             my $self = shift;
135             my $pPagination = shift;
136             $self->getRequestDataType()->setPagination($pPagination);
137             }
138              
139              
140              
141             #
142             # output properties
143             #
144              
145             =head2 getCategoryArray()
146              
147             Organization of keywords by category. For each
148             category, its ID and its parent's ID and keywords
149             are listed.
150              
151             Returned: Always
152             # Returns: 'ns:CategoryArrayType'
153              
154             =cut
155            
156             sub getCategoryArray {
157             my $self = shift;
158             return $self->getResponseDataType()->getCategoryArray();
159             }
160              
161             =head2 isHasMore()
162              
163             Indicates whether there are more categories beyond the
164             subset returned in the last
165             call to GetPopularKeywords. Returned only when
166             IncludeChildCategories is true.
167              
168             Returned: Conditionally
169             # Returns: 'xs:boolean'
170              
171             =cut
172            
173             sub isHasMore {
174             my $self = shift;
175             return $self->getResponseDataType()->isHasMore();
176             }
177              
178             =head2 getPaginationResult()
179              
180             Contains information regarding the pagination of data (if pagination is used),
181             including total number of pages and total number of entries.
182              
183             Returned: Conditionally
184             # Returns: 'ns:PaginationResultType'
185              
186             =cut
187            
188             sub getPaginationResult {
189             my $self = shift;
190             return $self->getResponseDataType()->getPaginationResult();
191             }
192              
193              
194              
195              
196              
197             1;