Paypal reauthorizationrequest api
use Business::PayPal::API::ReauthorizationRequest;
## see Business::PayPal::API documentation for parameters
my $pp = new Business::PayPal::API::ReauthorizationRequest ( ... );
my %response = $pp->DoReauthorizationRequest (
AuthorizationID => $transid,
Amount => $amount,
CurrencyID => $currencyID
);
Business::PayPal::API::ReauthorizationRequest implements PayPal's DoReauthorizationRequest \s-1API\s0 using SOAP::Lite to make direct \s-1API\s0 calls to PayPal's \s-1SOAP\s0 \s-1API\s0 server. It also implements support for testing via PayPal's sandbox. Please see Business::PayPal::API for details on using the PayPal sandbox.
Implements PayPal's DoReauthorizationRequest \s-1API\s0 call. Supported parameters include:
AuthorizationID Amount currencyID (defaults to 'USD' if not supplied)
as described in the PayPal \*(L"Web Services \s-1API\s0 Reference\*(R" document. The default currencyID setting is '\s-1USD\s0' if not otherwise specified. The DoReauthorization is not allowed before the three day grace period set for the original AuthorizeRequest.
Returns a hash containing the results of the transaction.
Example:
my %resp = $pp->DoReauthorizationRequest ( AuthorizationID => $trans_id, Amount => '15.00', CurrencyID => 'USD' );
unless( $resp{Ack} !~ /Success/ ) { for my $error ( @{$response{Errors}} ) { warn "Error: " . $error->{LongMessage} . "\n"; } }
See the \s-1ERROR\s0 \s-1HANDLING\s0 section of Business::PayPal::API for information on handling errors.
None by default.
<https://developer.paypal.com/en_US/pdf/PP_APIReference.pdf>
Danny Hembree <[email protected]>
Copyright (C) 2006 by Danny Hembree
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.5 or, at your option, any later version of Perl 5 you may have available.