File Coverage

lib/eBay/API/XML/Call/GetUserDisputes.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::GetUserDisputes;
4              
5 1     1   2343 use strict;
  1         2  
  1         26  
6 1     1   3 use warnings;
  1         2  
  1         25  
7              
8             ##########################################################################
9             #
10             # Module: ............... eBay/API/XML
11             # File: ................. GetUserDisputes.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::GetUserDisputes
21              
22             =head1 DESCRIPTION
23              
24              
25              
26             =head1 SYNOPSIS
27              
28             =cut
29              
30              
31             =head1 INHERITANCE
32              
33             eBay::API::XML::Call::GetUserDisputes 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::GetUserDisputes::GetUserDisputesRequestType;
41             use eBay::API::XML::Call::GetUserDisputes::GetUserDisputesResponseType;
42              
43              
44             =head1 Subroutines:
45              
46             =cut
47              
48             sub getApiCallName {
49             return 'GetUserDisputes';
50             }
51             sub getRequestDataTypeFullPackage {
52             return 'eBay::API::XML::Call::GetUserDisputes::GetUserDisputesRequestType';
53             }
54             sub getResponseDataTypeFullPackage {
55             return 'eBay::API::XML::Call::GetUserDisputes::GetUserDisputesResponseType';
56             }
57              
58             #
59             # input properties
60             #
61              
62             =head2 setDisputeFilterType()
63              
64             A filter that specifies a subset of disputes to return. The return list
65             includes both Item Not Received and Unpaid Item disputes.
66              
67             RequiredInput: No
68             # Argument: 'ns:DisputeFilterTypeCodeType'
69              
70             =cut
71            
72             sub setDisputeFilterType {
73             my $self = shift;
74             my $sDisputeFilterType = shift;
75             $self->getRequestDataType()->setDisputeFilterType($sDisputeFilterType);
76             }
77              
78             =head2 setDisputeSortType()
79              
80             The value and sequence to use to sort the returned disputes.
81              
82             RequiredInput: No
83             # Argument: 'ns:DisputeSortTypeCodeType'
84              
85             =cut
86            
87             sub setDisputeSortType {
88             my $self = shift;
89             my $sDisputeSortType = shift;
90             $self->getRequestDataType()->setDisputeSortType($sDisputeSortType);
91             }
92              
93             =head2 setModTimeFrom()
94              
95             A filter that retrieves disputes whose DisputeModifiedTime is later
96             than or equal to this value. Specify the time value in GMT.
97             See the eBay Web Services documentation for information about specifying time values.
98             For more precise control of the date range filter, it is a good practice to also
99             specify ModTimeTo. Otherwise, the end of the date range is the present time.
100             Filtering by date range is optional. You can use date range filters in combination
101             with other filters like DisputeFilterType to control the amount of data returned.
102              
103             RequiredInput: No
104             # Argument: 'xs:dateTime'
105              
106             =cut
107            
108             sub setModTimeFrom {
109             my $self = shift;
110             my $sModTimeFrom = shift;
111             $self->getRequestDataType()->setModTimeFrom($sModTimeFrom);
112             }
113              
114             =head2 setModTimeTo()
115              
116             A filter that retrieves disputes whose DisputeModifiedTime is earlier
117             than or equal to this value. Specify the time value in GMT.
118             See the eBay Web Services documentation for information about specifying time values.
119             For more precise control of the date range filter, it is a good practice to also
120             specify ModTimeFrom. Otherwise, all available disputes modified prior to the ModTimeTo value are returned.
121             Filtering by date range is optional. You can use date range filters in combination
122             with other filters like DisputeFilterType to control the amount of data returned.
123              
124             RequiredInput: No
125             # Argument: 'xs:dateTime'
126              
127             =cut
128            
129             sub setModTimeTo {
130             my $self = shift;
131             my $sModTimeTo = shift;
132             $self->getRequestDataType()->setModTimeTo($sModTimeTo);
133             }
134              
135             =head2 setPagination()
136              
137             The virtual page number of the result set to display. A result set has a number of disputes
138             divided into virtual pages, with 200 disputes per page. The response can only display one page.
139             The first page in the result set is number 1. Required. If not specified, a warning is returned
140             and Pagination.PageNumber is set to 1 by default.
141              
142             RequiredInput: Yes
143             # Argument: 'ns:PaginationType'
144              
145             =cut
146            
147             sub setPagination {
148             my $self = shift;
149             my $pPagination = shift;
150             $self->getRequestDataType()->setPagination($pPagination);
151             }
152              
153              
154              
155             #
156             # output properties
157             #
158              
159             =head2 getDisputeArray()
160              
161             The array of disputes returned.
162              
163             Returned: Always
164             Details: DetailLevel: ReturnSummary, ReturnAll, none
165             # Returns: 'ns:DisputeArrayType'
166              
167             =cut
168            
169             sub getDisputeArray {
170             my $self = shift;
171             return $self->getResponseDataType()->getDisputeArray();
172             }
173              
174             =head2 getDisputeFilterCount()
175              
176             The number of disputes that involve the requester as
177             buyer or seller and match a given filter type.
178              
179             Returned: Always
180             Details: DetailLevel: ReturnSummary, ReturnAll, none
181             # Returns: reference to an array
182             of 'ns:DisputeFilterCountType'
183              
184             =cut
185            
186             sub getDisputeFilterCount {
187             my $self = shift;
188             return $self->getResponseDataType()->getDisputeFilterCount();
189             }
190              
191             =head2 getEndingDisputeID()
192              
193             The index of the last dispute in the current result set, relative
194             to the total number of disputes available.
195             Primarily useful for interpreting paginated results.
196             For example, if 228 disputes are available and
197             200 results are returned per page: The first page returns
198             an EndingDisputeID value of 200 and the second page returns an
199             EndingDisputeID value of 228.
200              
201             Returned: Always
202             Details: DetailLevel: ReturnSummary, ReturnAll, none
203             # Returns: 'ns:DisputeIDType'
204              
205             =cut
206            
207             sub getEndingDisputeID {
208             my $self = shift;
209             return $self->getResponseDataType()->getEndingDisputeID();
210             }
211              
212             =head2 getItemsPerPage()
213              
214             The number of disputes on each virtual page in the result set.
215             The virtual page returned is determined by PageNumber.
216             Default is 200.
217              
218             Returned: Always
219             Details: DetailLevel: ReturnSummary, ReturnAll, none
220             # Returns: 'xs:int'
221              
222             =cut
223            
224             sub getItemsPerPage {
225             my $self = shift;
226             return $self->getResponseDataType()->getItemsPerPage();
227             }
228              
229             =head2 getPageNumber()
230              
231             The page of the total result set returned in the call. The entire result set
232             is virtual and the call returns only one page of it.
233              
234             Returned: Always
235             Details: DetailLevel: ReturnSummary, ReturnAll, none
236             # Returns: 'xs:int'
237              
238             =cut
239            
240             sub getPageNumber {
241             my $self = shift;
242             return $self->getResponseDataType()->getPageNumber();
243             }
244              
245             =head2 getPaginationResult()
246              
247             The result of the pagination, including the total number
248             of virtual pages in the result set and the total number of
249             disputes returned.
250              
251             Returned: Always
252             Details: DetailLevel: ReturnSummary, ReturnAll, none
253             # Returns: 'ns:PaginationResultType'
254              
255             =cut
256            
257             sub getPaginationResult {
258             my $self = shift;
259             return $self->getResponseDataType()->getPaginationResult();
260             }
261              
262             =head2 getStartingDisputeID()
263              
264             The index of the first dispute in the current result set, relative
265             to the total number of disputes available.
266             Primarily useful for interpreting paginated results.
267             For example, if 228 disputes are available and
268             200 results are returned per page: The first page returns
269             a StartingDisputeID value of 1 and the second page returns a
270             StartingDisputeID value of 201.
271              
272             Returned: Always
273             Details: DetailLevel: ReturnSummary, ReturnAll, none
274             # Returns: 'ns:DisputeIDType'
275              
276             =cut
277            
278             sub getStartingDisputeID {
279             my $self = shift;
280             return $self->getResponseDataType()->getStartingDisputeID();
281             }
282              
283              
284              
285              
286              
287             1;