1 <% include('/elements/init_overlib.html') %>
2 <% include('/elements/header.html',$title) %>
3 <% include('/elements/menubar.html',@menubar) %>
4 <% include('/edit/elements/rate_detail.html',
6 'countrycode' => $countrycode,
8 <% include('/elements/footer.html') %>
12 my $conf = new FS::Conf;
13 my $money_char = $conf->config('money_char') || '$';
15 my @menubar = ( 'Rate plans' => $p.'browse/rate.cgi',
16 'Regions and Prefixes' => $p.'browse/rate_region.html',
17 'Time Periods' => $p.'browse/rate_time.html',
24 unless $FS::CurrentUser::CurrentUser->access_right('Configuration');
26 $cgi->param('ratenum') =~ /^(\d+)$/ or die "unparsable ratenum";
28 my $rate = qsearchs('rate', { 'ratenum' => $ratenum } )
29 or die "unknown ratenum $ratenum";
30 my $ratename = $rate->ratename;
31 my $title = "$ratename rates";
35 if ( $cgi->param('countrycode') =~ /^(\d+)$/ ) {
37 $title .= " for +$countrycode";