File Coverage

lib/eBay/API/XML/DataType/ExpressEnabledDefinitionType.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::DataType::ExpressEnabledDefinitionType;
4              
5 1     1   1570 use strict;
  1         2  
  1         31  
6 1     1   5 use warnings;
  1         2  
  1         33  
7              
8             ##########################################################################
9             #
10             # Module: ............... eBay/API/XML
11             # File: ................. ExpressEnabledDefinitionType.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::DataType::ExpressEnabledDefinitionType
21              
22             =head1 DESCRIPTION
23              
24             For the US and Germany sites, an eBay item must meet a number of eligibility requirements
25             in order to also be included on eBay Express.
26             One requirement is that the category needs to support Express.
27             Currently, this type defines no special meta-data. (An empty element is returned.)
28              
29              
30              
31             =head1 SYNOPSIS
32              
33             =cut
34              
35              
36             =head1 INHERITANCE
37              
38             eBay::API::XML::DataType::ExpressEnabledDefinitionType inherits from the L class
39              
40             =cut
41              
42 1     1   42 use eBay::API::XML::BaseDataType;
  0            
  0            
43             our @ISA = ("eBay::API::XML::BaseDataType");
44              
45              
46              
47             my @gaProperties = (
48             );
49             push @gaProperties, @{eBay::API::XML::BaseDataType::getPropertiesList()};
50              
51             my @gaAttributes = (
52             );
53             push @gaAttributes, @{eBay::API::XML::BaseDataType::getAttributesList()};
54              
55             =head1 Subroutines:
56              
57             =cut
58              
59             sub new {
60             my $classname = shift;
61             my %args = @_;
62             my $self = $classname->SUPER::new(%args);
63             return $self;
64             }
65              
66             sub isScalar {
67             return 0;
68             }
69              
70              
71              
72              
73              
74              
75             ## Attribute and Property lists
76             sub getPropertiesList {
77             my $self = shift;
78             return \@gaProperties;
79             }
80              
81             sub getAttributesList {
82             my $self = shift;
83             return \@gaAttributes;
84             }
85              
86              
87              
88             1;