From 13bcd704deec03008853c18a0258e031b62e2ec6 Mon Sep 17 00:00:00 2001
From: Ivan Kohler <ivan@freeside.biz>
Date: Sat, 26 Aug 2017 14:17:52 -0700
Subject: [PATCH] referral count search, RT#75757

---
 FS/FS/cust_main/Search.pm               | 6 +++---
 httemplate/search/report_cust_main.html | 7 +++++++
 2 files changed, 10 insertions(+), 3 deletions(-)

diff --git a/FS/FS/cust_main/Search.pm b/FS/FS/cust_main/Search.pm
index d66809404..09558b84b 100644
--- a/FS/FS/cust_main/Search.pm
+++ b/FS/FS/cust_main/Search.pm
@@ -872,10 +872,10 @@ sub search {
   ##
   # with referrals
   ##
-  if ( $params->{'with_referrals'} ) {
+  if ( $params->{'with_referrals'} =~ /^\s*(\d+)\s*$/ ) {
     push @where,
-      ' EXISTS ( SELECT 1 FROM cust_main AS referred_cust_main
-                   WHERE cust_main.custnum = referred_cust_main.referral_custnum )';
+      " $1 <= ( SELECT COUNT(*) FROM cust_main AS referred_cust_main
+                  WHERE cust_main.custnum = referred_cust_main.referral_custnum )";
   }
 
   ##
diff --git a/httemplate/search/report_cust_main.html b/httemplate/search/report_cust_main.html
index c458bb4af..2a313a13b 100755
--- a/httemplate/search/report_cust_main.html
+++ b/httemplate/search/report_cust_main.html
@@ -107,6 +107,13 @@
         </TD>
       </TR>
 
+      <& /elements/tr-input-text.html,
+           label     => emt('At least this many referrals'),
+           field     => 'with_referrals',
+           size      => 4,
+           maxlength => 4,
+      &>
+
   </TABLE>
   <BR>
 
-- 
2.11.0