File Coverage

lib/eBay/API/XML/DataType/NotificationDetailsArrayType.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::NotificationDetailsArrayType;
4              
5 1     1   1338 use strict;
  1         3  
  1         31  
6 1     1   5 use warnings;
  1         1  
  1         32  
7              
8             ##########################################################################
9             #
10             # Module: ............... eBay/API/XML
11             # File: ................. NotificationDetailsArrayType.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::NotificationDetailsArrayType
21              
22             =head1 DESCRIPTION
23              
24             Returns information about notifications sent to the given application
25             for the given ItemID. It will only be returned if ItemID was specified in the
26             input parameters.
27              
28              
29              
30             =head1 SYNOPSIS
31              
32             =cut
33              
34              
35             =head1 INHERITANCE
36              
37             eBay::API::XML::DataType::NotificationDetailsArrayType inherits from the L class
38              
39             =cut
40              
41 1     1   38 use eBay::API::XML::BaseDataType;
  0            
  0            
42             our @ISA = ("eBay::API::XML::BaseDataType");
43              
44             use eBay::API::XML::DataType::NotificationDetailsType;
45              
46              
47             my @gaProperties = ( [ 'NotificationDetails', 'ns:NotificationDetailsType', '1'
48             ,'eBay::API::XML::DataType::NotificationDetailsType', '1' ]
49             );
50             push @gaProperties, @{eBay::API::XML::BaseDataType::getPropertiesList()};
51              
52             my @gaAttributes = (
53             );
54             push @gaAttributes, @{eBay::API::XML::BaseDataType::getAttributesList()};
55              
56             =head1 Subroutines:
57              
58             =cut
59              
60             sub new {
61             my $classname = shift;
62             my %args = @_;
63             my $self = $classname->SUPER::new(%args);
64             return $self;
65             }
66              
67             sub isScalar {
68             return 0;
69             }
70              
71              
72              
73             =head2 setNotificationDetails()
74              
75             List of notifications, if there are any, for the given ItemID and given
76             time period.
77              
78             # Argument: reference to an array
79             of 'ns:NotificationDetailsType'
80              
81             =cut
82              
83             sub setNotificationDetails {
84             my $self = shift;
85             $self->{'NotificationDetails'} =
86             $self->convertArray_To_RefToArrayIfNeeded(@_);
87             }
88              
89             =head2 getNotificationDetails()
90              
91             Calls: GetNotificationsUsage
92             Returned: Conditionally
93              
94             # Returns: reference to an array
95             of 'ns:NotificationDetailsType'
96              
97             =cut
98              
99             sub getNotificationDetails {
100             my $self = shift;
101             return $self->_getDataTypeArray('NotificationDetails');
102             }
103              
104              
105              
106              
107              
108             ## Attribute and Property lists
109             sub getPropertiesList {
110             my $self = shift;
111             return \@gaProperties;
112             }
113              
114             sub getAttributesList {
115             my $self = shift;
116             return \@gaAttributes;
117             }
118              
119              
120              
121             1;