%doc>
Example:
include( '/elements/tr-select-agent.html',
#recommended to keep things "sticky" on errors
'curr_value' => $curr_value,
##
# optional
##
'label' => 'Agent for this thing',
'empty_label' => 'Select agent', #override default
'disable_empty' => 1,
#set to 'None' or something to override default of showing all agents
#for employees w/ 'View customers of all agents' right
viewall_right => 'None',
);
%doc>
% if ( scalar(@agents) == 1 || $opt{'fixed'} ) {
% if ( scalar(@agents) != 1 ) {
<% $opt{'label'} || emt('Agent') %>
| >
% my $agent = qsearchs('agent', { 'agentnum' => $agentnum });
<% $agent ? $agent->agent : '(all)' |h %>
|
% } else { # YUCK. empty row so we don't throw g_row in edit.html off :/
% }
%
% } else {
<% $opt{'label'} || emt('Agent') %>
| >
<& /elements/select-agent.html,
'curr_value' => $agentnum,
'agents' => \@agents,
%opt,
&>
|
% }
<%init>
my %opt = @_;
my $agentnum = $opt{'curr_value'} || $opt{'value'};
my @agents =
$opt{'agents'}
? @{ $opt{'agents'} }
: $FS::CurrentUser::CurrentUser->agents(
'viewall_right' => $opt{'viewall_right'},
);
my $colspan = $opt{'colspan'} ? 'COLSPAN="'.$opt{'colspan'}.'"' : '';
%init>