diff options
author | Mark Wells <mark@freeside.biz> | 2015-11-25 15:08:05 -0800 |
---|---|---|
committer | Mark Wells <mark@freeside.biz> | 2015-11-25 15:08:19 -0800 |
commit | ee1b73a65e0edfba16f0fb37ccea4ceb7851203f (patch) | |
tree | a5712fac9904ad2f5b11b5fa52d7ad47bf7e04f3 /rt/lib | |
parent | 1658a54e6008907666cc57c5d957fcd208a74a85 (diff) |
add service location to RT ticket search, #19154
Diffstat (limited to 'rt/lib')
-rw-r--r-- | rt/lib/RT/URI/freeside/Internal.pm | 18 |
1 files changed, 14 insertions, 4 deletions
diff --git a/rt/lib/RT/URI/freeside/Internal.pm b/rt/lib/RT/URI/freeside/Internal.pm index 33831bcac..2b09c879b 100644 --- a/rt/lib/RT/URI/freeside/Internal.pm +++ b/rt/lib/RT/URI/freeside/Internal.pm @@ -210,8 +210,8 @@ sub CustomerResolver { sub CustomerInfo { my $self = shift; - $self = $self->CustomerResolver; return $self->{CustomerInfo} if $self->{CustomerInfo}; + $self = $self->CustomerResolver; my $rec = $self->_FreesideGetRecord() if $self; if (!$rec) { @@ -261,23 +261,33 @@ sub CustomerInfo { $info->{"bill_location"} = $bill_location->location_label(no_prefix => 1); $info->{"ship_location"} = $ship_location->location_label(no_prefix => 1); - return $self->{CustomerInfo} = $info; } sub ServiceInfo { my $self = shift; $self->{fstable} eq 'cust_svc' or return; + return $self->{ServiceInfo} if $self->{ServiceInfo}; + my $rec = $self->_FreesideGetRecord() or return; my $cust_svc = $rec->{'_object'}; my $svc_x = $cust_svc->svc_x; my $part_svc = $cust_svc->part_svc; - return $self->{ServiceInfo} ||= { + my $locationnum = $cust_svc->cust_pkg->locationnum; + my $cust_location = qsearchs('cust_location', { locationnum => $locationnum}); + my @lf = FS::cust_main->location_fields; + + # location fields are not prefixed + my $info = { $cust_svc->hash, $svc_x->hash, + $cust_location->hash, ServiceType => $part_svc->svc, Label => $self->AsString, - } + }; + $info->{'location'} = $cust_location->location_label(no_prefix => 1); + + return $self->{ServiceInfo} = $info; } 1; |