[freeside-commits] branch FREESIDE_2_3_BRANCH updated. 02ef2771a6a932b2add68f65d80eb85a63123cd2

Jeremy Davis jeremyd at 420.am
Mon Feb 25 10:59:45 PST 2013


The branch, FREESIDE_2_3_BRANCH has been updated
       via  02ef2771a6a932b2add68f65d80eb85a63123cd2 (commit)
      from  6f2d0b87deea82b7ee1827775ee7db60d1e1e5e5 (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.

- Log -----------------------------------------------------------------
commit 02ef2771a6a932b2add68f65d80eb85a63123cd2
Author: Jeremy Davis <jeremyd at freeside.biz>
Date:   Mon Feb 25 13:59:37 2013 -0500

    #19723 Fixed BoM format

diff --git a/FS/FS/pay_batch/BoM.pm b/FS/FS/pay_batch/BoM.pm
index 719b504..a3708d4 100644
--- a/FS/FS/pay_batch/BoM.pm
+++ b/FS/FS/pay_batch/BoM.pm
@@ -31,13 +31,13 @@ $name = 'BoM';
   },
   header => sub { 
     my $pay_batch = shift;
-    sprintf( "A%10s%04u%06u%05u%54s\n",  #80
+    sprintf( "A%10s%04u%06u%05u%53s\n",  #80
       $origid,
       $pay_batch->batchnum,
       jdate($pay_batch->download),
       $datacenter,
       "") .
-    sprintf( "XD%03u%06u%-15s%-30s%09u%-12s   \n", #80
+    sprintf( "XD%03u%06u%-15s%-30s%09u%-12s ", #80
       $typecode,
       jdate($pay_batch->download),
       $shortname,
@@ -48,7 +48,7 @@ $name = 'BoM';
   row => sub {
     my ($cust_pay_batch, $pay_batch) = @_;
     my ($account, $aba) = split('@', $cust_pay_batch->payinfo);
-    sprintf( "D%010.0f%09u%-12s%-29s%-19s\n", #80
+    sprintf( "D%010.0f%09u%-12s%-29s%-18s ", #80
       $cust_pay_batch->amount * 100,
       $aba,
       $account,
@@ -58,8 +58,8 @@ $name = 'BoM';
   },
   footer => sub {
     my ($pay_batch, $batchcount, $batchtotal) = @_;
-    sprintf( "YD%08u%014.0f%56s\n", $batchcount, $batchtotal*100, ""). #80
-    sprintf( "Z%014u%04u%014u%05u%42s\n",  #80 now
+    sprintf( "YD%08u%014.0f%55s\n", $batchcount, $batchtotal*100, ""). #80
+    sprintf( "Z%014u%05u%014u%05u%40s",  #80 now
       $batchtotal*100, $batchcount, "0", "0", "");
   },
 );

-----------------------------------------------------------------------

Summary of changes:
 FS/FS/pay_batch/BoM.pm |   10 +++++-----
 1 files changed, 5 insertions(+), 5 deletions(-)




More information about the freeside-commits mailing list