File Coverage

lib/eBay/API/XML/DataType/CharityAffiliationDetailType.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::CharityAffiliationDetailType;
4              
5 1     1   1890 use strict;
  1         4  
  1         34  
6 1     1   6 use warnings;
  1         2  
  1         33  
7              
8             ##########################################################################
9             #
10             # Module: ............... eBay/API/XML
11             # File: ................. CharityAffiliationDetailType.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::CharityAffiliationDetailType
21              
22             =head1 DESCRIPTION
23              
24             The information of nonprofit charity organization affiliation.
25              
26              
27              
28             =head1 SYNOPSIS
29              
30             =cut
31              
32              
33             =head1 INHERITANCE
34              
35             eBay::API::XML::DataType::CharityAffiliationDetailType inherits from the L class
36              
37             =cut
38              
39 1     1   45 use eBay::API::XML::BaseDataType;
  0            
  0            
40             our @ISA = ("eBay::API::XML::BaseDataType");
41              
42             use eBay::API::XML::DataType::Enum::CharityAffiliationTypeCodeType;
43              
44              
45             my @gaProperties = ( [ 'AffiliationType', 'ns:CharityAffiliationTypeCodeType', ''
46             ,'eBay::API::XML::DataType::Enum::CharityAffiliationTypeCodeType', '' ]
47             , [ 'CharityID', 'xs:string', '', '', '' ]
48             , [ 'LastUsedTime', 'xs:dateTime', '', '', '' ]
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 setAffiliationType()
74              
75             Indicates the affiliation status of the nonprofit charity
76             organization registered with the eBay Giving Works provider.
77              
78             # Argument: 'ns:CharityAffiliationTypeCodeType'
79              
80             =cut
81              
82             sub setAffiliationType {
83             my $self = shift;
84             $self->{'AffiliationType'} = shift
85             }
86              
87             =head2 getAffiliationType()
88              
89             Calls: GetUser
90             Returned: Conditionally
91             Details: DetailLevel: none, ReturnSummary, ReturnAll
92              
93             # Returns: 'ns:CharityAffiliationTypeCodeType'
94              
95             =cut
96              
97             sub getAffiliationType {
98             my $self = shift;
99             return $self->{'AffiliationType'};
100             }
101              
102              
103             =head2 setCharityID()
104              
105             The affiliation ID for nonprofit charity organizations
106             registered with the dedicated eBay Giving Works provider.
107              
108             # Argument: 'xs:string'
109              
110             =cut
111              
112             sub setCharityID {
113             my $self = shift;
114             $self->{'CharityID'} = shift
115             }
116              
117             =head2 getCharityID()
118              
119             Calls: GetUser
120             Returned: Conditionally
121             Details: DetailLevel: none, ReturnSummary, ReturnAll
122              
123             # Returns: 'xs:string'
124              
125             =cut
126              
127             sub getCharityID {
128             my $self = shift;
129             return $self->{'CharityID'};
130             }
131              
132              
133             =head2 setLastUsedTime()
134              
135             Indicates the affiliation last used date of the nonprofit charity
136             organization registered with the eBay Giving Works provider.
137              
138             # Argument: 'xs:dateTime'
139              
140             =cut
141              
142             sub setLastUsedTime {
143             my $self = shift;
144             $self->{'LastUsedTime'} = shift
145             }
146              
147             =head2 getLastUsedTime()
148              
149             Calls: GetUser
150             Returned: Conditionally
151             Details: DetailLevel: none, ReturnSummary, ReturnAll
152              
153             # Returns: 'xs:dateTime'
154              
155             =cut
156              
157             sub getLastUsedTime {
158             my $self = shift;
159             return $self->{'LastUsedTime'};
160             }
161              
162              
163              
164              
165              
166             ## Attribute and Property lists
167             sub getPropertiesList {
168             my $self = shift;
169             return \@gaProperties;
170             }
171              
172             sub getAttributesList {
173             my $self = shift;
174             return \@gaAttributes;
175             }
176              
177              
178              
179             1;