/ 
Business-OnlinePayment-vSecureProcessing-0.01
River stage zero No dependents
/ Business::OnlinePayment::vSecureProcessing

NAME

Business::OnlinePayment::vSecureProcessing - vSecureProcessing backend for Business::OnlinePayment

SYNOPSIS

use Business::OnlinePayment;
my %processor_info = (
  platform    => '####',
  gid         => 12345678901234567890,
  tid         => 01,
  user_id     => '####',
  url         => 'www.####.com'
);
my $tx =
  new Business::OnlinePayment( "vSecureProcessing", %processor_info);
$tx->content(
    appid          => '######',
    type           => 'VISA',
    action         => 'Normal Authorization',
    description    => 'Business::OnlinePayment test',
    amount         => '49.95',
    customer_id    => 'tfb',
    name           => 'Tofu Beast',
    address        => '123 Anystreet',
    city           => 'Anywhere',
    state          => 'UT',
    zip            => '84058',
    card_number    => '4007000000027',
    expiration     => '09/02',
    cvv2           => '1234', #optional
);
$tx->submit();

if($tx->is_success()) {
    print "Card processed successfully: ".$tx->authorization."\n";
} else {
    print "Card was rejected: ".$tx->error_message."\n";
}

DESCRIPTION

For detailed information see Business::OnlinePayment.

METHODS AND FUNCTIONS

See Business::OnlinePayment for the complete list. The following methods either override the methods in Business::OnlinePayment or provide additional functions.

result_code

Returns the response error code.

error_message

Returns the response error description text.

server_response

Returns the complete response from the server.

Handling of content(%content) data:

action

The following actions are valid

normal authorization
credit
void

Setting vSecureProcessing parameters from content(%content)

The following rules are applied to map data to vSecureProcessing parameters from content(%content):

# param => $content{<key>}
AccountNumber       => 'card_number',
Cvv                 => 'cvv2',
ExpirationMonth     => \( $month ), # MM from MM/YY of 'expiration'
ExpirationYear      => \( $year ), # YY from MM/YY of 'expiration'
Trk1                => 'track1',
Trk2                => 'track2',
CardHolderFirstName => 'first_name',
CardHolderLastName  => 'last_name',
Amount              => 'amount'
AvsStreet           => 'address',
AvsZip              => 'zip',
Cf1                 => 'UDField1',
Cf2                 => 'UDField2',
IndustryType        => 'IndustryInfo',

NOTE

COMPATIBILITY

Business::OnlinePayment::vSecureProcessing uses vSecureProcessing XML Document Version: 140901 (September 1, 2014).

See http://www.vsecureprocessing.com/ for more information.

AUTHORS

Original author: Alex Brelsfoard

Current maintainer: Alex Brelsfoard

COPYRIGHT

Copyright (c) 2015 Freeside Internet Services, Inc.

All rights reserved.

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

ADVERTISEMENT

Need a complete, open-source back-office and customer self-service solution? The Freeside software includes support for credit card and electronic check processing with vSecureProcessing and over 50 other gateways, invoicing, integrated trouble ticketing, and customer signup and self-service web interfaces.

http://freeside.biz/freeside/

SEE ALSO

perl(1). Business::OnlinePayment.