httemplate/elements/select-cust-fields.html

   1 %
   2 %  my( $cust_fields, %opt ) = @_;
   3 %
   4 %  use FS::ConfDefaults;
   5 %  $opt{'avail_fields'} ||= [ FS::ConfDefaults->cust_fields_avail() ];
   6 %
   7 %  tie my %hash, 'Tie::IxHash', @{ $opt{'avail_fields'} };
   8 %
   9 %
  10
  11
  12 <SELECT NAME="cust_fields">
  13
  14   <OPTION VALUE="">(configured default)
  15 %
  16 %     foreach my $value ( keys %hash ) {
  17
  18
  19        <OPTION VALUE="<% $value %>"><% $hash{$value} %>
  20 % }
  21
  22
  23 </SELECT>
  24