From 1d252045c95388483c957634696daaed7729b84c Mon Sep 17 00:00:00 2001 From: Jeremy Davis Date: Thu, 13 Nov 2014 12:13:44 -0500 Subject: [PATCH] Ticket 31993 Changes to EFT Canada format --- FS/FS/pay_batch/eft_canada.pm | 2 ++ 1 file changed, 2 insertions(+) diff --git a/FS/FS/pay_batch/eft_canada.pm b/FS/FS/pay_batch/eft_canada.pm index 310c400b1..0c093214a 100644 --- a/FS/FS/pay_batch/eft_canada.pm +++ b/FS/FS/pay_batch/eft_canada.pm @@ -81,9 +81,11 @@ my %holiday = ( # company + empty or first + last my $company = sprintf('%.64s', $cust_pay_batch->cust_main->company); if ( $company ) { + push @fields, 'Business'; push @fields, $company, '' } else { + push @fields, 'Personal'; push @fields, map { sprintf('%.64s', $_) } $cust_pay_batch->first, $cust_pay_batch->last; } -- 2.11.0