File Coverage

lib/eBay/API/XML/DataType/eBayMotorsProCounterOfferEnabledDefinitionType.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::eBayMotorsProCounterOfferEnabledDefinitionType;
4              
5 1     1   1287 use strict;
  1         2  
  1         31  
6 1     1   6 use warnings;
  1         2  
  1         34  
7              
8             ##########################################################################
9             #
10             # Module: ............... eBay/API/XML
11             # File: ................. eBayMotorsProCounterOfferEnabledDefinitionType.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::eBayMotorsProCounterOfferEnabledDefinitionType
21              
22             =head1 DESCRIPTION
23              
24             Indicates whether counter offers are allowed on best offers for
25             this category.
26             Returned only if this category overrides the site default.
27             Added for EbayMotors Pro users.
28              
29              
30              
31             =head1 SYNOPSIS
32              
33             =cut
34              
35              
36             =head1 INHERITANCE
37              
38             eBay::API::XML::DataType::eBayMotorsProCounterOfferEnabledDefinitionType inherits from the L class
39              
40             =cut
41              
42 1     1   43 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;