summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--FS/FS/Schema.pm6
-rw-r--r--FS/FS/cust_main/Billing_Batch.pm1
-rw-r--r--FS/FS/pay_batch/RBC.pm5
-rw-r--r--httemplate/misc/payment.cgi2
4 files changed, 8 insertions, 6 deletions
diff --git a/FS/FS/Schema.pm b/FS/FS/Schema.pm
index 93220adef..5ebab7830 100644
--- a/FS/FS/Schema.pm
+++ b/FS/FS/Schema.pm
@@ -2661,9 +2661,9 @@ sub tables_hashref {
{ columns => [ 'batchnum' ],
table => 'pay_batch',
},
- { columns => [ 'invnum' ],
- table => 'cust_bill',
- },
+ #{ columns => [ 'invnum' ],
+ # table => 'cust_bill',
+ #},
{ columns => [ 'custnum' ],
table => 'cust_main',
},
diff --git a/FS/FS/cust_main/Billing_Batch.pm b/FS/FS/cust_main/Billing_Batch.pm
index 67208e6cc..c2416ab32 100644
--- a/FS/FS/cust_main/Billing_Batch.pm
+++ b/FS/FS/cust_main/Billing_Batch.pm
@@ -5,6 +5,7 @@ use vars qw( $conf );
use FS::Record qw( qsearch qsearchs dbh );
use FS::pay_batch;
use FS::cust_pay_batch;
+use FS::cust_bill_pay_batch;
install_callback FS::UID sub {
$conf = new FS::Conf;
diff --git a/FS/FS/pay_batch/RBC.pm b/FS/FS/pay_batch/RBC.pm
index 45e888dc3..1310640e1 100644
--- a/FS/FS/pay_batch/RBC.pm
+++ b/FS/FS/pay_batch/RBC.pm
@@ -4,6 +4,7 @@ use strict;
use vars qw(@ISA %import_info %export_info $name);
use Date::Format 'time2str';
use FS::Conf;
+use Encode 'encode';
my $conf;
my ($client_num, $shortname, $longname, $trans_code, $testmode, $i, $declined, $totaloffset);
@@ -174,8 +175,8 @@ $name = 'RBC';
sprintf("%010.0f",$cust_pay_batch->amount*100).
' '.
time2str("%Y%j", $pay_batch->download).
- sprintf("%-30s", $cust_pay_batch->cust_main->first . ' ' .
- $cust_pay_batch->cust_main->last).
+ sprintf("%-30.30s", encode('utf8', $cust_pay_batch->cust_main->first . ' ' .
+ $cust_pay_batch->cust_main->last)).
'E'. # English
' '.
sprintf("%-15s", $shortname).
diff --git a/httemplate/misc/payment.cgi b/httemplate/misc/payment.cgi
index a48aa0120..4860aed83 100644
--- a/httemplate/misc/payment.cgi
+++ b/httemplate/misc/payment.cgi
@@ -122,7 +122,7 @@
<TD ALIGN="right"><% mt('Account number') |h %></TD>
<TD><INPUT TYPE="text" SIZE=10 NAME="payinfo1" VALUE="<%$account%>"></TD>
<TD ALIGN="right"><% mt('Type') |h %></TD>
- <TD><SELECT NAME="paytype"><% join('', map { qq!<OPTION VALUE="$_" !.($paytype eq $_ ? 'SELECTED' : '').">$_</OPTION>" } @FS::cust_main::paytypes) %></SELECT></TD>
+ <TD><SELECT NAME="paytype"><% join('', map { qq!<OPTION VALUE="$_" !.($paytype eq $_ ? 'SELECTED' : '').">$_</OPTION>" } FS::cust_payby->paytypes) %></SELECT></TD>
</TR>
<TR>
<TD ALIGN="right"><% mt($routing_label) |h %></TD>