[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