projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
bugfix for manual re-charging changes (Bug#423)
[freeside.git]
/
FS
/
FS
/
cust_main.pm
diff --git
a/FS/FS/cust_main.pm
b/FS/FS/cust_main.pm
index
b455400
..
165e696
100644
(file)
--- a/
FS/FS/cust_main.pm
+++ b/
FS/FS/cust_main.pm
@@
-1451,7
+1451,7
@@
sub retry_realtime {
&& $_->status eq 'done'
&& $_->statustext
}
&& $_->status eq 'done'
&& $_->statustext
}
- $
_
->cust_bill_event;
+ $
cust_bill
->cust_bill_event;
next unless @cust_bill_event;
my $error = $cust_bill_event[0]->retry;
if ( $error ) {
next unless @cust_bill_event;
my $error = $cust_bill_event[0]->retry;
if ( $error ) {
@@
-1556,6
+1556,10
@@
sub realtime_bop {
( $content{account_number}, $content{routing_code} ) =
split('@', $self->payinfo);
$content{bank_name} = $self->payname;
( $content{account_number}, $content{routing_code} ) =
split('@', $self->payinfo);
$content{bank_name} = $self->payname;
+ $content{account_type} = 'CHECKING';
+ $content{account_name} = $payname;
+ $content{customer_org} = $self->company ? 'B' : 'I';
+ $content{customer_ssn} = $self->ss;
} elsif ( $method eq 'LEC' ) {
$content{phone} = $self->payinfo;
}
} elsif ( $method eq 'LEC' ) {
$content{phone} = $self->payinfo;
}