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,
  action          => 'Authorization Only',
  cvv2val         => 123,
  card_number     => '1234123412341234',
  exp_date        => '04/10',
  address         => '123 Test Street',
  name            => 'Test User',
  amount          => 100
);
$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

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.

* time zone is hardcoded to 706 (Central)
* BIN is hardcoded 001

These shortcomings will be fixed in subsequent releases.

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.

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>

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.