[freeside-commits] freeside/httemplate/misc delete-router.html, NONE, 1.1.2.2 delete-addr_block.html, NONE, 1.1.2.2

[Erik Levinson]

Update of /home/cvs/cvsroot/freeside/httemplate/misc
In directory wavetail.420.am:/tmp/cvs-serv17451/httemplate/misc

Added Files:
      Tag: FREESIDE_2_1_BRANCH
	delete-router.html delete-addr_block.html 
Log Message:
add router and addr_block delete features, RT13197

--- NEW FILE: delete-router.html ---
% if ( $error ) {
%   errorpage($error);
% } else {
<% $cgi->redirect("${p}browse/router.cgi") %>
% }
<%init>

die "access denied"
  unless $FS::CurrentUser::CurrentUser->access_right('Broadband configuration')
  || $FS::CurrentUser::CurrentUser->access_right('Broadband global configuration');

my($query) = $cgi->keywords;
$query =~ /^(\d+)$/ || die "Illegal routernum";
my $routernum = $1;

my $router = qsearchs('router',{'routernum'=>$routernum});
my $error = $router->delete;

</%init>

--- NEW FILE: delete-addr_block.html ---
% if ( $error ) {
%   errorpage($error);
% } else {
<% $cgi->redirect("${p}browse/addr_block.cgi") %>
% }
<%init>

die "access denied"
  unless $FS::CurrentUser::CurrentUser->access_right('Broadband configuration')
  || $FS::CurrentUser::CurrentUser->access_right('Broadband global configuration');

my($query) = $cgi->keywords;
$query =~ /^(\d+)$/ || die "Illegal blocknum";
my $blocknum = $1;

my $addr_block = qsearchs('addr_block',{'blocknum'=>$blocknum});
my $error = $addr_block->delete;

</%init>