File Coverage

lib/eBay/API/XML/DataType/DisputeFilterCountType.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::DisputeFilterCountType;
4              
5 1     1   1311 use strict;
  1         2  
  1         37  
6 1     1   5 use warnings;
  1         1  
  1         40  
7              
8             ##########################################################################
9             #
10             # Module: ............... eBay/API/XML
11             # File: ................. DisputeFilterCountType.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::DisputeFilterCountType
21              
22             =head1 DESCRIPTION
23              
24             The number of disputes that match a given filter.
25              
26              
27              
28             =head1 SYNOPSIS
29              
30             =cut
31              
32              
33             =head1 INHERITANCE
34              
35             eBay::API::XML::DataType::DisputeFilterCountType inherits from the L class
36              
37             =cut
38              
39 1     1   40 use eBay::API::XML::BaseDataType;
  0            
  0            
40             our @ISA = ("eBay::API::XML::BaseDataType");
41              
42             use eBay::API::XML::DataType::Enum::DisputeFilterTypeCodeType;
43              
44              
45             my @gaProperties = ( [ 'DisputeFilterType', 'ns:DisputeFilterTypeCodeType', ''
46             ,'eBay::API::XML::DataType::Enum::DisputeFilterTypeCodeType', '' ]
47             , [ 'TotalAvailable', 'xs:int', '', '', '' ]
48             );
49             push @gaProperties, @{eBay::API::XML::BaseDataType::getPropertiesList()};
50              
51             my @gaAttributes = (
52             );
53             push @gaAttributes, @{eBay::API::XML::BaseDataType::getAttributesList()};
54              
55             =head1 Subroutines:
56              
57             =cut
58              
59             sub new {
60             my $classname = shift;
61             my %args = @_;
62             my $self = $classname->SUPER::new(%args);
63             return $self;
64             }
65              
66             sub isScalar {
67             return 0;
68             }
69              
70              
71              
72             =head2 setDisputeFilterType()
73              
74             A filter used to reduce the number of disputes returned. The filter uses criteria
75             such as whether the dispute is awaiting a response, is closed, or is eligible for
76             credit. Both Unpaid Item and Item Not Received disputes can be returned for the
77             same filter value.
78              
79             # Argument: 'ns:DisputeFilterTypeCodeType'
80              
81             =cut
82              
83             sub setDisputeFilterType {
84             my $self = shift;
85             $self->{'DisputeFilterType'} = shift
86             }
87              
88             =head2 getDisputeFilterType()
89              
90             Calls: GetUserDisputes
91             Returned: Always
92             Details: DetailLevel: ReturnSummary, ReturnAll, none
93              
94             # Returns: 'ns:DisputeFilterTypeCodeType'
95              
96             =cut
97              
98             sub getDisputeFilterType {
99             my $self = shift;
100             return $self->{'DisputeFilterType'};
101             }
102              
103              
104             =head2 setTotalAvailable()
105              
106             The number of disputes that match the filter.
107             In the GetUserDisputes response, not returned for the filter type
108             that was used in the request.
109              
110             # Argument: 'xs:int'
111              
112             =cut
113              
114             sub setTotalAvailable {
115             my $self = shift;
116             $self->{'TotalAvailable'} = shift
117             }
118              
119             =head2 getTotalAvailable()
120              
121             Calls: GetUserDisputes
122             Returned: Always
123             Details: DetailLevel: ReturnSummary, ReturnAll, none
124              
125             # Returns: 'xs:int'
126              
127             =cut
128              
129             sub getTotalAvailable {
130             my $self = shift;
131             return $self->{'TotalAvailable'};
132             }
133              
134              
135              
136              
137              
138             ## Attribute and Property lists
139             sub getPropertiesList {
140             my $self = shift;
141             return \@gaProperties;
142             }
143              
144             sub getAttributesList {
145             my $self = shift;
146             return \@gaAttributes;
147             }
148              
149              
150              
151             1;