4 <% header('Rate deleted') %>
5 <SCRIPT TYPE="text/javascript">
6 window.top.location.reload();
13 unless $FS::CurrentUser::CurrentUser->access_right('Configuration');
15 my ($query) = $cgi->keywords;
16 $query =~ /^(\d+)$/ or die "Illegal ratedetailnum";
17 my $rate_detail = FS::rate_detail->by_key($1);
18 my $error = $rate_detail->delete;