File Coverage

lib/eBay/API/XML/DataType/ItemRatingDetailsType.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::ItemRatingDetailsType;
4              
5 1     1   1345 use strict;
  1         2  
  1         38  
6 1     1   5 use warnings;
  1         2  
  1         33  
7              
8             ##########################################################################
9             #
10             # Module: ............... eBay/API/XML
11             # File: ................. ItemRatingDetailsType.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::ItemRatingDetailsType
21              
22             =head1 DESCRIPTION
23              
24             Applicable to sites that support the Detailed Seller Ratings feature.
25             The ItemRatingDetailsType contains detailed seller ratings for a transaction in one area. When buyers leave an overall Feedback rating (positive, neutral, or negative) for a seller, they also can leave ratings in four areas: item as described, communication, shipping time, and charges for shipping and handling. Users retrieve detailed ratings as averages of the ratings left by buyers.
26              
27              
28              
29             =head1 SYNOPSIS
30              
31             =cut
32              
33              
34             =head1 INHERITANCE
35              
36             eBay::API::XML::DataType::ItemRatingDetailsType inherits from the L class
37              
38             =cut
39              
40 1     1   43 use eBay::API::XML::BaseDataType;
  0            
  0            
41             our @ISA = ("eBay::API::XML::BaseDataType");
42              
43             use eBay::API::XML::DataType::Enum::FeedbackRatingDetailCodeType;
44              
45              
46             my @gaProperties = ( [ 'Rating', 'xs:int', '', '', '' ]
47             , [ 'RatingDetail', 'ns:FeedbackRatingDetailCodeType', ''
48             ,'eBay::API::XML::DataType::Enum::FeedbackRatingDetailCodeType', '' ]
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 setRating()
74              
75             A detailed seller rating for a transaction, applying to the area
76             in the corresponding RatingDetail field.
77              
78             Calls: LeaveFeedback
79             RequiredInput: No
80              
81             # Argument: 'xs:int'
82              
83             =cut
84              
85             sub setRating {
86             my $self = shift;
87             $self->{'Rating'} = shift
88             }
89              
90             =head2 getRating()
91              
92             # Returns: 'xs:int'
93              
94             =cut
95              
96             sub getRating {
97             my $self = shift;
98             return $self->{'Rating'};
99             }
100              
101              
102             =head2 setRatingDetail()
103              
104             The area of a specific detailed seller rating for a transaction.
105             When buyers leave an overall Feedback rating (positive, neutral, or negative)
106             for a seller, they also can leave ratings in four areas: item as described,
107             communication, shipping time, and charges for shipping and handling.
108              
109             Calls: LeaveFeedback
110             RequiredInput: No
111              
112             # Argument: 'ns:FeedbackRatingDetailCodeType'
113              
114             =cut
115              
116             sub setRatingDetail {
117             my $self = shift;
118             $self->{'RatingDetail'} = shift
119             }
120              
121             =head2 getRatingDetail()
122              
123             # Returns: 'ns:FeedbackRatingDetailCodeType'
124              
125             =cut
126              
127             sub getRatingDetail {
128             my $self = shift;
129             return $self->{'RatingDetail'};
130             }
131              
132              
133              
134              
135              
136             ## Attribute and Property lists
137             sub getPropertiesList {
138             my $self = shift;
139             return \@gaProperties;
140             }
141              
142             sub getAttributesList {
143             my $self = shift;
144             return \@gaAttributes;
145             }
146              
147              
148              
149             1;