File Coverage

lib/eBay/API/XML/Call/GetAttributesCS/GetAttributesCSRequestType.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::GetAttributesCS::GetAttributesCSRequestType;
4              
5 1     1   1356 use strict;
  1         3  
  1         26  
6 1     1   5 use warnings;
  1         1  
  1         36  
7              
8             ##########################################################################
9             #
10             # Module: ............... eBay/API/XML
11             # File: ................. GetAttributesCSRequestType.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::GetAttributesCS::GetAttributesCSRequestType
21              
22             =head1 DESCRIPTION
23              
24             Retrieves an XML string that describes how to present Item
25             Specifics to a seller who is creating a new listing.
26             Use this information to present users with
27             the equivalent of the Item Specifics portion of the eBay Title
28             and Description pages and to validate selected eBay attributes on
29             the client before including them in an AddItem call or related
30             calls. The XML string contains a list of all the attributes that
31             are applicable for one or more requested categories, along with
32             related meta-data. The meta-data specifies all the possible
33             values of each attribute, the logic for presenting the attributes
34             to a user, and rules for validating the user's selections.
35            
36             See the eBay Web Services Guide for an overview of Item Specifics and
37             details about the eBay attribute model.
38            
39             Item Specifics are optional when listing in most categories;
40             however, some categories (such as Real Estate, US Tickets, and
41             US eBay Motors) require Item Specifics.
42              
43              
44              
45             =head1 SYNOPSIS
46              
47             =cut
48              
49              
50             =head1 INHERITANCE
51              
52             eBay::API::XML::Call::GetAttributesCS::GetAttributesCSRequestType inherits from the L class
53              
54             =cut
55              
56 1     1   34 use eBay::API::XML::RequestDataType;
  0            
  0            
57             our @ISA = ("eBay::API::XML::RequestDataType");
58              
59              
60              
61             my @gaProperties = ( [ 'AttributeSetID', 'xs:int', '1', '', '' ]
62             , [ 'AttributeSystemVersion', 'xs:string', '', '', '' ]
63             , [ 'IncludeCategoryMappingDetails', 'xs:boolean', '', '', '' ]
64             );
65             push @gaProperties, @{eBay::API::XML::RequestDataType::getPropertiesList()};
66              
67             my @gaAttributes = (
68             );
69             push @gaAttributes, @{eBay::API::XML::RequestDataType::getAttributesList()};
70              
71             =head1 Subroutines:
72              
73             =cut
74              
75             sub new {
76             my $classname = shift;
77             my %args = @_;
78             my $self = $classname->SUPER::new(%args);
79             return $self;
80             }
81              
82             sub isScalar {
83             return 0;
84             }
85              
86              
87              
88             =head2 setAttributeSetID()
89              
90             An array of characteristic setIDs (which always correspond to
91             attribute set IDs).
92             Each characteristic setcorresponds to a level in the eBay
93             category hierarchy at
94             which all items share common characteristics.
95             Multiple categories can be mapped to the same characteristic set.
96             AttributeSetIDs is an optional input. When IDs are specified,
97             the call only returns meta-data for the corresponding
98             characteristic sets.
99             When no IDs are specified, the call returns all the current
100             attribute meta-data in the system.
101              
102             RequiredInput: No
103             # Argument: reference to an array
104             of 'xs:int'
105              
106             =cut
107              
108             sub setAttributeSetID {
109             my $self = shift;
110             $self->{'AttributeSetID'} =
111             $self->convertArray_To_RefToArrayIfNeeded(@_);
112             }
113              
114             =head2 getAttributeSetID()
115              
116             # Returns: reference to an array
117             of 'xs:int'
118              
119             =cut
120              
121             sub getAttributeSetID {
122             my $self = shift;
123             return $self->_getDataTypeArray('AttributeSetID');
124             }
125              
126              
127             =head2 setAttributeSystemVersion()
128              
129             A version of the Item Specifics definitions (attribute meta-data)
130             for the site.
131             Typically, an application passes the version value that was
132             returned the last time the application executed this call.
133             Filter that causes the call to return only the characteristic sets
134             for which the attribute meta-data has changed since the specified
135             version. If not specified, all characteristics sets are returned.
136             The latest version value is not necessarily greater than the
137             previous value that was returned. Therefore, when comparing
138             versions, only compare whether the value has changed.
139              
140             RequiredInput: No
141             # Argument: 'xs:string'
142              
143             =cut
144              
145             sub setAttributeSystemVersion {
146             my $self = shift;
147             $self->{'AttributeSystemVersion'} = shift
148             }
149              
150             =head2 getAttributeSystemVersion()
151              
152             # Returns: 'xs:string'
153              
154             =cut
155              
156             sub getAttributeSystemVersion {
157             my $self = shift;
158             return $self->{'AttributeSystemVersion'};
159             }
160              
161              
162             =head2 setIncludeCategoryMappingDetails()
163              
164             If true, includes a list of CategoryMapping nodes in the response.
165             Each CategoryMapping node specifies category information as well as
166             attributes and values that your application can auto-fill for
167             items listed in that category. See the eBay Web Services Guide for more
168             information about options for maintaining category data and
169             auto-filling Item Specifics.
170              
171             RequiredInput: No
172             # Argument: 'xs:boolean'
173              
174             =cut
175              
176             sub setIncludeCategoryMappingDetails {
177             my $self = shift;
178             $self->{'IncludeCategoryMappingDetails'} = shift
179             }
180              
181             =head2 isIncludeCategoryMappingDetails()
182              
183             # Returns: 'xs:boolean'
184              
185             =cut
186              
187             sub isIncludeCategoryMappingDetails {
188             my $self = shift;
189             return $self->{'IncludeCategoryMappingDetails'};
190             }
191              
192              
193              
194              
195              
196             ## Attribute and Property lists
197             sub getPropertiesList {
198             my $self = shift;
199             return \@gaProperties;
200             }
201              
202             sub getAttributesList {
203             my $self = shift;
204             return \@gaAttributes;
205             }
206              
207              
208              
209             1;