1 <% include('/elements/header-popup.html', "Suspend Packages") %>
3 % if ( $cgi->param('error') ) {
4 <FONT SIZE="+1" COLOR="#ff0000">Error: <% $cgi->param('error') %></FONT>
8 <FORM ACTION="<% $p %>misc/process/bulk_suspend_pkg.cgi" METHOD=POST>
10 <& /elements/cust_pkg-search-form_input.html, $cgi &>
12 <% ntable('#cccccc') %>
15 <& /elements/tr-input-date-field.html, {
16 'name' => 'suspend_date',
18 'label' => mt("Suspend package on"),
19 'format' => $date_format,
23 <& /elements/tr-select-reason.html,
24 field => 'suspend_reasonnum',
28 % if ( $FS::CurrentUser::CurrentUser->access_right('Unsuspend customer package')) {
30 <& /elements/tr-input-date-field.html, {
31 'name' => 'suspend_resume_date',
33 'label' => mt('Unsuspend on'),
34 'format' => $date_format,
35 'noinit' => $date_init,
42 <INPUT TYPE="submit" VALUE="Suspend Packages">
51 unless $FS::CurrentUser::CurrentUser->access_right('Bulk change customer packages');
53 #use Date::Parse qw(str2time);
54 #<table style="background-color: #cccccc; border-spacing: 2; width: 100%">
56 my $conf = new FS::Conf;
57 my $date_format = $conf->config('date_format') || '%m/%d/%Y';