| eBay-API documentation | Contained in the eBay-API distribution. |
eBay::API::XML::DataType::VeROSiteDetailType
Container for reason code details for a given site.
eBay::API::XML::DataType::VeROSiteDetailType inherits from the eBay::API::XML::BaseDataType class
Contains details for a given reason code.
# Argument: reference to an array of 'ns:ReasonCodeDetailType'
Calls: GetVeROReasonCodeDetails Returned: Always
# Returns: reference to an array of 'ns:ReasonCodeDetailType'
The site for which reason code details are returned.
# Argument: 'ns:SiteCodeType'
Calls: GetVeROReasonCodeDetails Returned: Always
# Returns: 'ns:SiteCodeType'
| eBay-API documentation | Contained in the eBay-API distribution. |
#!/usr/bin/perl package eBay::API::XML::DataType::VeROSiteDetailType; use strict; use warnings; ########################################################################## # # Module: ............... <user defined location>eBay/API/XML # File: ................. VeROSiteDetailType.pm # Generated by: ......... genEBayApiDataTypes.pl # Last Generated: ....... 08/24/2008 16:44 # API Release Number: ... 579 # ##########################################################################
use eBay::API::XML::BaseDataType; our @ISA = ("eBay::API::XML::BaseDataType"); use eBay::API::XML::DataType::ReasonCodeDetailType; use eBay::API::XML::DataType::Enum::SiteCodeType; my @gaProperties = ( [ 'ReasonCodeDetail', 'ns:ReasonCodeDetailType', '1' ,'eBay::API::XML::DataType::ReasonCodeDetailType', '1' ] , [ 'Site', 'ns:SiteCodeType', '' ,'eBay::API::XML::DataType::Enum::SiteCodeType', '' ] ); push @gaProperties, @{eBay::API::XML::BaseDataType::getPropertiesList()}; my @gaAttributes = ( ); push @gaAttributes, @{eBay::API::XML::BaseDataType::getAttributesList()};
sub new { my $classname = shift; my %args = @_; my $self = $classname->SUPER::new(%args); return $self; } sub isScalar { return 0; }
sub setReasonCodeDetail { my $self = shift; $self->{'ReasonCodeDetail'} = $self->convertArray_To_RefToArrayIfNeeded(@_); }
sub getReasonCodeDetail { my $self = shift; return $self->_getDataTypeArray('ReasonCodeDetail'); }
sub setSite { my $self = shift; $self->{'Site'} = shift }
sub getSite { my $self = shift; return $self->{'Site'}; } ## Attribute and Property lists sub getPropertiesList { my $self = shift; return \@gaProperties; } sub getAttributesList { my $self = shift; return \@gaAttributes; } 1;