From dadbfd8b7e4e471151ed828f5173ceb7dee95fe5 Mon Sep 17 00:00:00 2001 From: Jonathan Prykop Date: Fri, 13 May 2016 22:47:53 -0500 Subject: [PATCH] RT#41394: Add advertising source to customer fields selection [added referral join to search/cust_event] --- httemplate/search/cust_event.html | 10 +++++++--- 1 file changed, 7 insertions(+), 3 deletions(-) diff --git a/httemplate/search/cust_event.html b/httemplate/search/cust_event.html index ad953e30d..b1ba9090e 100644 --- a/httemplate/search/cust_event.html +++ b/httemplate/search/cust_event.html @@ -181,12 +181,16 @@ $search{'ending'} = $ending; my $where = ' WHERE '. FS::cust_event->search_sql_where( \%search ); my $join = FS::cust_event->join_sql() . + # warning: does not show the true service address for package events. + # the query to do that would be painfully slow. 'LEFT JOIN cust_location bill_location '. 'ON (cust_main.bill_locationnum = bill_location.locationnum) '. 'LEFT JOIN cust_location ship_location '. - 'ON (cust_main.ship_locationnum = ship_location.locationnum)'; - # warning: does not show the true service address for package events. - # the query to do that would be painfully slow. + 'ON (cust_main.ship_locationnum = ship_location.locationnum)'. + # include link to referral in case it's in cust-fields + # (maybe we should be using FS::UI::Web::join_cust_main instead?) + 'LEFT JOIN (select refnum, referral from part_referral) AS part_referral_x '. + 'ON (cust_main.refnum = part_referral_x.refnum) '; my $sql_query = { 'table' => 'cust_event', -- 2.11.0