File Coverage

lib/eBay/API/XML/DataType/CharityAffiliationsType.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::CharityAffiliationsType;
4              
5 1     1   1789 use strict;
  1         2  
  1         33  
6 1     1   6 use warnings;
  1         2  
  1         33  
7              
8             ##########################################################################
9             #
10             # Module: ............... eBay/API/XML
11             # File: ................. CharityAffiliationsType.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::CharityAffiliationsType
21              
22             =head1 DESCRIPTION
23              
24             Lists the nonprofit charity organization affiliations for a specified user.
25              
26              
27              
28             =head1 SYNOPSIS
29              
30             =cut
31              
32              
33             =head1 INHERITANCE
34              
35             eBay::API::XML::DataType::CharityAffiliationsType inherits from the L class
36              
37             =cut
38              
39 1     1   44 use eBay::API::XML::BaseDataType;
  0            
  0            
40             our @ISA = ("eBay::API::XML::BaseDataType");
41              
42             use eBay::API::XML::DataType::CharityIDType;
43              
44              
45             my @gaProperties = ( [ 'CharityID', 'ns:CharityIDType', '1'
46             ,'eBay::API::XML::DataType::CharityIDType', '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 setCharityID()
72              
73             Indicates the affiliation status for nonprofit charity organizations
74             registered with the dedicated eBay Giving Works provider.
75              
76             # Argument: reference to an array
77             of 'ns:CharityIDType'
78              
79             =cut
80              
81             sub setCharityID {
82             my $self = shift;
83             $self->{'CharityID'} =
84             $self->convertArray_To_RefToArrayIfNeeded(@_);
85             }
86              
87             =head2 getCharityID()
88              
89             Calls: GetBidderList
90             Returned: Conditionally
91              
92             Calls: GetUser
93             Returned: Conditionally
94             DeprecationDetails: NoOp
95             Details: DetailLevel: none, ReturnSummary, ReturnAll
96             UseInstead: User.SellerInfo.CharityAffiliationDetails.CharityAffiliationDetail.CharityID
97              
98             Calls: GetItemTransactions
99             GetSellerTransactions
100             Returned: Conditionally
101             Details: DetailLevel: none, ReturnAll
102              
103             # Returns: reference to an array
104             of 'ns:CharityIDType'
105              
106             =cut
107              
108             sub getCharityID {
109             my $self = shift;
110             return $self->_getDataTypeArray('CharityID');
111             }
112              
113              
114              
115              
116              
117             ## Attribute and Property lists
118             sub getPropertiesList {
119             my $self = shift;
120             return \@gaProperties;
121             }
122              
123             sub getAttributesList {
124             my $self = shift;
125             return \@gaAttributes;
126             }
127              
128              
129              
130             1;