From: ivan <ivan>
Date: Wed, 15 Oct 2003 09:41:43 +0000 (+0000)
Subject: - Business::OnlinePayment "recurring_billing" flag is set for subsequent
X-Git-Tag: NET_WHOIS_RAW_0_31~332
X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=94eb1849a28630ef039eb644f961dae8b19f58fc;ds=sidebyside

- Business::OnlinePayment "recurring_billing" flag is set for subsequent
  credit card transactions; some processors (AuthorozeNet, others?) use this
  to waive the CVV2 requirement.
---

diff --git a/FS/FS/cust_main.pm b/FS/FS/cust_main.pm
index 2ee8a42f0..58cfc0c76 100644
--- a/FS/FS/cust_main.pm
+++ b/FS/FS/cust_main.pm
@@ -1653,6 +1653,12 @@ sub realtime_bop {
     $content{card_number} = $self->payinfo;
     $self->paydate =~ /^\d{2}(\d{2})[\/\-](\d+)[\/\-]\d+$/;
     $content{expiration} = "$2/$1";
+    if ( qsearch('cust_pay', { 'custnum' => $self->custnum,
+                               'payby'   => 'CARD',
+                               'payinfo' => $self->payinfo, } )
+    ) { 
+      $content{recurring_billing} = 'YES';
+    }
   } elsif ( $method eq 'ECHECK' ) {
     my($account_number,$routing_code) = $self->payinfo;
     ( $content{account_number}, $content{routing_code} ) =