projects
/
Business-OnlinePayment-Jettis.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (from parent 1:
49aca2a
)
s/echeck/check/ and doc update
author
ivan
<ivan>
Tue, 17 Dec 2002 14:36:29 +0000
(14:36 +0000)
committer
ivan
<ivan>
Tue, 17 Dec 2002 14:36:29 +0000
(14:36 +0000)
Jettis.pm
patch
|
blob
|
history
diff --git
a/Jettis.pm
b/Jettis.pm
index
3da3b45
..
673bf67
100644
(file)
--- a/
Jettis.pm
+++ b/
Jettis.pm
@@
-194,7
+194,7
@@
sub submit {
}
my $type = lc($content{'type'});
}
my $type = lc($content{'type'});
- if ( $type eq '
e
check' ) {
+ if ( $type eq 'check' ) {
} else {
croak "$type not (yet) supported";
}
} else {
croak "$type not (yet) supported";
}
@@
-270,15
+270,16
@@
Business::OnlinePayment::Jettis - Jettis backend for Business::OnlinePayment
my $tx = new Business::OnlinePayment("Jettis");
$tx->content(
my $tx = new Business::OnlinePayment("Jettis");
$tx->content(
- type => '
E
CHECK',
+ type => 'CHECK',
login => 'test', #ClientID
action => 'Normal Authorization',
description => 'Business::OnlinePayment test',
amount => '49.95',
invoice_number => '100100',
name => 'Tofu Beast',
login => 'test', #ClientID
action => 'Normal Authorization',
description => 'Business::OnlinePayment test',
amount => '49.95',
invoice_number => '100100',
name => 'Tofu Beast',
- card_number => '4007000000027',
- expiration => '09/02',
+ account_number => '12345',
+ routing_code => '123456789',
+ bank_name => 'First National Test Bank',
);
$tx->submit();
);
$tx->submit();
@@
-294,7
+295,7
@@
For detailed information see L<Business::OnlinePayment>.
=head1 NOTE
=head1 NOTE
-This module only implements '
E
CHECK' (ACH) functionality at this time. Credit
+This module only implements 'CHECK' (ACH) functionality at this time. Credit
card transactions are not (yet) supported.
=head1 COMPATIBILITY
card transactions are not (yet) supported.
=head1 COMPATIBILITY