diff options
| author | ivan <ivan> | 2003-10-15 09:41:45 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2003-10-15 09:41:45 +0000 |
| commit | 54b1dfa1a324ab4e3e3386f8277c1570e0796a87 (patch) | |
| tree | b3fe9f020c769b548fb8714f6951b2d45a151ebd | |
| parent | 67e766ef215398737cffb1b56e1dba67ffd3d388 (diff) | |
- Business::OnlinePayment "recurring_billing" flag is set for subsequent
credit card transactions; some processors (AuthorozeNet, others?) use this
to waive the CVV2 requirement.
| -rw-r--r-- | FS/FS/cust_bill.pm | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/FS/FS/cust_bill.pm b/FS/FS/cust_bill.pm index 27c4178d9..b9f614651 100644 --- a/FS/FS/cust_bill.pm +++ b/FS/FS/cust_bill.pm @@ -743,6 +743,12 @@ sub realtime_bop { $content{card_number} = $cust_main->payinfo; $cust_main->paydate =~ /^\d{2}(\d{2})[\/\-](\d+)[\/\-]\d+$/; $content{expiration} = "$2/$1"; + if ( qsearch('cust_pay', { 'custnum' => $cust_main->custnum, + 'payby' => 'CARD', + 'payinfo' => $cust_main->payinfo, } ) + ) { + $content{recurring_billing} = 'YES'; + } } elsif ( $method eq 'ECHECK' ) { my($account_number,$routing_code) = $cust_main->payinfo; ( $content{account_number}, $content{routing_code} ) = |