| eBay-API documentation | Contained in the eBay-API distribution. |
eBay::API::XML::Call::SetPromotionalSale::SetPromotionalSaleResponseType
Contains the ID and status of a promotional sale. The Promotional Price Display feature enables sellers to apply discounts and/or free shipping across many listings.
eBay::API::XML::Call::SetPromotionalSale::SetPromotionalSaleResponseType inherits from the eBay::API::XML::ResponseDataType class
Contains the ID of a promotional sale.
# Argument: 'xs:long'
Returned: Always # Returns: 'xs:long'
Contains the status of a promotional sale.
# Argument: 'ns:PromotionalSaleStatusCodeType'
Returned: Always # Returns: 'ns:PromotionalSaleStatusCodeType'
| eBay-API documentation | Contained in the eBay-API distribution. |
#!/usr/bin/perl package eBay::API::XML::Call::SetPromotionalSale::SetPromotionalSaleResponseType; use strict; use warnings; ########################################################################## # # Module: ............... <user defined location>eBay/API/XML # File: ................. SetPromotionalSaleResponseType.pm # Generated by: ......... genEBayApiDataTypes.pl # Last Generated: ....... 08/24/2008 16:44 # API Release Number: ... 579 # ##########################################################################
use eBay::API::XML::ResponseDataType; our @ISA = ("eBay::API::XML::ResponseDataType"); use eBay::API::XML::DataType::Enum::PromotionalSaleStatusCodeType; my @gaProperties = ( [ 'PromotionalSaleID', 'xs:long', '', '', '' ] , [ 'Status', 'ns:PromotionalSaleStatusCodeType', '' ,'eBay::API::XML::DataType::Enum::PromotionalSaleStatusCodeType', '' ] ); push @gaProperties, @{eBay::API::XML::ResponseDataType::getPropertiesList()}; my @gaAttributes = ( ); push @gaAttributes, @{eBay::API::XML::ResponseDataType::getAttributesList()};
sub new { my $classname = shift; my %args = @_; my $self = $classname->SUPER::new(%args); return $self; } sub isScalar { return 0; }
sub setPromotionalSaleID { my $self = shift; $self->{'PromotionalSaleID'} = shift }
sub getPromotionalSaleID { my $self = shift; return $self->{'PromotionalSaleID'}; }
sub setStatus { my $self = shift; $self->{'Status'} = shift }
sub getStatus { my $self = shift; return $self->{'Status'}; } ## Attribute and Property lists sub getPropertiesList { my $self = shift; return \@gaProperties; } sub getAttributesList { my $self = shift; return \@gaAttributes; } 1;