X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=FS%2FFS%2Fcust_svc.pm;h=604c654d825f0f4436a6d6bbd45ba3001a129c6f;hp=1fd84063d498941cbc6476d23fd3f780b48f6c40;hb=8364f7794d5ab8e64b472bdda43f48038cdd9656;hpb=c7ad63f42570c80ba01e00326e62a8ef66ba86c3

diff --git a/FS/FS/cust_svc.pm b/FS/FS/cust_svc.pm
index 1fd84063d..604c654d8 100644
--- a/FS/FS/cust_svc.pm
+++ b/FS/FS/cust_svc.pm
@@ -344,6 +344,18 @@ sub check {
   $self->SUPER::check;
 }
 
+=item display_svcnum 
+
+Returns the displayed service number for this service: agent_svcid if it has a
+value, svcnum otherwise
+
+=cut
+
+sub display_svcnum {
+  my $self = shift;
+  $self->agent_svcid || $self->svcnum;
+}
+
 =item part_svc
 
 Returns the definition for this service, as a FS::part_svc object (see