From a0732f52fdcc2bca7c399d1249ccceb191de51cd Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Tue, 25 Jul 2006 08:33:46 +0000
Subject: this should finish adding the "inactive" status, i think?

---
 FS/FS/agent.pm | 11 +++++++++++
 1 file changed, 11 insertions(+)

(limited to 'FS')

diff --git a/FS/FS/agent.pm b/FS/FS/agent.pm
index 4158341e4..e40ef09db 100644
--- a/FS/FS/agent.pm
+++ b/FS/FS/agent.pm
@@ -322,6 +322,17 @@ sub num_pkg_sql {
   $sth->fetchrow_arrayref->[0];
 }
 
+=item num_inactive_cust_pkg
+
+Returns the number of inactive customer packages (one-time packages otherwise
+unsuspended/uncancelled) for this agent.
+
+=cut
+
+sub num_inactive_cust_pkg {
+  shift->num_pkg_sql(FS::cust_pkg->inactive_sql);
+}
+
 =item num_susp_cust_pkg
 
 Returns the number of suspended customer packages for this agent.
-- 
cgit v1.2.1