#!/usr/bin/perl package eBay::API::XML::Call::AddMemberMessageRTQ::AddMemberMessageRTQResponseType; use strict; use warnings; ########################################################################## # # Module: ............... eBay/API/XML # File: ................. AddMemberMessageRTQResponseType.pm # Generated by: ......... genEBayApiDataTypes.pl # Last Generated: ....... 08/24/2008 16:44 # API Release Number: ... 579 # ########################################################################## =head1 NAME eBay::API::XML::Call::AddMemberMessageRTQ::AddMemberMessageRTQResponseType =head1 DESCRIPTION Response to AddMemberMessageRTQ request. =head1 SYNOPSIS =cut =head1 INHERITANCE eBay::API::XML::Call::AddMemberMessageRTQ::AddMemberMessageRTQResponseType inherits from the L class =cut use eBay::API::XML::ResponseDataType; our @ISA = ("eBay::API::XML::ResponseDataType"); my @gaProperties = ( ); push @gaProperties, @{eBay::API::XML::ResponseDataType::getPropertiesList()}; my @gaAttributes = ( ); push @gaAttributes, @{eBay::API::XML::ResponseDataType::getAttributesList()}; =head1 Subroutines: =cut sub new { my $classname = shift; my %args = @_; my $self = $classname->SUPER::new(%args); return $self; } sub isScalar { return 0; } ## Attribute and Property lists sub getPropertiesList { my $self = shift; return \@gaProperties; } sub getAttributesList { my $self = shift; return \@gaAttributes; } 1;