[freeside-commits] branch FREESIDE_3_BRANCH updated. 7e89a2aacd07ca6ebe4c5fd2569f3b734e58726a
Ivan
ivan at 420.am
Tue Jan 26 10:46:59 PST 2016
The branch, FREESIDE_3_BRANCH has been updated
via 7e89a2aacd07ca6ebe4c5fd2569f3b734e58726a (commit)
from 7a331ae6d41521b99a542741c3c92f5edd4ea336 (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 7e89a2aacd07ca6ebe4c5fd2569f3b734e58726a
Author: Ivan Kohler <ivan at freeside.biz>
Date: Tue Jan 26 10:46:58 2016 -0800
import customers with echeck payment info, RT#39863
diff --git a/FS/FS/cust_main/Import.pm b/FS/FS/cust_main/Import.pm
index 0fd34ee..b19fb31 100644
--- a/FS/FS/cust_main/Import.pm
+++ b/FS/FS/cust_main/Import.pm
@@ -403,11 +403,23 @@ sub batch_import {
}
if ( defined $cust_main{'payinfo'} && length $cust_main{'payinfo'} ) {
- $cust_main{'payby'} = 'CARD';
- if ($cust_main{'payinfo'} =~ /\s*([AD]?)(.*)\s*$/) {
- $cust_main{'payby'} = 'DCRD' if $1 eq 'D';
- $cust_main{'payinfo'} = $2;
+
+ if ( $cust_main{'payinfo'} =~ /^\s*(\d+\@[\d\.]+)\s*$/ ) {
+
+ $cust_main{'payby'} = 'CHEK';
+ $cust_main{'payinfo'} = $1;
+
+ } else {
+
+ $cust_main{'payby'} = 'CARD';
+
+ if ($cust_main{'payinfo'} =~ /^\s*([AD]?)(.*)\s*$/) {
+ $cust_main{'payby'} = 'DCRD' if $1 eq 'D';
+ $cust_main{'payinfo'} = $2;
+ }
+
}
+
}
$cust_main{$_} = parse_datetime($cust_main{$_})
-----------------------------------------------------------------------
Summary of changes:
FS/FS/cust_main/Import.pm | 20 ++++++++++++++++----
1 file changed, 16 insertions(+), 4 deletions(-)
More information about the freeside-commits
mailing list