X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fedit%2Fcust_main%2Ftop_misc.html;h=e25506f52af1d8399a4fb481d7227ebdf9c5ff75;hb=39997db2139f32a84f4a1d1db2ee0cdd82bb9dfa;hp=7ba167b7fe4a907be6446b2d82314c09e12bd743;hpb=f62a68016f32b443084705b0e7851497b308f81d;p=freeside.git diff --git a/httemplate/edit/cust_main/top_misc.html b/httemplate/edit/cust_main/top_misc.html index 7ba167b7f..e25506f52 100644 --- a/httemplate/edit/cust_main/top_misc.html +++ b/httemplate/edit/cust_main/top_misc.html @@ -22,27 +22,66 @@ % foreach my $field ($cust_main->virtual_fields) { @@ -62,12 +101,13 @@ % $cust_main->agentnum($agentnum); - + <% mt('Agent') |h %> <% $cust_main->agent->agent |h %> - + % } else { <& /elements/tr-select-agent.html, @@ -76,6 +116,7 @@ 'empty_label' => emt('Select agent'), 'disable_empty' => ( $cust_main->agentnum ? 1 : 0 ), 'viewall_right' => emt('None'), + 'onchange' => 'agent_changed(this)', &> % } @@ -100,6 +141,11 @@ 'label' => emt("Class"), &> +%#sales person +<& /elements/tr-select-sales.html, + 'curr_value' => $cust_main->salesnum, +&> + %# referral (advertising source) %my $refnum = $cust_main->refnum || $conf->config('referraldefault') || 0; %if ( $custnum && ! $conf->exists('editreferrals') ) { @@ -108,9 +154,10 @@ % } else { - <& /elements/tr-select-part_referral.html, - 'curr_value' => $refnum - &> + <& /elements/tr-select-part_referral.html, + 'curr_value' => $refnum, + 'label' => "${r}".emt('Advertising source')."" + &> % } @@ -125,7 +172,7 @@ <% mt('Referring customer') |h %> - <% $cust_main->referral_custnum %>: <% $referring_cust_main->name %> + <% $cust_main->referral_custnum %>: <% $referring_cust_main->name |h %> @@ -212,4 +259,17 @@ my $curuser = $FS::CurrentUser::CurrentUser; my $r = qq!* !; +# which agents lock the service address, if any +my %ship_locked_agents; +foreach (qsearch('agent',{})) { + my $agentnum = $_->agentnum; + next unless $conf->exists('agent-ship_address', $_->agentnum); + my $cust_main = $_->agent_cust_main or next; + my $agent_ship_location = $cust_main->ship_location; + $ship_locked_agents{$agentnum} = +{ + map { $_ => $agent_ship_location->$_ } + qw(address1 city state zip country latitude longitude district) + }; +} +