File Coverage

lib/eBay/API/XML/DataType/LiveAuctionBidArrayType.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::LiveAuctionBidArrayType;
4              
5 1     1   1860 use strict;
  1         3  
  1         37  
6 1     1   6 use warnings;
  1         2  
  1         42  
7              
8             ##########################################################################
9             #
10             # Module: ............... eBay/API/XML
11             # File: ................. LiveAuctionBidArrayType.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::LiveAuctionBidArrayType
21              
22             =head1 DESCRIPTION
23              
24             Container for a list of Live Auction Bidders, such as returned by
25             GetLiveAuctionBidders. Will contain zero, one, or multiple
26             LiveAuctionBidType bidders, each of which represents one bidder's request listing
27             that was found by the search.
28              
29              
30              
31             =head1 SYNOPSIS
32              
33             =cut
34              
35              
36             =head1 INHERITANCE
37              
38             eBay::API::XML::DataType::LiveAuctionBidArrayType inherits from the L class
39              
40             =cut
41              
42 1     1   43 use eBay::API::XML::BaseDataType;
  0            
  0            
43             our @ISA = ("eBay::API::XML::BaseDataType");
44              
45             use eBay::API::XML::DataType::LiveAuctionBidType;
46              
47              
48             my @gaProperties = ( [ 'LiveAuctionBid', 'ns:LiveAuctionBidType', '1'
49             ,'eBay::API::XML::DataType::LiveAuctionBidType', '1' ]
50             );
51             push @gaProperties, @{eBay::API::XML::BaseDataType::getPropertiesList()};
52              
53             my @gaAttributes = (
54             );
55             push @gaAttributes, @{eBay::API::XML::BaseDataType::getAttributesList()};
56              
57             =head1 Subroutines:
58              
59             =cut
60              
61             sub new {
62             my $classname = shift;
63             my %args = @_;
64             my $self = $classname->SUPER::new(%args);
65             return $self;
66             }
67              
68             sub isScalar {
69             return 0;
70             }
71              
72              
73              
74             =head2 setLiveAuctionBid()
75              
76             Contains data for an item listing found by a search.
77              
78             # Argument: reference to an array
79             of 'ns:LiveAuctionBidType'
80              
81             =cut
82              
83             sub setLiveAuctionBid {
84             my $self = shift;
85             $self->{'LiveAuctionBid'} =
86             $self->convertArray_To_RefToArrayIfNeeded(@_);
87             }
88              
89             =head2 getLiveAuctionBid()
90              
91             Calls: GetLiveAuctionBidders
92             Returned: Conditionally
93              
94             # Returns: reference to an array
95             of 'ns:LiveAuctionBidType'
96              
97             =cut
98              
99             sub getLiveAuctionBid {
100             my $self = shift;
101             return $self->_getDataTypeArray('LiveAuctionBid');
102             }
103              
104              
105              
106              
107              
108             ## Attribute and Property lists
109             sub getPropertiesList {
110             my $self = shift;
111             return \@gaProperties;
112             }
113              
114             sub getAttributesList {
115             my $self = shift;
116             return \@gaAttributes;
117             }
118              
119              
120              
121             1;