X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=httemplate%2Fedit%2Fprospect_main.html;h=6aefe80d0cb6d01304d9c668a15cc3c1ae9fcf95;hp=da5c6ce37d68663dbff68692351c0f0f58c8bfef;hb=7e9422a954e8249627c256b53080ee6afeeed913;hpb=d2acdd4d53071f9e0f9718e14532cb009cda1a85 diff --git a/httemplate/edit/prospect_main.html b/httemplate/edit/prospect_main.html index da5c6ce37..6aefe80d0 100644 --- a/httemplate/edit/prospect_main.html +++ b/httemplate/edit/prospect_main.html @@ -1,23 +1,25 @@ <% include('elements/edit.html', 'name_singular' => 'prospect', 'table' => 'prospect_main', + 'html_table_class'=> 'fsinnerbox', 'labels' => { 'prospectnum' => 'Prospect', 'agentnum' => 'Agent', 'refnum' => 'Advertising source', 'company' => 'Company', 'contactnum' => 'Contact', 'locationnum' => ' ', + 'taxstatusnum'=> 'Tax status', }, 'fields' => [ { 'field' => 'agentnum', 'type' => 'select-agent', 'empty_label' => 'Select agent', - 'colspan' => 6, + 'colspan' => 7, }, { 'field' => 'refnum', 'type' => 'select-part_referral', 'empty_label' => 'Select advertising source', - 'colspan' => 6, + 'colspan' => 7, }, { 'field' => 'residential_commercial', 'type' => 'radio', @@ -27,13 +29,15 @@ { 'field' => 'company', 'type' => 'text', 'size' => 50, - 'colspan' => 6, + 'colspan' => 7, }, { 'field' => 'contactnum', 'type' => 'contact', - 'colspan' => 6, - 'o2m_table' => 'contact', - 'm2_label' => 'Contact', + 'colspan' => 7, + 'prospectnum' => $prospectnum, + 'm2m_method' => 'prospect_contact', + 'm2m_dstcol' => 'contactnum', + 'm2_label' => 'Contact', 'm2_error_callback' => $m2_error_callback, }, @@ -46,6 +50,11 @@ 'prospect_main' => shift }, }, + { 'field' => 'taxstatusnum', + 'type' => 'select-tax_status', + 'required' => 1, + 'empty_label' => ' ', + }, ], 'new_callback' => $new_callback, 'edit_callback' => $edit_callback, @@ -62,18 +71,25 @@ my $conf = new FS::Conf; my $prospectnum; if ( $cgi->param('error') ) { - $prospectnum = scalar($cgi->param('prospectnum')); + $cgi->param('prospectnum') =~ /^(\d*)$/ or die 'illegal prospectnum'; + $prospectnum = $1; die "access denied" unless $curuser->access_right(($prospectnum ? 'Edit' : 'New'). ' prospect'); } elsif ( $cgi->keywords ) { #editing + my($query) = $cgi->keywords; + $query =~ /^(\d+)$/ or die 'no prospectnum'; + $prospectnum = $1; + die "access denied" unless $curuser->access_right('Edit prospect'); } else { #new prospect + $prospectnum = ''; + die "access denied" unless $curuser->access_right('New prospect');