summaryrefslogtreecommitdiff
path: root/httemplate/elements/select-cust-fields.html
blob: 98feaf85c24505400d45490163ed9620569243c3 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
%
%  my( $cust_fields, %opt ) = @_;
%
%  use FS::ConfDefaults;
%  $opt{'avail_fields'} ||= [ FS::ConfDefaults->cust_fields_avail() ];
%
%  tie my %hash, 'Tie::IxHash', @{ $opt{'avail_fields'} };
%
%


<SELECT NAME="cust_fields">

  <OPTION VALUE="">(configured default)
% 
%     foreach my $value ( keys %hash ) { 


       <OPTION VALUE="<% $value %>"><% $hash{$value} %>
% } 


</SELECT>