File Coverage

lib/eBay/API/XML/DataType/BuyerType.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::BuyerType;
4              
5 1     1   1077 use strict;
  1         2  
  1         32  
6 1     1   5 use warnings;
  1         3  
  1         30  
7              
8             ##########################################################################
9             #
10             # Module: ............... eBay/API/XML
11             # File: ................. BuyerType.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::BuyerType
21              
22             =head1 DESCRIPTION
23              
24             Contains information about a user as a buyer.
25              
26              
27              
28             =head1 SYNOPSIS
29              
30             =cut
31              
32              
33             =head1 INHERITANCE
34              
35             eBay::API::XML::DataType::BuyerType inherits from the L class
36              
37             =cut
38              
39 1     1   37 use eBay::API::XML::BaseDataType;
  0            
  0            
40             our @ISA = ("eBay::API::XML::BaseDataType");
41              
42             use eBay::API::XML::DataType::AddressType;
43              
44              
45             my @gaProperties = ( [ 'ShippingAddress', 'ns:AddressType', ''
46             ,'eBay::API::XML::DataType::AddressType', '1' ]
47             );
48             push @gaProperties, @{eBay::API::XML::BaseDataType::getPropertiesList()};
49              
50             my @gaAttributes = (
51             );
52             push @gaAttributes, @{eBay::API::XML::BaseDataType::getAttributesList()};
53              
54             =head1 Subroutines:
55              
56             =cut
57              
58             sub new {
59             my $classname = shift;
60             my %args = @_;
61             my $self = $classname->SUPER::new(%args);
62             return $self;
63             }
64              
65             sub isScalar {
66             return 0;
67             }
68              
69              
70              
71             =head2 setShippingAddress()
72              
73             Contains the address of the buyer in the transaction, to which the seller
74             would ship the item(s). See AddressType for its child elements. GetAllBidders
75             is returning only Country and PostalCode currently.
76             Output only.
77              
78             # Argument: 'ns:AddressType'
79              
80             =cut
81              
82             sub setShippingAddress {
83             my $self = shift;
84             $self->{'ShippingAddress'} = shift
85             }
86              
87             =head2 getShippingAddress()
88              
89             Calls: GetAllBidders
90             GetHighBidders
91             Returned: Always
92              
93             Calls: GetBidderList
94             Returned: Conditionally
95              
96             Calls: GetMyeBaySelling
97             Returned: Conditionally
98             Details: DetailLevel: none, ReturnSummary, ReturnAll
99             Context: SoldList
100              
101             Calls: GetOrderTransactions
102             Returned: Conditionally
103             Details: DetailLevel: none, ReturnAll
104              
105             Calls: GetSellerList
106             Returned: Conditionally
107             Details: DetailLevel: ItemReturnDescription, ReturnAll
108             GranularityLevel: Fine
109              
110             Context: HighBidder
111              
112             Calls: GetItem
113             Returned: Conditionally
114             Details: DetailLevel: none, ItemReturnDescription, ItemReturnAttributes, ReturnAll
115             Context: HighBidder
116              
117             Calls: GetItemTransactions
118             GetSellerTransactions
119             Returned: Conditionally
120             Details: DetailLevel: none, ReturnAll
121              
122             # Returns: 'ns:AddressType'
123              
124             =cut
125              
126             sub getShippingAddress {
127             my $self = shift;
128             return $self->_getDataTypeInstance( 'ShippingAddress'
129             ,'eBay::API::XML::DataType::AddressType');
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;