File Coverage

lib/eBay/API/XML/DataType/ScheduleType.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::ScheduleType;
4              
5 1     1   1032 use strict;
  1         2  
  1         31  
6 1     1   5 use warnings;
  1         2  
  1         32  
7              
8             ##########################################################################
9             #
10             # Module: ............... eBay/API/XML
11             # File: ................. ScheduleType.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::ScheduleType
21              
22             =head1 DESCRIPTION
23              
24             Sellers create live auction catalogs and schedule their live auction events by using
25             the eBay Live Auctions Web site user interface. The seller can create a catalog in
26             the Live Auctions system several months before a sale.
27              
28              
29              
30             =head1 SYNOPSIS
31              
32             =cut
33              
34              
35             =head1 INHERITANCE
36              
37             eBay::API::XML::DataType::ScheduleType inherits from the L class
38              
39             =cut
40              
41 1     1   40 use eBay::API::XML::BaseDataType;
  0            
  0            
42             our @ISA = ("eBay::API::XML::BaseDataType");
43              
44              
45              
46             my @gaProperties = ( [ 'ScheduleID', 'xs:int', '', '', '' ]
47             , [ 'ScheduleTime', 'xs:dateTime', '', '', '' ]
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             =head2 setScheduleID()
73              
74             Identifier for an event schedule in the seller's Live Auctions catalog.
75              
76             # Argument: 'xs:int'
77              
78             =cut
79              
80             sub setScheduleID {
81             my $self = shift;
82             $self->{'ScheduleID'} = shift
83             }
84              
85             =head2 getScheduleID()
86              
87             Calls: GetLiveAuctionCatalogDetails
88             Returned: Conditionally
89              
90             # Returns: 'xs:int'
91              
92             =cut
93              
94             sub getScheduleID {
95             my $self = shift;
96             return $self->{'ScheduleID'};
97             }
98              
99              
100             =head2 setScheduleTime()
101              
102             Date and time that the sale schedule starts.
103              
104             # Argument: 'xs:dateTime'
105              
106             =cut
107              
108             sub setScheduleTime {
109             my $self = shift;
110             $self->{'ScheduleTime'} = shift
111             }
112              
113             =head2 getScheduleTime()
114              
115             Calls: GetLiveAuctionCatalogDetails
116             Returned: Conditionally
117              
118             # Returns: 'xs:dateTime'
119              
120             =cut
121              
122             sub getScheduleTime {
123             my $self = shift;
124             return $self->{'ScheduleTime'};
125             }
126              
127              
128              
129              
130              
131             ## Attribute and Property lists
132             sub getPropertiesList {
133             my $self = shift;
134             return \@gaProperties;
135             }
136              
137             sub getAttributesList {
138             my $self = shift;
139             return \@gaAttributes;
140             }
141              
142              
143              
144             1;