File Coverage

lib/eBay/API/XML/Call/GetAllBidders/GetAllBiddersRequestType.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::GetAllBidders::GetAllBiddersRequestType;
4              
5 1     1   1351 use strict;
  1         3  
  1         39  
6 1     1   4 use warnings;
  1         1  
  1         27  
7              
8             ##########################################################################
9             #
10             # Module: ............... eBay/API/XML
11             # File: ................. GetAllBiddersRequestType.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::GetAllBidders::GetAllBiddersRequestType
21              
22             =head1 DESCRIPTION
23              
24             Provides three modes for retrieving a list of the users that bid
25             on a listing. One of the modes is of particular value in support of
26             the Second Chance Offer feature. Includes the list of bidders for the
27             requested item as part of the general item listing data.
28              
29              
30              
31             =head1 SYNOPSIS
32              
33             =cut
34              
35              
36             =head1 INHERITANCE
37              
38             eBay::API::XML::Call::GetAllBidders::GetAllBiddersRequestType inherits from the L class
39              
40             =cut
41              
42 1     1   39 use eBay::API::XML::RequestDataType;
  0            
  0            
43             our @ISA = ("eBay::API::XML::RequestDataType");
44              
45             use eBay::API::XML::DataType::ItemIDType;
46             use eBay::API::XML::DataType::Enum::GetAllBiddersModeCodeType;
47              
48              
49             my @gaProperties = ( [ 'CallMode', 'ns:GetAllBiddersModeCodeType', ''
50             ,'eBay::API::XML::DataType::Enum::GetAllBiddersModeCodeType', '' ]
51             , [ 'IncludeBiddingSummary', 'xs:boolean', '', '', '' ]
52             , [ 'ItemID', 'ns:ItemIDType', ''
53             ,'eBay::API::XML::DataType::ItemIDType', '1' ]
54             );
55             push @gaProperties, @{eBay::API::XML::RequestDataType::getPropertiesList()};
56              
57             my @gaAttributes = (
58             );
59             push @gaAttributes, @{eBay::API::XML::RequestDataType::getAttributesList()};
60              
61             =head1 Subroutines:
62              
63             =cut
64              
65             sub new {
66             my $classname = shift;
67             my %args = @_;
68             my $self = $classname->SUPER::new(%args);
69             return $self;
70             }
71              
72             sub isScalar {
73             return 0;
74             }
75              
76              
77              
78             =head2 setCallMode()
79              
80             Specifies which bidder information to return.
81              
82             RequiredInput: Yes
83             # Argument: 'ns:GetAllBiddersModeCodeType'
84              
85             =cut
86              
87             sub setCallMode {
88             my $self = shift;
89             $self->{'CallMode'} = shift
90             }
91              
92             =head2 getCallMode()
93              
94             # Returns: 'ns:GetAllBiddersModeCodeType'
95              
96             =cut
97              
98             sub getCallMode {
99             my $self = shift;
100             return $self->{'CallMode'};
101             }
102              
103              
104             =head2 setIncludeBiddingSummary()
105              
106             Specifies whether return BiddingSummary container for each offer.
107              
108             RequiredInput: Conditionally
109             # Argument: 'xs:boolean'
110              
111             =cut
112              
113             sub setIncludeBiddingSummary {
114             my $self = shift;
115             $self->{'IncludeBiddingSummary'} = shift
116             }
117              
118             =head2 isIncludeBiddingSummary()
119              
120             # Returns: 'xs:boolean'
121              
122             =cut
123              
124             sub isIncludeBiddingSummary {
125             my $self = shift;
126             return $self->{'IncludeBiddingSummary'};
127             }
128              
129              
130             =head2 setItemID()
131              
132             The item ID for which to retrieve the list of bidders.
133              
134             MaxLength: 19 (Note: The eBay database specifies 38. Currently, Item IDs are usually 9 to 12 digits)
135              
136             RequiredInput: Yes
137             # Argument: 'ns:ItemIDType'
138              
139             =cut
140              
141             sub setItemID {
142             my $self = shift;
143             $self->{'ItemID'} = shift
144             }
145              
146             =head2 getItemID()
147              
148             # Returns: 'ns:ItemIDType'
149              
150             =cut
151              
152             sub getItemID {
153             my $self = shift;
154             return $self->_getDataTypeInstance( 'ItemID'
155             ,'eBay::API::XML::DataType::ItemIDType');
156             }
157              
158              
159              
160              
161              
162             ## Attribute and Property lists
163             sub getPropertiesList {
164             my $self = shift;
165             return \@gaProperties;
166             }
167              
168             sub getAttributesList {
169             my $self = shift;
170             return \@gaAttributes;
171             }
172              
173              
174              
175             1;