summaryrefslogtreecommitdiff
path: root/FS/FS/agent.pm
diff options
context:
space:
mode:
authorivan <ivan>2006-07-25 08:33:46 +0000
committerivan <ivan>2006-07-25 08:33:46 +0000
commita0732f52fdcc2bca7c399d1249ccceb191de51cd (patch)
tree9b8d3af4ea844cd9dfa448772b30bed5e1e99b42 /FS/FS/agent.pm
parent4f056133e2a2bd84d8d789acf24aba695a6e3688 (diff)
this should finish adding the "inactive" status, i think?
Diffstat (limited to 'FS/FS/agent.pm')
-rw-r--r--FS/FS/agent.pm11
1 files changed, 11 insertions, 0 deletions
diff --git a/FS/FS/agent.pm b/FS/FS/agent.pm
index 4158341..e40ef09 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.