'type' => 'select-agent',
'empty_label' => 'Select agent',
'colspan' => 6,
+ 'required' => '1',
},
{ 'field' => 'refnum',
'type' => 'select-part_referral',
'empty_label' => 'Select advertising source',
'colspan' => 6,
+ 'required' => '1',
},
{ 'field' => 'residential_commercial',
'type' => 'radio',
'type' => 'checkbox',
'value' => 'Y',
},
- { 'field' => 'company',
- 'type' => 'text',
- 'size' => 50,
- 'colspan' => 6,
- },
{ 'field' => 'contactnum',
'type' => 'contact',
'colspan' => 6,
'include_opt_callback' => sub { 'for_prospect' => '1' },
},
+ { 'field' => 'company',
+ 'type' => 'text',
+ 'size' => 50,
+ 'colspan' => 6,
+ },
{ 'field' => 'locationnum',
'type' => 'select-cust_location',
'empty_label' => 'No address',
my $curuser = $FS::CurrentUser::CurrentUser;
my $conf = new FS::Conf;
+my @agentnums = $curuser->agentnums;
my $prospectnum;
if ( $cgi->param('error') ) {
#config to default to commercial and/or disable residential when someone needs
$prospect_main->set('residential_commercial', 'Residential');
+ # config to set default agent
+ $prospect_main->agentnum( $agentnums[0] )
+ if scalar(@agentnums) == 1;
+ $prospect_main->agentnum( $conf->config('default_agentnum') )
+ if $conf->exists('default_agentnum');
+
+ # config to set default refnum
+ $prospect_main->refnum( $conf->config('referraldefault') )
+ if $conf->exists('referraldefault');
};
my $edit_callback = sub {
$cgi->param;
};
-#my @agentnums = $FS::CurrentUser::CurrentUser->agentnums;
-
my $javascript = <<END;
<SCRIPT TYPE="text/javascript">
function rescom_changed() {
);
</%doc>
+
+% $required = '<FONT COLOR="red">*</FONT>' if $opt{'required'};
+
% if ( scalar(@agents) == 1 || $opt{'fixed'} ) {
<INPUT TYPE = "hidden"
% if ( scalar(@agents) != 1 ) {
<TR>
- <TD ALIGN="right"><% $opt{'label'} || emt('Agent') %></TD>
+ <TD ALIGN="right"><% $required %> <% $opt{'label'} || emt('Agent') %></TD>
<TD BGCOLOR="#dddddd" <% $colspan %>>
% my $agent = qsearchs('agent', { 'agentnum' => $agentnum });
<% $agent ? $agent->agent : '(all)' |h %>
% } else {
<TR>
- <TD ALIGN="right"><% $opt{'label'} || emt('Agent') %></TD>
+ <TD ALIGN="right"><% $required %> <% $opt{'label'} || emt('Agent') %></TD>
<TD <% $colspan %>>
<& /elements/select-agent.html,
'curr_value' => $agentnum,
my %opt = @_;
my $agentnum = $opt{'curr_value'} || $opt{'value'};
+my $required;
my @agents =
$opt{'agents'}