X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=FS%2FFS%2Fcust_pkg.pm;h=ee9afa3e9f8f093f06b89ca5f50d6c97dac19595;hp=b5506f63ef936b6b3cb562f9f75b817c2c96fe94;hb=a36d5bbb21a67515e6560547669bd80fc2b3a8d9;hpb=ac15bb65127bdb70398d4043a314b98eb1877fcd

diff --git a/FS/FS/cust_pkg.pm b/FS/FS/cust_pkg.pm
index b5506f63e..ee9afa3e9 100644
--- a/FS/FS/cust_pkg.pm
+++ b/FS/FS/cust_pkg.pm
@@ -5042,6 +5042,17 @@ sub cancel_sql {
   "cust_pkg.cancel IS NOT NULL AND cust_pkg.cancel != 0";
 }
 
+=item ncancelled_recurring_sql
+
+Returns an SQL expression identifying un-cancelled, recurring packages.
+
+=cut
+
+sub ncancelled_recurring_sql {
+  $_[0]->recurring_sql().
+  " AND ( cust_pkg.cancel IS NULL OR cust_pkg.cancel = 0 ) ";
+}
+
 =item status_sql
 
 Returns an SQL expression to give the package status as a string.