From 0f64cd3a12a28ccf5786e696305e545dfc37e83d Mon Sep 17 00:00:00 2001 From: Ivan Kohler Date: Thu, 22 Dec 2016 16:01:14 -0800 Subject: package search on null dates, RT#73715 --- httemplate/misc/bulk_change_pkg.cgi | 28 ++++++++++++++++++++++------ 1 file changed, 22 insertions(+), 6 deletions(-) (limited to 'httemplate/misc/bulk_change_pkg.cgi') diff --git a/httemplate/misc/bulk_change_pkg.cgi b/httemplate/misc/bulk_change_pkg.cgi index 4964e598f..6ed272fb8 100755 --- a/httemplate/misc/bulk_change_pkg.cgi +++ b/httemplate/misc/bulk_change_pkg.cgi @@ -10,16 +10,32 @@ %# some false laziness w/search/cust_pkg.cgi -% for my $param (qw(agentnum custnum magic status classnum custom censustract)) { - -% } +% for my $param ( +% qw( +% agentnum cust_status cust_main_salesnum salesnum custnum magic status +% custom pkgbatch zip +% 477part 477rownum date +% report_option +% ), +% grep { /^location_\w+$/ || /^report_option_any/ } $cgi->param +% ) { + +% } +% +% for my $param (qw( censustract censustract2 ) ) { +% next unless grep { $_ eq $param } $cgi->param; + +% } % -% foreach my $pkgpart ($cgi->param('pkgpart')) { - +% for my $param (qw( pkgpart classnum refnum towernum )) { +% foreach my $value ($cgi->param($param)) { + +% } % } % -% foreach my $field (qw( setup last_bill bill adjourn susp expire cancel )) { +% foreach my $field (qw( setup last_bill bill adjourn susp expire contract_end change_date cancel active )) { % + "> "> "> "> -- cgit v1.2.1