File Coverage

lib/eBay/API/XML/Call/AddSecondChanceItem/AddSecondChanceItemRequestType.pm

Criterion	Covered	Total	%
statement	7	9	77.7
branch			n/a
condition			n/a
subroutine	3	3	100.0
pod			n/a
total	10	12	83.3

#!/usr/bin/perl

package eBay::API::XML::Call::AddSecondChanceItem::AddSecondChanceItemRequestType;

use strict;
use warnings;

##########################################################################
#
# Module: ............... eBay/API/XML
# File: ................. AddSecondChanceItemRequestType.pm
# Generated by: ......... genEBayApiDataTypes.pl
# Last Generated: ....... 08/24/2008 16:44
# API Release Number: ... 579
#
##########################################################################

=head1 NAME

eBay::API::XML::Call::AddSecondChanceItem::AddSecondChanceItemRequestType

=head1 DESCRIPTION

Creates a new Second Chance Offer (that is, an offer for an unsold item)
for one of that item's non-winning bidders.



=head1 SYNOPSIS

=cut


=head1 INHERITANCE

eBay::API::XML::Call::AddSecondChanceItem::AddSecondChanceItemRequestType inherits from the L class

=cut

use eBay::API::XML::RequestDataType;
our @ISA = ("eBay::API::XML::RequestDataType");

use eBay::API::XML::DataType::AmountType;
use eBay::API::XML::DataType::ItemIDType;
use eBay::API::XML::DataType::UserIDType;
use eBay::API::XML::DataType::Enum::SecondChanceOfferDurationCodeType;


my @gaProperties = ( [ 'BuyItNowPrice', 'ns:AmountType', ''
	     ,'eBay::API::XML::DataType::AmountType', '1' ]
	, [ 'Duration', 'ns:SecondChanceOfferDurationCodeType', ''
	     ,'eBay::API::XML::DataType::Enum::SecondChanceOfferDurationCodeType', '' ]
	, [ 'ItemID', 'ns:ItemIDType', ''
	     ,'eBay::API::XML::DataType::ItemIDType', '1' ]
	, [ 'RecipientBidderUserID', 'ns:UserIDType', ''
	     ,'eBay::API::XML::DataType::UserIDType', '1' ]
	, [ 'SellerMessage', 'xs:string', '', '', '' ]
                    );
push @gaProperties, @{eBay::API::XML::RequestDataType::getPropertiesList()};

my @gaAttributes = (
                    );
push @gaAttributes, @{eBay::API::XML::RequestDataType::getAttributesList()};

=head1 Subroutines:

=cut

sub new {
  my $classname = shift;
  my %args = @_;
  my $self = $classname->SUPER::new(%args);
  return $self;
}

sub isScalar {
   return 0;
}



=head2 setBuyItNowPrice()

The amount the offer recipient must pay to purchase the item
from the second chance offer listing. Use only when the original
item was listed in an eBay Motors vehicle category (or in some
categories on U.S. and international sites for
high-priced items, such as items in many U.S. and Canada
Business and Industrial categories) and it ended unsold
because the reserve price was not met. Otherwise, eBay
establishes the price and no price should be submitted.

  RequiredInput: No
#    Argument: 'ns:AmountType'

=cut

sub setBuyItNowPrice {
  my $self = shift;
  $self->{'BuyItNowPrice'} = shift
}

=head2 getBuyItNowPrice()

#    Returns: 'ns:AmountType'

=cut

sub getBuyItNowPrice {
  my $self = shift;
  return $self->_getDataTypeInstance( 'BuyItNowPrice'
		,'eBay::API::XML::DataType::AmountType');
}


=head2 setDuration()

Specifies the length of time the second chance offer listing will be
active. The recipient bidder has that much time to purchase the item or
the listing expires.

  RequiredInput: Yes
#    Argument: 'ns:SecondChanceOfferDurationCodeType'

=cut

sub setDuration {
  my $self = shift;
  $self->{'Duration'} = shift
}

=head2 getDuration()

#    Returns: 'ns:SecondChanceOfferDurationCodeType'

=cut

sub getDuration {
  my $self = shift;
  return $self->{'Duration'};
}


=head2 setItemID()

Specifies the item ID for the original, ended listing from which the
second chance offer item comes. A new ItemID is returned for the second
chance offer item.

MaxLength: 19 (Note: The eBay database specifies 38. Currently, Item IDs are usually 9 to 12 digits)

  RequiredInput: Yes
#    Argument: 'ns:ItemIDType'

=cut

sub setItemID {
  my $self = shift;
  $self->{'ItemID'} = shift
}

=head2 getItemID()

#    Returns: 'ns:ItemIDType'

=cut

sub getItemID {
  my $self = shift;
  return $self->_getDataTypeInstance( 'ItemID'
		,'eBay::API::XML::DataType::ItemIDType');
}


=head2 setRecipientBidderUserID()

Specifies the bidder from the original, ended listing to whom the seller
is extending the second chance offer. Specify only one
RecipientBidderUserID per call. If multiple users are specified (each in a
RecipientBidderUserID node), only the last one specified receives the
offer.

  RequiredInput: Yes
#    Argument: 'ns:UserIDType'

=cut

sub setRecipientBidderUserID {
  my $self = shift;
  $self->{'RecipientBidderUserID'} = shift
}

=head2 getRecipientBidderUserID()

#    Returns: 'ns:UserIDType'

=cut

sub getRecipientBidderUserID {
  my $self = shift;
  return $self->_getDataTypeInstance( 'RecipientBidderUserID'
		,'eBay::API::XML::DataType::UserIDType');
}


=head2 setSellerMessage()

Message content. Cannot contain HTML, asterisks, or quotes. This content
is included in the second chance offer email sent to the recipient, which
can be retrieved with GetMyMessages.

MaxLength: 1000

  RequiredInput: No
#    Argument: 'xs:string'

=cut

sub setSellerMessage {
  my $self = shift;
  $self->{'SellerMessage'} = shift
}

=head2 getSellerMessage()

#    Returns: 'xs:string'

=cut

sub getSellerMessage {
  my $self = shift;
  return $self->{'SellerMessage'};
}





##  Attribute and Property lists
sub getPropertiesList {
   my $self = shift;
   return \@gaProperties;
}

sub getAttributesList {
   my $self = shift;
   return \@gaAttributes;
}



1;