[% ELSIF ( sql_param.input == 'text' ) %]
<li><label for="sql_params[% loop.count %]">[% sql_param.entry %]: </label><input id="sql_params[% loop.count %]" type="text" name="sql_params" /></li>
[% ELSE %]
<li><label for="sql_params_[% sql_param.labelid %]">[% sql_param.entry %]:</label> [% sql_param.input %]</li>
<li><label for="sql_params_[% sql_param.labelid %]">[% sql_param.entry %]:</label>
<select name="[%- sql_param.input.name -%]" tabindex="1" size="1" id="[%- sql_param.input.id -%]">
[% FOREACH value IN sql_param.input.values %]
<option value="[%- value -%]">[%- sql_param.input.labels.$value -%]</option>
[% END %]
</select>
</li>
</ol>
}
$labelid = $text;
$labelid =~ s/\W//g;
$input =CGI::scrolling_list( # FIXME: factor out scrolling_list
$input = {
-name => "sql_params",
name => "sql_params",
-id => "sql_params_".$labelid,
id => "sql_params_".$labelid,
-values => \@authorised_values,
values => \@authorised_values,
# -default => $value,
labels => \%authorised_lib,
-labels => \%authorised_lib,
};
-override => 1,
-size => 1,
-multiple => 0,
-tabindex => 1,
);
push @tmpl_parameters, {'entry' => $text, 'input' => $input, 'labelid' => $labelid };
-