From: Ivan Kohler <ivan@freeside.biz>
Date: Fri, 19 Apr 2013 05:49:15 +0000 (-0700)
Subject: uppercase company name in NACHA export format, RT#21597
X-Git-Url: http://git.freeside.biz/gitweb/?a=commitdiff_plain;h=11b521c724e311438020861cd060819131ac871a;p=freeside.git

uppercase company name in NACHA export format, RT#21597
---

diff --git a/FS/FS/pay_batch/nacha.pm b/FS/FS/pay_batch/nacha.pm
index d0758f4b6..c069082c7 100644
--- a/FS/FS/pay_batch/nacha.pm
+++ b/FS/FS/pay_batch/nacha.pm
@@ -47,7 +47,7 @@ $DEBUG = 0;
     my $origin = $1;
 
     my $company = $conf->config('company_name', $pay_batch->agentnum);
-    $company = substr($company. (' 'x23), 0, 23);
+    $company = substr(uc($company). (' 'x23), 0, 23);
 
     my $now = time;