File Coverage

lib/eBay/API/XML/Call/VeROReportItems/VeROReportItemsRequestType.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::Call::VeROReportItems::VeROReportItemsRequestType;
4              
5 1     1   1008 use strict;
  1         2  
  1         24  
6 1     1   5 use warnings;
  1         2  
  1         25  
7              
8             ##########################################################################
9             #
10             # Module: ............... eBay/API/XML
11             # File: ................. VeROReportItemsRequestType.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::Call::VeROReportItems::VeROReportItemsRequestType
21              
22             =head1 DESCRIPTION
23              
24             Reports items that allegedly infringe your copyright, trademark, or other
25             intellectual property rights. You can report one or more items at a time with this
26             call. You must be a member of the Verified Rights Owner (VeRO) Program to use this
27             call.
28              
29              
30              
31             =head1 SYNOPSIS
32              
33             =cut
34              
35              
36             =head1 INHERITANCE
37              
38             eBay::API::XML::Call::VeROReportItems::VeROReportItemsRequestType inherits from the L class
39              
40             =cut
41              
42 1     1   32 use eBay::API::XML::RequestDataType;
  0            
  0            
43             our @ISA = ("eBay::API::XML::RequestDataType");
44              
45             use eBay::API::XML::DataType::UserIDType;
46             use eBay::API::XML::DataType::VeROReportItemsType;
47              
48              
49             my @gaProperties = ( [ 'ReportItems', 'ns:VeROReportItemsType', ''
50             ,'eBay::API::XML::DataType::VeROReportItemsType', '1' ]
51             , [ 'RightsOwnerID', 'ns:UserIDType', ''
52             ,'eBay::API::XML::DataType::UserIDType', '1' ]
53             );
54             push @gaProperties, @{eBay::API::XML::RequestDataType::getPropertiesList()};
55              
56             my @gaAttributes = (
57             );
58             push @gaAttributes, @{eBay::API::XML::RequestDataType::getAttributesList()};
59              
60             =head1 Subroutines:
61              
62             =cut
63              
64             sub new {
65             my $classname = shift;
66             my %args = @_;
67             my $self = $classname->SUPER::new(%args);
68             return $self;
69             }
70              
71             sub isScalar {
72             return 0;
73             }
74              
75              
76              
77             =head2 setReportItems()
78              
79             Container (packet) for items being reported. You can report the same item
80             more than once in a packet if a different reason code is used each time.
81              
82             RequiredInput: No
83             # Argument: 'ns:VeROReportItemsType'
84              
85             =cut
86              
87             sub setReportItems {
88             my $self = shift;
89             $self->{'ReportItems'} = shift
90             }
91              
92             =head2 getReportItems()
93              
94             # Returns: 'ns:VeROReportItemsType'
95              
96             =cut
97              
98             sub getReportItems {
99             my $self = shift;
100             return $self->_getDataTypeInstance( 'ReportItems'
101             ,'eBay::API::XML::DataType::VeROReportItemsType');
102             }
103              
104              
105             =head2 setRightsOwnerID()
106              
107             User ID of the VeRO member reporting the items.
108              
109             RequiredInput: Yes
110             # Argument: 'ns:UserIDType'
111              
112             =cut
113              
114             sub setRightsOwnerID {
115             my $self = shift;
116             $self->{'RightsOwnerID'} = shift
117             }
118              
119             =head2 getRightsOwnerID()
120              
121             # Returns: 'ns:UserIDType'
122              
123             =cut
124              
125             sub getRightsOwnerID {
126             my $self = shift;
127             return $self->_getDataTypeInstance( 'RightsOwnerID'
128             ,'eBay::API::XML::DataType::UserIDType');
129             }
130              
131              
132              
133              
134              
135             ## Attribute and Property lists
136             sub getPropertiesList {
137             my $self = shift;
138             return \@gaProperties;
139             }
140              
141             sub getAttributesList {
142             my $self = shift;
143             return \@gaAttributes;
144             }
145              
146              
147              
148             1;