From 94eb1849a28630ef039eb644f961dae8b19f58fc Mon Sep 17 00:00:00 2001 From: ivan Date: Wed, 15 Oct 2003 09:41:43 +0000 Subject: [PATCH] - Business::OnlinePayment "recurring_billing" flag is set for subsequent credit card transactions; some processors (AuthorozeNet, others?) use this to waive the CVV2 requirement. --- FS/FS/cust_main.pm | 6 ++++++ 1 file changed, 6 insertions(+) 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} ) = -- 2.11.0