File Coverage

lib/eBay/API/XML/Call/GetAdFormatLeads.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::Call::GetAdFormatLeads;
4              
5 1     1   2261 use strict;
  1         3  
  1         25  
6 1     1   4 use warnings;
  1         1  
  1         25  
7              
8             ##########################################################################
9             #
10             # Module: ............... eBay/API/XML
11             # File: ................. GetAdFormatLeads.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::Call::GetAdFormatLeads
21              
22             =head1 DESCRIPTION
23              
24              
25              
26             =head1 SYNOPSIS
27              
28             =cut
29              
30              
31             =head1 INHERITANCE
32              
33             eBay::API::XML::Call::GetAdFormatLeads inherits from the L class
34              
35             =cut
36              
37 1     1   32 use eBay::API::XML::BaseCall;
  0            
  0            
38             our @ISA = ("eBay::API::XML::BaseCall");
39              
40             use eBay::API::XML::Call::GetAdFormatLeads::GetAdFormatLeadsRequestType;
41             use eBay::API::XML::Call::GetAdFormatLeads::GetAdFormatLeadsResponseType;
42              
43              
44             =head1 Subroutines:
45              
46             =cut
47              
48             sub getApiCallName {
49             return 'GetAdFormatLeads';
50             }
51             sub getRequestDataTypeFullPackage {
52             return 'eBay::API::XML::Call::GetAdFormatLeads::GetAdFormatLeadsRequestType';
53             }
54             sub getResponseDataTypeFullPackage {
55             return 'eBay::API::XML::Call::GetAdFormatLeads::GetAdFormatLeadsResponseType';
56             }
57              
58             #
59             # input properties
60             #
61              
62             =head2 setEndCreationTime()
63              
64             Used with StartCreationTime to limit the returned leads for a user to only
65             those with a creation date less than or equal to the specified date and
66             time.
67              
68             RequiredInput: Conditionally
69             # Argument: 'xs:dateTime'
70              
71             =cut
72            
73             sub setEndCreationTime {
74             my $self = shift;
75             my $sEndCreationTime = shift;
76             $self->getRequestDataType()->setEndCreationTime($sEndCreationTime);
77             }
78              
79             =head2 setIncludeMemberMessages()
80              
81             Boolean which indicates whether to return mail messages for this lead in a MemberMessage node.
82              
83             RequiredInput: No
84             # Argument: 'xs:boolean'
85              
86             =cut
87            
88             sub setIncludeMemberMessages {
89             my $self = shift;
90             my $sIncludeMemberMessages = shift;
91             $self->getRequestDataType()->setIncludeMemberMessages($sIncludeMemberMessages);
92             }
93              
94             =head2 setItemID()
95              
96             The unique identifier of an item listed on the eBay site.
97             Returned by eBay when the item is created. This ID must correspond
98             to an ad format item.
99              
100             MaxLength: 19 (Note: The eBay database specifies 38. Currently, Item IDs are usually 9 to 12 digits)
101              
102             RequiredInput: No
103             # Argument: 'ns:ItemIDType'
104              
105             =cut
106            
107             sub setItemID {
108             my $self = shift;
109             my $pItemID = shift;
110             $self->getRequestDataType()->setItemID($pItemID);
111             }
112              
113             =head2 setStartCreationTime()
114              
115             Used with EndCreationTime to limit the returned leads for a user to only
116             those with a creation date greater than or equal to the specified date and
117             time.
118              
119             RequiredInput: Conditionally
120             # Argument: 'xs:dateTime'
121              
122             =cut
123            
124             sub setStartCreationTime {
125             my $self = shift;
126             my $sStartCreationTime = shift;
127             $self->getRequestDataType()->setStartCreationTime($sStartCreationTime);
128             }
129              
130             =head2 setStatus()
131              
132             Filters the leads based on their status.
133              
134             RequiredInput: No
135             # Argument: 'ns:MessageStatusTypeCodeType'
136              
137             =cut
138            
139             sub setStatus {
140             my $self = shift;
141             my $sStatus = shift;
142             $self->getRequestDataType()->setStatus($sStatus);
143             }
144              
145              
146              
147             #
148             # output properties
149             #
150              
151             =head2 getAdFormatLead()
152              
153             Contains contact and other information for one lead. One node is
154             returned for each lead. Only returned at a detail level of ReturnAll. At
155             least one lead must be available for the specified item to return
156             AdFormatLead.
157              
158             Returned: Conditionally
159             Details: DetailLevel: ReturnAll
160             # Returns: reference to an array
161             of 'ns:AdFormatLeadType'
162              
163             =cut
164            
165             sub getAdFormatLead {
166             my $self = shift;
167             return $self->getResponseDataType()->getAdFormatLead();
168             }
169              
170             =head2 getAdFormatLeadCount()
171              
172             The total number of leads returned. Only returned if you do not
173             specify a detail level.
174              
175             Returned: Conditionally
176             Details: DetailLevel: none
177             # Returns: 'xs:int'
178              
179             =cut
180            
181             sub getAdFormatLeadCount {
182             my $self = shift;
183             return $self->getResponseDataType()->getAdFormatLeadCount();
184             }
185              
186              
187              
188              
189              
190             1;