File Coverage

lib/eBay/API/XML/DataType/AffiliateTrackingDetailsType.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::AffiliateTrackingDetailsType;
4              
5 1     1   1165 use strict;
  1         3  
  1         65  
6 1     1   6 use warnings;
  1         3  
  1         33  
7              
8             ##########################################################################
9             #
10             # Module: ............... eBay/API/XML
11             # File: ................. AffiliateTrackingDetailsType.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::AffiliateTrackingDetailsType
21              
22             =head1 DESCRIPTION
23              
24             Container for fields related to affiliate tracking. For additional information,
25             see the annotations to the elements in this type.
26              
27              
28              
29             =head1 SYNOPSIS
30              
31             =cut
32              
33              
34             =head1 INHERITANCE
35              
36             eBay::API::XML::DataType::AffiliateTrackingDetailsType inherits from the L class
37              
38             =cut
39              
40 1     1   61 use eBay::API::XML::BaseDataType;
  0            
  0            
41             our @ISA = ("eBay::API::XML::BaseDataType");
42              
43             use eBay::API::XML::DataType::Enum::ApplicationDeviceTypeCodeType;
44              
45              
46             my @gaProperties = ( [ 'AffiliateUserID', 'xs:string', '', '', '' ]
47             , [ 'ApplicationDeviceType', 'ns:ApplicationDeviceTypeCodeType', ''
48             ,'eBay::API::XML::DataType::Enum::ApplicationDeviceTypeCodeType', '' ]
49             , [ 'TrackingID', 'xs:string', '', '', '' ]
50             , [ 'TrackingPartnerCode', 'xs:string', '', '', '' ]
51             );
52             push @gaProperties, @{eBay::API::XML::BaseDataType::getPropertiesList()};
53              
54             my @gaAttributes = (
55             );
56             push @gaAttributes, @{eBay::API::XML::BaseDataType::getAttributesList()};
57              
58             =head1 Subroutines:
59              
60             =cut
61              
62             sub new {
63             my $classname = shift;
64             my %args = @_;
65             my $self = $classname->SUPER::new(%args);
66             return $self;
67             }
68              
69             sub isScalar {
70             return 0;
71             }
72              
73              
74              
75             =head2 setAffiliateUserID()
76              
77             Need not be specified. You can define an AffiliateUserID
78             (up to 256 characters) if you want to leverage it to better monitor
79             your marketing efforts.
80             If you are using the eBay Partner Network,
81             and you provide an AffiliateUserID, the tracking URL returned
82             by eBay Partner Network will contain the AffiliateUserID, but it
83             will be referred to as a "customid".
84              
85             Calls: GetProducts
86             GetSearchResults
87             PlaceOffer
88             RequiredInput: Conditionally
89              
90             # Argument: 'xs:string'
91              
92             =cut
93              
94             sub setAffiliateUserID {
95             my $self = shift;
96             $self->{'AffiliateUserID'} = shift
97             }
98              
99             =head2 getAffiliateUserID()
100              
101             # Returns: 'xs:string'
102              
103             =cut
104              
105             sub getAffiliateUserID {
106             my $self = shift;
107             return $self->{'AffiliateUserID'};
108             }
109              
110              
111             =head2 setApplicationDeviceType()
112              
113             Type of device from which the call originated. For PlaceOffer, if you are using
114             affiliate tracking, this field is required as part of the set of tags you
115             use in the AffiliateTrackingDetails container.
116              
117             Calls: PlaceOffer
118             RequiredInput: Conditionally
119              
120             # Argument: 'ns:ApplicationDeviceTypeCodeType'
121              
122             =cut
123              
124             sub setApplicationDeviceType {
125             my $self = shift;
126             $self->{'ApplicationDeviceType'} = shift
127             }
128              
129             =head2 getApplicationDeviceType()
130              
131             # Returns: 'ns:ApplicationDeviceTypeCodeType'
132              
133             =cut
134              
135             sub getApplicationDeviceType {
136             my $self = shift;
137             return $self->{'ApplicationDeviceType'};
138             }
139              
140              
141             =head2 setTrackingID()
142              
143             The value you specify is obtained from your tracking partner.
144             For eBay Partner Network, the TrackingID is the Campaign ID ("campid")
145             provided by eBay Partner Network. A Campaign ID is a 9-digit, unique
146             number to be used for associating traffic. A Campaign ID is valid across all
147             programs to which you have been accepted.
148             Another example is the Affiliate ID given to you by TradeDoubler.
149              
150             Calls: GetProducts
151             GetSearchResults
152             PlaceOffer
153             RequiredInput: Conditionally
154              
155             # Argument: 'xs:string'
156              
157             =cut
158              
159             sub setTrackingID {
160             my $self = shift;
161             $self->{'TrackingID'} = shift
162             }
163              
164             =head2 getTrackingID()
165              
166             # Returns: 'xs:string'
167              
168             =cut
169              
170             sub getTrackingID {
171             my $self = shift;
172             return $self->{'TrackingID'};
173             }
174              
175              
176             =head2 setTrackingPartnerCode()
177              
178             Specifies your tracking partner for affiliate commissions.
179             Affiliates earn money from eBay for driving traffic to eBay.
180             Required if you specify a TrackingID.
181             Depending on your tracking partner, specify one of the
182             following values. Not all partners are valid for all sites.
183             For PlaceOffer, only eBay Partner Network and Mediaplex are valid:
184            
185            
2 = Be Free
186            
3 = Affilinet
187            
4 = TradeDoubler
188            
5 = Mediaplex
189            
6 = DoubleClick
190            
7 = Allyes
191            
8 = BJMT
192            
9 = eBay Partner Network
193            
194            
195             For information about the eBay Partner Network, see
196             eBay Partner Network.
197              
198             SeeLink: URL: http://developer.ebay.com/DevZone/XML/docs/WebHelp/index.htm?context=eBay_XML_API&topic=AffiliateTrackingConcepts
199             Title: Affiliate Tracking Concepts
200              
201             Calls: GetProducts
202             GetSearchResults
203             PlaceOffer
204             RequiredInput: Conditionally
205              
206             # Argument: 'xs:string'
207              
208             =cut
209              
210             sub setTrackingPartnerCode {
211             my $self = shift;
212             $self->{'TrackingPartnerCode'} = shift
213             }
214              
215             =head2 getTrackingPartnerCode()
216              
217             # Returns: 'xs:string'
218              
219             =cut
220              
221             sub getTrackingPartnerCode {
222             my $self = shift;
223             return $self->{'TrackingPartnerCode'};
224             }
225              
226              
227              
228              
229              
230             ## Attribute and Property lists
231             sub getPropertiesList {
232             my $self = shift;
233             return \@gaProperties;
234             }
235              
236             sub getAttributesList {
237             my $self = shift;
238             return \@gaAttributes;
239             }
240              
241              
242              
243             1;