diff options
| author | Mitch Jackson <mitch@freeside.biz> | 2018-08-09 14:55:44 -0400 |
|---|---|---|
| committer | Mitch Jackson <mitch@freeside.biz> | 2018-08-14 20:27:37 -0400 |
| commit | f81eebbe27a6acc0ae4284fa04b5525a41ae4570 (patch) | |
| tree | cf34bc5793ca7bc4a32007c8278fc0d772a78c24 /FS/FS/cust_main.pm | |
| parent | 4c5f25435ed32c15a6c8078109b62654ff96797b (diff) | |
RT# 78547 bill_and_collect() small optimization
Diffstat (limited to 'FS/FS/cust_main.pm')
| -rw-r--r-- | FS/FS/cust_main.pm | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/FS/FS/cust_main.pm b/FS/FS/cust_main.pm index 3bffa3a59..ea524dae4 100644 --- a/FS/FS/cust_main.pm +++ b/FS/FS/cust_main.pm @@ -5414,6 +5414,16 @@ sub process_bill_and_collect { $cust_main->bill_and_collect( %$param ); } +=item pending_invoice_count + +Return number of cust_bill with pending=Y for this customer + +=cut + +sub pending_invoice_count { + FS::cust_bill->count( 'custnum = '.shift->custnum."AND pending = 'Y'" ); +} + #starting to take quite a while for big dbs # (JRNL: journaled so it only happens once per database) # - seq scan of h_cust_main (yuck), but not going to index paycvv, so |