| eBay-API documentation | Contained in the eBay-API distribution. |
eBay::API::XML::DataType::ReasonCodeDetailType
A container for VeRO reason code details.
eBay::API::XML::DataType::ReasonCodeDetailType inherits from the eBay::API::XML::BaseDataType class
The short description of the infringement associated with the reason code ID.
# Argument: 'xs:string'
Calls: GetVeROReasonCodeDetails Returned: Always
# Returns: 'xs:string'
The long description of the infringement associated with the reason code ID.
# Argument: 'xs:string'
Calls: GetVeROReasonCodeDetails Returned: Always
# Returns: 'xs:string'
A unique identifier assigned to a reason code.
Max: Default: Min: # Argument: 'xs:long'
Calls: GetVeROReasonCodeDetails Returned: Always
# Returns: 'xs:long'
| eBay-API documentation | Contained in the eBay-API distribution. |
#!/usr/bin/perl package eBay::API::XML::DataType::ReasonCodeDetailType; use strict; use warnings; ########################################################################## # # Module: ............... <user defined location>eBay/API/XML # File: ................. ReasonCodeDetailType.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"); my @gaProperties = ( [ 'BriefText', 'xs:string', '', '', '' ] , [ 'DetailedText', 'xs:string', '', '', '' ] ); push @gaProperties, @{eBay::API::XML::BaseDataType::getPropertiesList()}; my @gaAttributes = ( [ 'codeID', 'xs:long', '', '', '' ] ); 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 setBriefText { my $self = shift; $self->{'BriefText'} = shift }
sub getBriefText { my $self = shift; return $self->{'BriefText'}; }
sub setDetailedText { my $self = shift; $self->{'DetailedText'} = shift }
sub getDetailedText { my $self = shift; return $self->{'DetailedText'}; }
sub setCodeID { my $self = shift; $self->{'codeID'} = shift }
sub getCodeID { my $self = shift; return $self->{'codeID'}; } ## Attribute and Property lists sub getPropertiesList { my $self = shift; return \@gaProperties; } sub getAttributesList { my $self = shift; return \@gaAttributes; } 1;