summaryrefslogtreecommitdiff
path: root/FS/FS/part_svc.pm
diff options
context:
space:
mode:
authorivan <ivan>2005-10-03 01:42:22 +0000
committerivan <ivan>2005-10-03 01:42:22 +0000
commita5bbbed61e09dffffc5d7022cddb3f9ff62a955a (patch)
treef0e0a5d47a996f624da9d602e7022b0acd45d4ec /FS/FS/part_svc.pm
parent90cdac3ff61ad57b42d2fc4743ad53f7c537e6fe (diff)
update account view and edit: convert to proper templates, make sure usage information displays for any usage-capable export, add ability to edit uid/gid
Diffstat (limited to 'FS/FS/part_svc.pm')
-rw-r--r--FS/FS/part_svc.pm16
1 files changed, 14 insertions, 2 deletions
diff --git a/FS/FS/part_svc.pm b/FS/FS/part_svc.pm
index 2bb8ab5..0ece185 100644
--- a/FS/FS/part_svc.pm
+++ b/FS/FS/part_svc.pm
@@ -393,8 +393,8 @@ sub all_part_svc_column {
=item part_export [ EXPORTTYPE ]
-Returns all exports (see L<FS::part_export>) for this service, or, if an
-export type is specified, only returns exports of the given type.
+Returns a list of all exports (see L<FS::part_export>) for this service, or,
+if an export type is specified, only returns exports of the given type.
=cut
@@ -406,6 +406,18 @@ sub part_export {
qsearch('export_svc', { 'svcpart' => $self->svcpart } );
}
+=item part_export_usage
+
+Returns a list of any exports (see L<FS::part_export>) for this service that
+are capable of reporting usage information.
+
+=cut
+
+sub part_export_usage {
+ my $self = shift;
+ grep $_->can('usage_sessions'), $self->part_export;
+}
+
=item cust_svc
Returns a list of associated FS::cust_svc records.