File Coverage

lib/eBay/API/XML/DataType/SchedulingInfoType.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::SchedulingInfoType;
4              
5 1     1   1040 use strict;
  1         2  
  1         26  
6 1     1   4 use warnings;
  1         3  
  1         27  
7              
8             ##########################################################################
9             #
10             # Module: ............... eBay/API/XML
11             # File: ................. SchedulingInfoType.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::SchedulingInfoType
21              
22             =head1 DESCRIPTION
23              
24             Contains information for scheduling limits for the user.
25              
26              
27              
28             =head1 SYNOPSIS
29              
30             =cut
31              
32              
33             =head1 INHERITANCE
34              
35             eBay::API::XML::DataType::SchedulingInfoType inherits from the L class
36              
37             =cut
38              
39 1     1   35 use eBay::API::XML::BaseDataType;
  0            
  0            
40             our @ISA = ("eBay::API::XML::BaseDataType");
41              
42              
43              
44             my @gaProperties = ( [ 'MaxScheduledItems', 'xs:int', '', '', '' ]
45             , [ 'MaxScheduledMinutes', 'xs:int', '', '', '' ]
46             , [ 'MinScheduledMinutes', 'xs:int', '', '', '' ]
47             );
48             push @gaProperties, @{eBay::API::XML::BaseDataType::getPropertiesList()};
49              
50             my @gaAttributes = (
51             );
52             push @gaAttributes, @{eBay::API::XML::BaseDataType::getAttributesList()};
53              
54             =head1 Subroutines:
55              
56             =cut
57              
58             sub new {
59             my $classname = shift;
60             my %args = @_;
61             my $self = $classname->SUPER::new(%args);
62             return $self;
63             }
64              
65             sub isScalar {
66             return 0;
67             }
68              
69              
70              
71             =head2 setMaxScheduledItems()
72              
73             Maximum number of Items that a user may schedule.
74              
75             # Argument: 'xs:int'
76              
77             =cut
78              
79             sub setMaxScheduledItems {
80             my $self = shift;
81             $self->{'MaxScheduledItems'} = shift
82             }
83              
84             =head2 getMaxScheduledItems()
85              
86             Calls: GetUser
87             Returned: Conditionally
88             Details: DetailLevel: none, ReturnAll
89              
90             # Returns: 'xs:int'
91              
92             =cut
93              
94             sub getMaxScheduledItems {
95             my $self = shift;
96             return $self->{'MaxScheduledItems'};
97             }
98              
99              
100             =head2 setMaxScheduledMinutes()
101              
102             Maximum number of minutes that a listing may be scheduled in advance of its going live.
103              
104             # Argument: 'xs:int'
105              
106             =cut
107              
108             sub setMaxScheduledMinutes {
109             my $self = shift;
110             $self->{'MaxScheduledMinutes'} = shift
111             }
112              
113             =head2 getMaxScheduledMinutes()
114              
115             Calls: GetUser
116             Returned: Conditionally
117             Details: DetailLevel: none, ReturnAll
118              
119             # Returns: 'xs:int'
120              
121             =cut
122              
123             sub getMaxScheduledMinutes {
124             my $self = shift;
125             return $self->{'MaxScheduledMinutes'};
126             }
127              
128              
129             =head2 setMinScheduledMinutes()
130              
131             Minimum number of minutes that a listing may be scheduled in advance of its going live.
132              
133             # Argument: 'xs:int'
134              
135             =cut
136              
137             sub setMinScheduledMinutes {
138             my $self = shift;
139             $self->{'MinScheduledMinutes'} = shift
140             }
141              
142             =head2 getMinScheduledMinutes()
143              
144             Calls: GetUser
145             Returned: Conditionally
146             Details: DetailLevel: none, ReturnAll
147              
148             # Returns: 'xs:int'
149              
150             =cut
151              
152             sub getMinScheduledMinutes {
153             my $self = shift;
154             return $self->{'MinScheduledMinutes'};
155             }
156              
157              
158              
159              
160              
161             ## Attribute and Property lists
162             sub getPropertiesList {
163             my $self = shift;
164             return \@gaProperties;
165             }
166              
167             sub getAttributesList {
168             my $self = shift;
169             return \@gaAttributes;
170             }
171              
172              
173              
174             1;