The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Google::Checkout::Command::RefundOrder

SYNOPSIS

  use Google::Checkout::General::GCO;
  use Google::Checkout::Command::RefundOrder;
  use Google::Checkout::General::Util qw/is_gco_error/;

  my $gco = Google::Checkout::General::GCO->new;

  my $refund_order = Google::Checkout::Command::RefundOrder->new(
                     order_number => 156310171628413,
                     amount       => 5,
                     comment      => "Refund to user",
                     reason       => "User wants to refund");
  my $response = $gco->command($refund_order);
  die $response if is_gco_error($response);
  print $response,"\n\n";

DESCRIPTION

A sub-class of Google::Checkout::Command::GCOCommand. This module is used to refund an order.

new ORDER_NUMBER => ..., AMOUNT => ..., COMMENT => ..., REASON => ...

Constructor. Takes a Google order number, amount to refund, comment and reason for the refund. Please note that a refund might not be possible depends on what states the order is in.

get_amount

Returns the refund amount.

set_amount AMOUNT

Sets the refund amount.

get_comment

Returns the comment.

set_comment COMMENT

Sets the comment.

get_reason

Returns the reason for the refund.

set_reason REASON

Sets the reason for the refund.

to_xml

Return the XML that will be sent to Google Checkout. Note that this function should not be used directly. Instead, it's called indirectly by the Google::Checkout::General::GCO object internally.

COPYRIGHT

Copyright 2006 Google. All rights reserved.

SEE ALSO

Google::Checkout::Command::GCOCommand