File Coverage

lib/eBay/API/XML/Call/GetProductFinderXSL/GetProductFinderXSLRequestType.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::GetProductFinderXSL::GetProductFinderXSLRequestType;
4              
5 1     1   1371 use strict;
  1         2  
  1         24  
6 1     1   4 use warnings;
  1         1  
  1         26  
7              
8             ##########################################################################
9             #
10             # Module: ............... eBay/API/XML
11             # File: ................. GetProductFinderXSLRequestType.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::GetProductFinderXSL::GetProductFinderXSLRequestType
21              
22             =head1 DESCRIPTION
23              
24             Retrieves the Product Finder XSL stylesheet. Apply the stylesheet
25             to the XML returned from a call to GetProductFinder to render a
26             form that lets a user form a multi-attribute query against eBay
27             catalog data. See the Developer's Guide for an overview of Pre-
28             filled Item Information and information on searching for catalog
29             products.
30              
31              
32              
33             =head1 SYNOPSIS
34              
35             =cut
36              
37              
38             =head1 INHERITANCE
39              
40             eBay::API::XML::Call::GetProductFinderXSL::GetProductFinderXSLRequestType inherits from the L class
41              
42             =cut
43              
44 1     1   32 use eBay::API::XML::RequestDataType;
  0            
  0            
45             our @ISA = ("eBay::API::XML::RequestDataType");
46              
47              
48              
49             my @gaProperties = ( [ 'FileName', 'xs:string', '', '', '' ]
50             , [ 'FileVersion', 'xs:string', '', '', '' ]
51             );
52             push @gaProperties, @{eBay::API::XML::RequestDataType::getPropertiesList()};
53              
54             my @gaAttributes = (
55             );
56             push @gaAttributes, @{eBay::API::XML::RequestDataType::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 setFileName()
76              
77             The name of the XSL file to retrieve. If not specified, the call
78             returns the latest versions of all available XSL files.
79             Currently, this call only retrieves the product_finder.xsl file.
80             FileName is an optional input.
81              
82             RequiredInput: No
83             # Argument: 'xs:string'
84              
85             =cut
86              
87             sub setFileName {
88             my $self = shift;
89             $self->{'FileName'} = shift
90             }
91              
92             =head2 getFileName()
93              
94             # Returns: 'xs:string'
95              
96             =cut
97              
98             sub getFileName {
99             my $self = shift;
100             return $self->{'FileName'};
101             }
102              
103              
104             =head2 setFileVersion()
105              
106             The desired version of the XSL file. Required if FileName is specified.
107             If not specified, the call returns the latest versions of all
108             available XSL files that could be returned by the call.
109             (Currently, this call only retrieves the product_finder.xsl file.)
110             This is not a filter for retrieving changes to the XSL file.
111              
112             RequiredInput: No
113             # Argument: 'xs:string'
114              
115             =cut
116              
117             sub setFileVersion {
118             my $self = shift;
119             $self->{'FileVersion'} = shift
120             }
121              
122             =head2 getFileVersion()
123              
124             # Returns: 'xs:string'
125              
126             =cut
127              
128             sub getFileVersion {
129             my $self = shift;
130             return $self->{'FileVersion'};
131             }
132              
133              
134              
135              
136              
137             ## Attribute and Property lists
138             sub getPropertiesList {
139             my $self = shift;
140             return \@gaProperties;
141             }
142              
143             sub getAttributesList {
144             my $self = shift;
145             return \@gaAttributes;
146             }
147              
148              
149              
150             1;