TKEEFER / eBay-API-0.25 / lib / eBay / API / XML / Call / GetExpressWishList / GetExpressWishListResponseType.pm 

            

              
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
—
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
—
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
—
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
—
73
74
75
76
77
78
79
80
81
82
83
84
85
86
—
87
88
89
90
91
92
93
94
95
96
97
98
99
100
—
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
—
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147

              
#!/usr/bin/perl
package eBay::API::XML::Call::GetExpressWishList::GetExpressWishListResponseType;
use strict;
use warnings;  
##########################################################################
#
# Module: ............... <user defined location>eBay/API/XML
# File: ................. GetExpressWishListResponseType.pm
# Generated by: ......... genEBayApiDataTypes.pl
# Last Generated: ....... 07/07/2008 17:42
# API Release Number: ... 571
#
##########################################################################  
=head1 NAME
eBay::API::XML::Call::GetExpressWishList::GetExpressWishListResponseType
=head1 DESCRIPTION
Returns a list of eBay Express wish lists for one or more users.
=head1 SYNOPSIS
=cut
=head1 INHERITANCE
eBay::API::XML::Call::GetExpressWishList::GetExpressWishListResponseType inherits from the L<eBay::API::XML::ResponseDataType> class
=cut
use eBay::API::XML::ResponseDataType;
our @ISA = ("eBay::API::XML::ResponseDataType");
use eBay::API::XML::DataType::PaginationResultType;
use eBay::API::XML::DataType::WishListType;
my @gaProperties = ( [ 'Pagination', 'ns:PaginationResultType', ''
             ,'eBay::API::XML::DataType::PaginationResultType', '1' ]
        , [ 'WishList', 'ns:WishListType', '1'
             ,'eBay::API::XML::DataType::WishListType', '1' ]
                    );
push @gaProperties, @{eBay::API::XML::ResponseDataType::getPropertiesList()};
my @gaAttributes = ( 
                    );
push @gaAttributes, @{eBay::API::XML::ResponseDataType::getAttributesList()};
=head1 Subroutines:
=cut
sub new {
  my $classname = shift;
  my %args = @_;
  my $self = $classname->SUPER::new(%args);
  return $self;
}
sub isScalar {
   return 0; 
}
=head2 setPagination()
Child elements control the display pagination of the items and products in retrieved
wish lists.
#    Argument: 'ns:PaginationResultType'
=cut
sub setPagination {
  my $self = shift;
  $self->{'Pagination'} = shift
}
=head2 getPagination()
  Returned: Always
#    Returns: 'ns:PaginationResultType'
=cut
sub getPagination {
  my $self = shift;
  return $self->_getDataTypeInstance( 'Pagination'
                ,'eBay::API::XML::DataType::PaginationResultType');
}
=head2 setWishList()
Contains the contents and description of the requested wish list.
#    Argument: reference to an array  
                      of 'ns:WishListType'
=cut
sub setWishList {
  my $self = shift;
  $self->{'WishList'} = 
                $self->convertArray_To_RefToArrayIfNeeded(@_);
}
=head2 getWishList()
  Returned: Always
#    Returns: reference to an array  
                      of 'ns:WishListType'
=cut
sub getWishList {
  my $self = shift;
  return $self->_getDataTypeArray('WishList');
}
##  Attribute and Property lists
sub getPropertiesList {
   my $self = shift;
   return \@gaProperties;
}
sub getAttributesList {
   my $self = shift;
   return \@gaAttributes;
}
1;