X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fedit%2Fcust_main%2Ftop_misc.html;h=d8141b5a7cad6aaac7e4292399e64bd904b1a0b7;hb=5fa459e35a04b69cbdc6b5b938eabcbc1bac6c74;hp=a7545a045e61ece2e19da626c2999f38ec5931a3;hpb=12f4cc4b100b849de3584d5d1a2376cebcd8729f;p=freeside.git
diff --git a/httemplate/edit/cust_main/top_misc.html b/httemplate/edit/cust_main/top_misc.html
index a7545a045..d8141b5a7 100644
--- a/httemplate/edit/cust_main/top_misc.html
+++ b/httemplate/edit/cust_main/top_misc.html
@@ -1,4 +1,80 @@
-<% &ntable("#cccccc") %>
+
+
+
+ Residential |
+ residential_commercial eq 'Commercial' ? '' : 'CHECKED' %>
+ > |
+
+
+ Commercial |
+ residential_commercial eq 'Commercial' ? 'CHECKED' : '' %>
+ > |
+
+
+
+% foreach my $field ($cust_main->virtual_fields) {
+ <% $cust_main->pvf($field)->widget('HTML', 'edit',$cust_main->getfield($field)) %>
+% }
%# tags
<& /elements/tr-select-cust_tag.html,
@@ -13,12 +89,13 @@
% $cust_main->agentnum($agentnum);
-
+
<% mt('Agent') |h %> |
<% $cust_main->agent->agent |h %> |
-
+
% } else {
<& /elements/tr-select-agent.html,
@@ -27,6 +104,7 @@
'empty_label' => emt('Select agent'),
'disable_empty' => ( $cust_main->agentnum ? 1 : 0 ),
'viewall_right' => emt('None'),
+ 'onchange' => 'agent_changed(this)',
&>
% }
@@ -51,6 +129,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') ) {
@@ -76,7 +159,7 @@
<% mt('Referring customer') |h %> |
- <% $cust_main->referral_custnum %>: <% $referring_cust_main->name %>
+ <% $cust_main->referral_custnum %>: <% $referring_cust_main->name |h %>
|
@@ -116,6 +199,20 @@
$cust_main->edit_subject ? 'CHECKED' : '' %>>
<% mt('Can edit ticket subjects') |h %> |
+% } else {
+
+% }
+
+% # permission to edit
+% if ( $conf->exists('cust_main-edit_calling_list_exempt') ) {
+
+
+ calling_list_exempt ? 'CHECKED' : '' %>> |
+ <% mt('Calling list exempt') |h %> |
+
+% } else {
+
% }
@@ -126,10 +223,40 @@ my( $cust_main, %opt ) = @_;
my $custnum = $opt{'custnum'};
+if ( $cgi->param('error') ) {
+ $cust_main->set('residential_commercial',
+ ($cgi->param('residential_commercial') eq 'Commercial')
+ ? 'Commercial'
+ : 'Residential'
+ );
+} elsif ( $custnum ) { #editing
+ $cust_main->set('residential_commercial',
+ length($cust_main->company)
+ ? 'Commercial'
+ : 'Residential'
+ );
+} else { #new customer
+ #config to default to commercial and/or disable residential when someone needs
+ $cust_main->set('residential_commercial', 'Residential');
+}
+
my $conf = new FS::Conf;
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)
+ };
+}
+
%init>