| eBay-API documentation | Contained in the eBay-API distribution. |
eBay::API::XML::DataType::AdditionalAccountType
Contains the data for one additional account. An additional account is created when the user has an active account and changes country of registry (i.e., registers with the eBay site for the new country). A new account is created and the old account becomes inactive as an additional account. A user who never changes country of residency while having an account will never have any additional accounts.
eBay::API::XML::DataType::AdditionalAccountType inherits from the eBay::API::XML::BaseDataType class
Indicates the unique identifier for the additional account (the account ID).
# Argument: 'xs:string'
Calls: GetAccount Returned: Conditionally
# Returns: 'xs:string'
Indicates the current balance of the additional account.
# Argument: 'ns:AmountType'
Calls: GetAccount Returned: Conditionally
# Returns: 'ns:AmountType'
Indicates the currency in which monetary amounts for the additional account are expressed.
# Argument: 'ns:CurrencyCodeType'
Calls: GetAccount Returned: Conditionally
# Returns: 'ns:CurrencyCodeType'
| eBay-API documentation | Contained in the eBay-API distribution. |
#!/usr/bin/perl package eBay::API::XML::DataType::AdditionalAccountType; use strict; use warnings; ########################################################################## # # Module: ............... <user defined location>eBay/API/XML # File: ................. AdditionalAccountType.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::AmountType; use eBay::API::XML::DataType::Enum::CurrencyCodeType; my @gaProperties = ( [ 'AccountCode', 'xs:string', '', '', '' ] , [ 'Balance', 'ns:AmountType', '' ,'eBay::API::XML::DataType::AmountType', '1' ] , [ 'Currency', 'ns:CurrencyCodeType', '' ,'eBay::API::XML::DataType::Enum::CurrencyCodeType', '' ] ); 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 setAccountCode { my $self = shift; $self->{'AccountCode'} = shift }
sub getAccountCode { my $self = shift; return $self->{'AccountCode'}; }
sub setBalance { my $self = shift; $self->{'Balance'} = shift }
sub getBalance { my $self = shift; return $self->_getDataTypeInstance( 'Balance' ,'eBay::API::XML::DataType::AmountType'); }
sub setCurrency { my $self = shift; $self->{'Currency'} = shift }
sub getCurrency { my $self = shift; return $self->{'Currency'}; } ## Attribute and Property lists sub getPropertiesList { my $self = shift; return \@gaProperties; } sub getAttributesList { my $self = shift; return \@gaAttributes; } 1;