File Coverage

lib/eBay/API/XML/DataType/NonSubscriptionDefinitionType.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::NonSubscriptionDefinitionType;
4              
5 1     1   1420 use strict;
  1         2  
  1         39  
6 1     1   5 use warnings;
  1         2  
  1         76  
7              
8             ##########################################################################
9             #
10             # Module: ............... eBay/API/XML
11             # File: ................. NonSubscriptionDefinitionType.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::NonSubscriptionDefinitionType
21              
22             =head1 DESCRIPTION
23              
24             This is for FSBO.
25             Each of the subscriptions will have following options, which will define
26             "National" vs "Local" ad format listing.
27             "LocalOptional" : This will allow national and local listing.
28             "LocalOnly" : Seller can have Local listings only.
29             "NationalOnly" : Seller can not opt into local only exposure. It has to be
30             national listing.
31              
32              
33              
34             =head1 SYNOPSIS
35              
36             =cut
37              
38              
39             =head1 INHERITANCE
40              
41             eBay::API::XML::DataType::NonSubscriptionDefinitionType inherits from the L class
42              
43             =cut
44              
45 1     1   49 use eBay::API::XML::BaseDataType;
  0            
  0            
46             our @ISA = ("eBay::API::XML::BaseDataType");
47              
48              
49              
50             my @gaProperties = (
51             );
52             push @gaProperties, @{eBay::API::XML::BaseDataType::getPropertiesList()};
53              
54             my @gaAttributes = (
55             );
56             push @gaAttributes, @{eBay::API::XML::BaseDataType::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              
76              
77              
78             ## Attribute and Property lists
79             sub getPropertiesList {
80             my $self = shift;
81             return \@gaProperties;
82             }
83              
84             sub getAttributesList {
85             my $self = shift;
86             return \@gaAttributes;
87             }
88              
89              
90              
91             1;