File Coverage

lib/eBay/API/XML/Call/ReviseMyMessages.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::ReviseMyMessages;
4              
5 1     1   2427 use strict;
  1         2  
  1         25  
6 1     1   4 use warnings;
  1         2  
  1         26  
7              
8             ##########################################################################
9             #
10             # Module: ............... eBay/API/XML
11             # File: ................. ReviseMyMessages.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::ReviseMyMessages
21              
22             =head1 DESCRIPTION
23              
24              
25              
26             =head1 SYNOPSIS
27              
28             =cut
29              
30              
31             =head1 INHERITANCE
32              
33             eBay::API::XML::Call::ReviseMyMessages 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::ReviseMyMessages::ReviseMyMessagesRequestType;
41             use eBay::API::XML::Call::ReviseMyMessages::ReviseMyMessagesResponseType;
42              
43              
44             =head1 Subroutines:
45              
46             =cut
47              
48             sub getApiCallName {
49             return 'ReviseMyMessages';
50             }
51             sub getRequestDataTypeFullPackage {
52             return 'eBay::API::XML::Call::ReviseMyMessages::ReviseMyMessagesRequestType';
53             }
54             sub getResponseDataTypeFullPackage {
55             return 'eBay::API::XML::Call::ReviseMyMessages::ReviseMyMessagesResponseType';
56             }
57              
58             #
59             # input properties
60             #
61              
62             =head2 setAlertIDs()
63              
64             Contains a list of up to 10 AlertID values.
65            

66             Either AlertIDs, MessageIDs, or both must be included in
67             the request. Alerts cannot be flagged. Alerts cannot be
68             moved into a new folder until they have been resolved.
69            

70             Resolve alerts by marking Read (if no action is
71             required), or by using ActionURL (if action is
72             required).
73              
74             RequiredInput: Conditionally
75             # Argument: 'ns:MyMessagesAlertIDArrayType'
76              
77             =cut
78            
79             sub setAlertIDs {
80             my $self = shift;
81             my $pAlertIDs = shift;
82             $self->getRequestDataType()->setAlertIDs($pAlertIDs);
83             }
84              
85             =head2 setFlagged()
86              
87             Changes the flagged states of all messages specified in
88             a request by their MessageID values. At least one of
89             Read, Flagged, or FolderID must be specified in the
90             request. Messages in the Sent box cannot be moved,
91             marked as Read, or Flagged. Alerts cannot be flagged.
92              
93             RequiredInput: Conditionally
94             # Argument: 'xs:boolean'
95              
96             =cut
97            
98             sub setFlagged {
99             my $self = shift;
100             my $sFlagged = shift;
101             $self->getRequestDataType()->setFlagged($sFlagged);
102             }
103              
104             =head2 setFolderID()
105              
106             An ID that uniquely identifies the My Messages folder to
107             move alerts and messages into. At least one of Read,
108             Flagged, or FolderID must be specified in the request.
109            

110             Alerts cannot be moved until they are resolved. Messages
111             in the Sent box cannot be moved, marked as Read, or
112             Flagged.
113              
114             RequiredInput: Conditionally
115             # Argument: 'xs:long'
116              
117             =cut
118            
119             sub setFolderID {
120             my $self = shift;
121             my $sFolderID = shift;
122             $self->getRequestDataType()->setFolderID($sFolderID);
123             }
124              
125             =head2 setMessageIDs()
126              
127             Contains a list of up to 10 MessageID values.
128            

129             Either AlertIDs, MessageIDs, or both must be included in
130             the request. Messages in the Sent box cannot be moved,
131             marked as Read, or Flagged.
132              
133             RequiredInput: Conditionally
134             # Argument: 'ns:MyMessagesMessageIDArrayType'
135              
136             =cut
137            
138             sub setMessageIDs {
139             my $self = shift;
140             my $pMessageIDs = shift;
141             $self->getRequestDataType()->setMessageIDs($pMessageIDs);
142             }
143              
144             =head2 setRead()
145              
146             Changes the read states of all alerts and
147             messages specified in a request by their AlertID
148             or MessageID values. At least one of Read,
149             Flagged, or FolderID must be specified in the
150             request. Messages in the Sent box cannot be moved,
151             marked as Read, or Flagged.
152            

153             Note that alerts and messages retrieved
154             with the API are not automatically marked Read,
155             and must be marked Read with this call.
156              
157             RequiredInput: Conditionally
158             # Argument: 'xs:boolean'
159              
160             =cut
161            
162             sub setRead {
163             my $self = shift;
164             my $sRead = shift;
165             $self->getRequestDataType()->setRead($sRead);
166             }
167              
168              
169              
170             #
171             # output properties
172             #
173              
174              
175              
176              
177              
178             1;