X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fmisc%2Fprocess%2Fdelay_susp_pkg.html;h=006465ca79d5c252034964b350fb13fa6855b5b7;hb=833cfe5c9938d33c3e6b97ed610c25a7afa6eb04;hp=8649cc2352f72a10e7b27e236d4be166cd9e8771;hpb=624b2d44625f69d71175c3348cae635d580c890b;p=freeside.git diff --git a/httemplate/misc/process/delay_susp_pkg.html b/httemplate/misc/process/delay_susp_pkg.html index 8649cc235..006465ca7 100755 --- a/httemplate/misc/process/delay_susp_pkg.html +++ b/httemplate/misc/process/delay_susp_pkg.html @@ -1,6 +1,6 @@ -<% header("Package suspension delayed") %> +<& /elements/header-popup.html, $msg &> @@ -21,21 +21,27 @@ $cgi->param('pkgnum') =~ /^(\d+)$/ or die "Illegal pkgnum"; $pkgnum = $1; #untaint date -parse_datetime($cgi->param('date')) =~ /^(\d+)$/ or die "Illegal date"; -my $date = $1; +my $date = ''; +my $msg = ''; +if ( $cgi->param('date') ) { + parse_datetime($cgi->param('date')) =~ /^(\d+)$/ or die "Illegal date"; + $date = $1; + $msg = 'Package suspension delayed'; +} else { + $msg = 'Suspension delay removed'; +} $cust_pkg = qsearchs( 'cust_pkg', {'pkgnum'=>$pkgnum} ); if ($cust_pkg) { - $cust_main = $cust_pkg->cust_main; - $cust_main->dundate( $date ); - $error = $cust_main->replace; + $cust_pkg->dundate( $date ); + $error = $cust_pkg->replace; } else { - $error = "Invalid pkgnum"; + $error = "Unknown pkgnum"; } if ($error) { $cgi->param('error', $error); - print $cgi->redirect(popurl(2). "cancel_pkg.html?". $cgi->query_string ); + print $cgi->redirect(popurl(2). "delay_susp_pkg.html?". $cgi->query_string ); }