% include('tr-select.html', @_,
'field' => 'freq',
'options' => \@freq,
'labels' => \%freq,
'curr_value' => $curr_value,
)
%>
<%init>
my %opt = @_;
my $curr_value = $opt{'curr_value'} || $opt{'freq'};
tie my %freq, 'Tie::IxHash', %{FS::part_pkg->freqs_href()};
if ( dbdef->table('part_pkg')->column('freq')->type =~ /(int)/i ) {
delete $freq{$_} foreach grep { ! /^\d+$/ } keys %freq;
}
my @freq = keys %freq;
@freq = grep { /^\d+$/ } @freq
if $opt{'month_increments_only'};
# if exists($plans{$layer}->{'freq'}) && $plans{$layer}->{'freq'} eq 'm';
%init>