diff options
Diffstat (limited to 'httemplate/misc/bulk_unsuspend_pkg.cgi')
| -rw-r--r-- | httemplate/misc/bulk_unsuspend_pkg.cgi | 66 | 
1 files changed, 66 insertions, 0 deletions
| diff --git a/httemplate/misc/bulk_unsuspend_pkg.cgi b/httemplate/misc/bulk_unsuspend_pkg.cgi new file mode 100644 index 000000000..8fbc41841 --- /dev/null +++ b/httemplate/misc/bulk_unsuspend_pkg.cgi @@ -0,0 +1,66 @@ +<% include('/elements/header-popup.html', "Unsuspend Packages") %> + +% if ( $cgi->param('error') ) { +  <FONT SIZE="+1" COLOR="#ff0000">Error: <% $cgi->param('error') %></FONT> +  <BR><BR> +% } + +<FORM ACTION="<% $p %>misc/process/bulk_unsuspend_pkg.cgi" METHOD=POST> + +%# some false laziness w/search/cust_pkg.cgi + +<INPUT TYPE="hidden" NAME="query" VALUE="<% $cgi->keywords |h %>"> +% for my $param ( +%   qw( +%     agentnum cust_status cust_main_salesnum salesnum custnum magic status +%     custom pkgbatch zip reasonnum +%     477part 477rownum date +%     report_option +%   ), +%   grep { /^location_\w+$/ || /^report_option_any/ } $cgi->param +% ) { +  <INPUT TYPE="hidden" NAME="<% $param %>" VALUE="<% $cgi->param($param) |h %>"> +% } +% +% for my $param (qw( censustract censustract2 ) ) { +%   next unless grep { $_ eq $param } $cgi->param; +  <INPUT TYPE="hidden" NAME="<% $param %>" VALUE="<% $cgi->param($param) |h %>"> +% } +% +% for my $param (qw( pkgpart classnum refnum towernum )) { +%   foreach my $value ($cgi->param($param)) { +      <INPUT TYPE="hidden" NAME="<% $param %>" VALUE="<% $value |h %>"> +%   } +% } +% +% foreach my $field (qw( setup last_bill bill adjourn susp expire contract_end change_date cancel active )) { +%  +  <INPUT TYPE="hidden" NAME="<% $field %>_null" VALUE="<% $cgi->param("${field}_null") |h %>"> +  <INPUT TYPE="hidden" NAME="<% $field %>_begin" VALUE="<% $cgi->param("${field}_begin") |h %>"> +  <INPUT TYPE="hidden" NAME="<% $field %>_beginning" VALUE="<% $cgi->param("${field}_beginning") |h %>"> +  <INPUT TYPE="hidden" NAME="<% $field %>_end" VALUE="<% $cgi->param("${field}_end") |h %>"> +  <INPUT TYPE="hidden" NAME="<% $field %>_ending" VALUE="<% $cgi->param("${field}_ending") |h %>"> +% } + +<% ntable('#cccccc') %> + +  <TR> +    <TD><INPUT TYPE="checkbox" NAME="confirm"></TD> +    <TD>Confirm Unsuspend Packages</TD> +  </TR> + +</TABLE> + +<BR> +<INPUT TYPE="submit" VALUE="Unsuspend Packages"> + +</FORM> +</BODY> +</HTML> + +<%init> + +die "access denied" +  unless $FS::CurrentUser::CurrentUser->access_right('Bulk change customer packages'); + +</%init> | 
