| eBay-API documentation | Contained in the eBay-API distribution. |
eBay::API::XML::DataType::PictureManagerSubscriptionType
Describes one type of Picture Manager subscription that is available.
eBay::API::XML::DataType::PictureManagerSubscriptionType inherits from the eBay::API::XML::BaseDataType class
The monthly fee for the subscription. Read-only value.
# Argument: 'ns:AmountType'
Calls: GetPictureManagerOptions Returned: Always
# Returns: 'ns:AmountType'
The total amount of storage space available for the subscription type. Read-only value.
# Argument: 'xs:int'
Calls: GetPictureManagerOptions Returned: Always
# Returns: 'xs:int'
The level of Picture Manager subscription. Each level has a monthly fee and provides a certain amount of storage space.
# Argument: 'ns:PictureManagerSubscriptionLevelCodeType'
Calls: GetPictureManagerOptions Returned: Always
# Returns: 'ns:PictureManagerSubscriptionLevelCodeType'
| eBay-API documentation | Contained in the eBay-API distribution. |
#!/usr/bin/perl package eBay::API::XML::DataType::PictureManagerSubscriptionType; use strict; use warnings; ########################################################################## # # Module: ............... <user defined location>eBay/API/XML # File: ................. PictureManagerSubscriptionType.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::PictureManagerSubscriptionLevelCodeType; my @gaProperties = ( [ 'Fee', 'ns:AmountType', '' ,'eBay::API::XML::DataType::AmountType', '1' ] , [ 'StorageSize', 'xs:int', '', '', '' ] , [ 'SubscriptionLevel', 'ns:PictureManagerSubscriptionLevelCodeType', '' ,'eBay::API::XML::DataType::Enum::PictureManagerSubscriptionLevelCodeType', '' ] ); 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 setFee { my $self = shift; $self->{'Fee'} = shift }
sub getFee { my $self = shift; return $self->_getDataTypeInstance( 'Fee' ,'eBay::API::XML::DataType::AmountType'); }
sub setStorageSize { my $self = shift; $self->{'StorageSize'} = shift }
sub getStorageSize { my $self = shift; return $self->{'StorageSize'}; }
sub setSubscriptionLevel { my $self = shift; $self->{'SubscriptionLevel'} = shift }
sub getSubscriptionLevel { my $self = shift; return $self->{'SubscriptionLevel'}; } ## Attribute and Property lists sub getPropertiesList { my $self = shift; return \@gaProperties; } sub getAttributesList { my $self = shift; return \@gaAttributes; } 1;