| eBay-API documentation | Contained in the eBay-API distribution. |
eBay::API::XML::DataType::StoreColorType
Store color set.
eBay::API::XML::DataType::StoreColorType inherits from the eBay::API::XML::BaseDataType class
Accent color for the Store. Specified in 6-digit Hex format. For example: F6F6C9
MaxLength: 6
Calls: SetStore RequiredInput: Conditionally
# Argument: 'xs:string'
Calls: GetStore Returned: Conditionally Calls: GetStoreOptions Returned: Always
# Returns: 'xs:string'
Primary color for the Store. Specified in 6-digit Hex format. For example: F6F6C9
MaxLength: 6
Calls: SetStore RequiredInput: Conditionally
# Argument: 'xs:string'
Calls: GetStore Returned: Conditionally Calls: GetStoreOptions Returned: Always
# Returns: 'xs:string'
Secondary color for the Store. Specified in 6-digit Hex format. For example: F6F6C9
MaxLength: 6
Calls: SetStore RequiredInput: Conditionally
# Argument: 'xs:string'
Calls: GetStore Returned: Conditionally Calls: GetStoreOptions Returned: Always
# Returns: 'xs:string'
| eBay-API documentation | Contained in the eBay-API distribution. |
#!/usr/bin/perl package eBay::API::XML::DataType::StoreColorType; use strict; use warnings; ########################################################################## # # Module: ............... <user defined location>eBay/API/XML # File: ................. StoreColorType.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 = ( [ 'Accent', 'xs:string', '', '', '' ] , [ 'Primary', 'xs:string', '', '', '' ] , [ 'Secondary', 'xs:string', '', '', '' ] ); 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 setAccent { my $self = shift; $self->{'Accent'} = shift }
sub getAccent { my $self = shift; return $self->{'Accent'}; }
sub setPrimary { my $self = shift; $self->{'Primary'} = shift }
sub getPrimary { my $self = shift; return $self->{'Primary'}; }
sub setSecondary { my $self = shift; $self->{'Secondary'} = shift }
sub getSecondary { my $self = shift; return $self->{'Secondary'}; } ## Attribute and Property lists sub getPropertiesList { my $self = shift; return \@gaProperties; } sub getAttributesList { my $self = shift; return \@gaAttributes; } 1;