[freeside-commits] branch master updated. 2c94fadec581ea4decc7eb425ce78f6013703860

Ivan ivan at 420.am
Tue Jan 26 10:46:56 PST 2016


The branch, master has been updated
       via  2c94fadec581ea4decc7eb425ce78f6013703860 (commit)
      from  ed038663210260a7848f32ba6b20936cb6a00ede (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 2c94fadec581ea4decc7eb425ce78f6013703860
Author: Ivan Kohler <ivan at freeside.biz>
Date:   Tue Jan 26 10:46:55 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 a243b27..b5fb274 100644
--- a/FS/FS/cust_main/Import.pm
+++ b/FS/FS/cust_main/Import.pm
@@ -400,11 +400,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