internationalization/localization, RT12515

1 files changed, 28 insertions, 0 deletions

diff --git a/httemplate/view/cust_main/payment_history.html b/httemplate/view/cust_main/payment_history.html
index 732e417db..e561c703e 100644
--- a/httemplate/view/cust_main/payment_history.html
+++ b/httemplate/view/cust_main/payment_history.html
@@ -450,4 +450,32 @@ foreach my $cust_refund ($cust_main->cust_refund) {
 
 }
 
+sub translate_payby {
+    my ($payby,$payinfo) = (shift,shift);
+    my %payby = (
+        BILL    => $payinfo ? mt('Check #') : '',
+        CHEK    => mt('Electronic check '),
+        PREP    => mt('Prepaid card '),
+        CARD    => mt('Credit card #'),
+        COMP    => mt('Complimentary by '),
+        CASH    => mt('Cash'),
+        WEST    => mt('Western Union'),
+        MCRD    => mt('Manual credit card'),
+    );
+    $payby = (exists $payby{$payby}) ? $payby{$payby} : $payby; 
+    $payby;
+};
+
+sub translate_payby_refund {
+    my ($payby,$payinfo) = (shift,shift);
+    my %payby = (
+        BILL    => $payinfo ? mt('Check #') : mt('Check'),
+        CHEK    => mt('Electronic check '),
+        CARD    => 'CARD ',
+        COMP    => 'COMP ',
+    );
+    $payby = (exists $payby{$payby}) ? $payby{$payby} : $payby; 
+    $payby;
+};
+
 </%init>