Diverse bug and typo fixes to the recurring billing system. Also added some POD
This commit is contained in:
parent
39a71a9b44
commit
1d6aeaf2d4
11 changed files with 341 additions and 20 deletions
|
|
@ -11,6 +11,7 @@ use WebGUI::International;
|
|||
use LWP::UserAgent;
|
||||
use XML::Simple;
|
||||
use HTTP::Cookies;
|
||||
use WebGUI::SQL;
|
||||
|
||||
our @ISA = qw(WebGUI::Commerce::Payment);
|
||||
|
||||
|
|
@ -523,7 +524,7 @@ sub getRecurringPaymentStatus {
|
|||
$recurringId = shift;
|
||||
$term = shift || 1;
|
||||
|
||||
my %resolve = {
|
||||
my %resolve = (
|
||||
weekly => 7*3600*24,
|
||||
biweekly => 14*3600*24,
|
||||
fourweekly => 28*3600*24,
|
||||
|
|
@ -531,7 +532,7 @@ sub getRecurringPaymentStatus {
|
|||
quarterly => 91*3600*24,
|
||||
halfyearly => 182*3600*24,
|
||||
yearly => 365*3600*24
|
||||
};
|
||||
);
|
||||
|
||||
my $transactionData = WebGUI::SQL->quickHashRef("select * from ITransact_recurringStatus where gatewayId=".quote($recurringId));
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue