From: Ivan Kohler <ivan@freeside.biz>
Date: Thu, 20 Nov 2014 19:57:38 +0000 (-0800)
Subject: optimize
X-Git-Url: http://git.freeside.biz/gitweb/?a=commitdiff_plain;h=2d7110ecd22194c00aa81c798f9ca9056d9189dd;p=freeside.git

optimize
---

diff --git a/FS/FS/Misc/prune.pm b/FS/FS/Misc/prune.pm
index 3f0c79d00..ce7240578 100644
--- a/FS/FS/Misc/prune.pm
+++ b/FS/FS/Misc/prune.pm
@@ -44,34 +44,34 @@ sub prune_applications {
 
   my $ccr = <<EOW;
     WHERE
-         0 = (select count(*) from cust_credit
+         NOT EXISTS (select 1 from cust_credit
                where cust_credit_refund.crednum = cust_credit.crednum)
       or 
-         0 = (select count(*) from cust_refund
+         NOT EXISTS (select 1 from cust_refund
                where cust_credit_refund.refundnum = cust_refund.refundnum)
 EOW
   my $ccb = <<EOW;
     WHERE
-         0 = (select count(*) from cust_credit
+         NOT EXISTS (select 1 from cust_credit
                where cust_credit_bill.crednum = cust_credit.crednum)
       or 
-         0 = (select count(*) from cust_bill
+         NOT EXISTS (select 1 from cust_bill
                where cust_credit_bill.invnum = cust_bill.invnum)
 EOW
   my $cbp = <<EOW;
     WHERE
-         0 = (select count(*) from cust_bill
+         NOT EXISTS (select 1 from cust_bill
                where cust_bill_pay.invnum = cust_bill.invnum)
       or 
-         0 = (select count(*) from cust_pay
+         NOT EXISTS (select 1 from cust_pay
                where cust_bill_pay.paynum = cust_pay.paynum)
 EOW
   my $cpr = <<EOW;
     WHERE
-         0 = (select count(*) from cust_pay
+         NOT EXISTS (select 1 from cust_pay
                where cust_pay_refund.paynum = cust_pay.paynum)
       or 
-         0 = (select count(*) from cust_refund
+         NOT EXISTS (select 1 from cust_refund
                where cust_pay_refund.refundnum = cust_refund.refundnum)
 EOW