
Business::OnlinePayment::PaymenTech - PaymenTech backend for Business::OnlinePayment

my %options;
$options{'merchantid'} = '1234';
my $tx = Business::OnlinePayment->new('PaymenTech', %options);
$tx->content(
username => 'username',
password => 'pass',
invoice_number => $orderid,
trace_number => $trace_num, # Optional
action => 'Authorization Only',
cvn => 123, # cvv2, cvc2, cid
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";
}

Authorization Only, Authorization and Capture, Capture, Credit
By default, Business::Online::PaymenTech uses the MOTO API calls in the PaymenTech library. If you specifically set the ecommerce option to a true value in your content then the CC API will be used where applicable, notably Authorization, Authorization and Capture and Refund. (Actually, refund uses ECOMMERCE_REFUND when ecommerce is true).

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.

There are a few rough edges to this module, but having it significantly eased a transition from one processor to another.
Some extra getters are provided. They are:
response - Get the response code avs_response - Get the AVS response cvv2_response - Get the CVV2 response transaction_id - Get the PaymenTech assigned Transaction Id

Cory 'G' Watson <gphat@cpan.org>
Garth Sainio <gsainio@cpan.org>

perl(1), Business::OnlinePayment.

Copyright 2008 by Magazines.com, LLC
You can redistribute and/or modify this code under the same terms as Perl itself.