diff options
| author | Mark Wells <mark@freeside.biz> | 2013-02-19 14:34:28 -0800 |
|---|---|---|
| committer | Mark Wells <mark@freeside.biz> | 2013-02-19 14:34:28 -0800 |
| commit | 7b3c18f90c6677884bd39d29f011ea59a257184b (patch) | |
| tree | 0f3f68a6831f6dbe018a209615325d690fe9cd25 /httemplate/edit/process/bulk-part_pkg.html | |
| parent | c0fb4cbb552047079c3af5d3496fafd4f1b11c93 (diff) | |
better UI for package report classes, #13057
Diffstat (limited to 'httemplate/edit/process/bulk-part_pkg.html')
| -rw-r--r-- | httemplate/edit/process/bulk-part_pkg.html | 30 |
1 files changed, 30 insertions, 0 deletions
diff --git a/httemplate/edit/process/bulk-part_pkg.html b/httemplate/edit/process/bulk-part_pkg.html new file mode 100644 index 000000000..4775a9334 --- /dev/null +++ b/httemplate/edit/process/bulk-part_pkg.html @@ -0,0 +1,30 @@ +% if ( $error ) { +% $cgi->param('error', $error); +<% $cgi->redirect(popurl(3).'/edit/bulk-part_pkg.cgi?', $cgi->query_string) %> +% } else { +<% $cgi->redirect(popurl(3).'/browse/part_pkg.cgi') %> +% } +<%init> +die "access denied" unless $FS::CurrentUser::CurrentUser->access_right('Bulk edit package definitions'); + +my @pkgparts = $cgi->param('pkgpart') + or die "no package definitions selected"; + +my %changes; +foreach my $param (grep { /^report_option_\d+$/ } $cgi->param) { + if ( length($cgi->param($param)) ) { + if ( $cgi->param($param) == 1 ) { + $changes{$param} = 1; + } else { + $changes{$param} = ''; + } + } +} + +my $error; +foreach my $pkgpart (@pkgparts) { + my $part_pkg = FS::part_pkg->by_key($pkgpart); + my %options = ( $part_pkg->options, %changes ); + $error ||= $part_pkg->replace( options => \%options ); +} +</%init> |
