[freeside-commits] freeside/FS/FS/Cron bill.pm,1.2.2.13,1.2.2.14

[Ivan,,,]

Update of /home/cvs/cvsroot/freeside/FS/FS/Cron
In directory wavetail.420.am:/tmp/cvs-serv16424

Modified Files:
      Tag: FREESIDE_1_7_BRANCH
	bill.pm 
Log Message:
tune 1.7 query for better performance, hopefully.  RT#4412

Index: bill.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/Cron/bill.pm,v
retrieving revision 1.2.2.13
retrieving revision 1.2.2.14
diff -u -d -r1.2.2.13 -r1.2.2.14
--- bill.pm	23 Apr 2009 04:57:06 -0000	1.2.2.13
+++ bill.pm	24 Apr 2009 19:06:15 -0000	1.2.2.14
@@ -64,29 +64,30 @@
   # or
   my $where_bill_event = <<"END";
     0 < ( select count(*) from cust_bill
+
+            LEFT JOIN cust_bill_pay USING ( invnum )
+            LEFT JOIN cust_credit_bill USING ( invnum )
+            LEFT JOIN part_bill_event ON (
+              cust_main.payby = part_bill_event.payby
+              AND ( disabled IS NULL or disabled = '' )
+              AND seconds <= $time - cust_bill._date
+            )
+            LEFT JOIN cust_bill_event ON (
+              part_bill_event.eventpart = cust_bill_event.eventpart
+              AND cust_bill_event.invnum = cust_bill_event.invnum
+              AND status = 'done'
+            )
+
             where cust_main.custnum = cust_bill.custnum
-              and 0 < charged
-                      - coalesce(
-                                  ( select sum(amount) from cust_bill_pay
-                                      where cust_bill.invnum = cust_bill_pay.invnum )
-                                  ,0
-                                )
-                      - coalesce(
-                                  ( select sum(amount) from cust_credit_bill
-                                      where cust_bill.invnum = cust_credit_bill.invnum )
-                                  ,0
-                                )
-              and 0 < ( select count(*) from part_bill_event
-                          where payby = cust_main.payby
-                            and ( disabled is null or disabled = '' )
-                            and seconds <= $time - cust_bill._date
-                            and 0 = ( select count(*) from cust_bill_event
-                                       where cust_bill.invnum = cust_bill_event.invnum
-                                         and part_bill_event.eventpart = cust_bill_event.eventpart
-                                         and status = 'done'
-                                    )
-  
-                      )
+
+            GROUP BY cust_bill.invnum, cust_bill.charged
+            HAVING
+            0 < charged
+                                  - coalesce( sum(cust_bill_pay.amount) ,0 )
+                                  - coalesce( sum(cust_credit_bill.amount), 0 )
+            AND
+            0 < COUNT( cust_bill_event.eventnum IS NULL )
+
         )
 END