NAME
Business::OnlinePayment::PaymenTech - PaymenTech backend for Business::OnlinePayment
SYNPOSIS
my %options;
$options{'merchantid'} = '1234';
my $tx = new Business::OnlinePayment('PaymenTech', %options);
$tx->content(
username => 'username',
password => 'pass',
invoice_number => $orderid,
trace_number => $trace_num, # Optional
action => 'Authorization Only',
cvv2val => 123,
card_number => '1234123412341234',
exp_date => '0410',
address => '123 Test Street',
name => 'Test User',
amount => 100 # $1.00
);
$tx->submit();
if($tx->is_success()) {
print "Card processed successfully: ".$tx->authorization()."\n";
} else {
print "Card was rejected: ".$tx->error_message()."\n";
}
SUPPORTED ACTIONS
Authorization Only, Authorization and Capture, Capture, Credit
DESCRIPTION
Business::OnlinePayment::PaymenTech allows you to utilize PaymenTech's Orbital SDK credit card services. You will need to install the Perl Orbital SDK for this to work.
For detailed information see Business::OnlinePayment.
NOTES
There are a few rough edges to this module, but having it significantly eased a transition from one processor to another.
DEFAULTS
Some extra getters are provided. They are:
avs_response - Get the AVS response
cvv2_response - Get the CVV2 response
transaction_id - Get the PaymenTech assigned Transaction Id
AUTHOR
Cory 'G' Watson <gphat@cpan.org>
CONTRIBUTORS
Garth Sainio
SEE ALSO
perl(1), Business::OnlinePayment.
COPYRIGHT AND LICENSE
Copyright 2008 by Magazines.com, LLC
You can redistribute and/or modify this code under the same terms as Perl itself.