summaryrefslogtreecommitdiff
path: root/httemplate/elements/select-cust-fields.html
blob: 5e30638778bfb8219860ceb4c3a28feb58981fb3 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
<%init>
  my( $cust_fields, %opt ) = @_;

  use FS::ConfDefaults;
  $opt{'avail_fields'} ||= [ FS::ConfDefaults->cust_fields_avail() ];

  tie my %hash, 'Tie::IxHash', @{ $opt{'avail_fields'} };
</%init>

<SELECT NAME="cust_fields">

  <OPTION VALUE="">(configured default)

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


</SELECT>