summaryrefslogtreecommitdiff
path: root/FS/FS/svc_Common.pm
diff options
context:
space:
mode:
authorivan <ivan>2005-07-14 10:52:46 +0000
committerivan <ivan>2005-07-14 10:52:46 +0000
commit08662d58e7b9a13cf841e9c89daa39b28655724e (patch)
treebb6415dcfc8c94a30639c8a913051a38c31780ad /FS/FS/svc_Common.pm
parentc91e5cd4ce307d5f3573ea309cbcf03186ea3de4 (diff)
move account search (httemplate/search/svc_acct.cgi) to new template, cust-fields configuration value to control which customer fields are shown on reports
Diffstat (limited to 'FS/FS/svc_Common.pm')
-rw-r--r--FS/FS/svc_Common.pm21
1 files changed, 4 insertions, 17 deletions
diff --git a/FS/FS/svc_Common.pm b/FS/FS/svc_Common.pm
index 80d5e21a6..205c33078 100644
--- a/FS/FS/svc_Common.pm
+++ b/FS/FS/svc_Common.pm
@@ -3,15 +3,16 @@ package FS::svc_Common;
use strict;
use vars qw( @ISA $noexport_hack $DEBUG );
use FS::Record qw( qsearch qsearchs fields dbh );
+use FS::cust_main_Mixin;
use FS::cust_svc;
use FS::part_svc;
use FS::queue;
use FS::cust_main;
-@ISA = qw( FS::Record );
+@ISA = qw( FS::cust_main_Mixin FS::Record );
-$DEBUG = 0;
-#$DEBUG = 1;
+#$DEBUG = 0;
+$DEBUG = 1;
=head1 NAME
@@ -547,20 +548,6 @@ sub clone_kludge_unsuspend {
shift;
}
-=item cust_name
-
-Given a svc_ object that contains fields from cust_main (say, from a
-JOINed search. See httemplate/search/svc_* for examples), returns the
-equivalent of "$svc_x->cust_svc->cust_pkg->name" (but much more efficient),
-or "(unlinked)" if this service is not linked to a customer.
-
-=cut
-
-sub cust_name {
- my $svc_x = shift;
- $svc_x->custnum ? FS::cust_main::name($svc_x) : '(unlinked)';
-}
-
=back
=head1 BUGS