},
sub { my $c = shift;
sprintf( $money_char.'%.2f',
- $c->part_pkg->base_recur($c)
+ $c->base_recur
);
},
sub { FS::part_pkg::freq_pretty(shift); },
my %search_hash = ();
-#some false laziness w/misc/bulk_change_pkg.cgi
+#some false laziness w/misc/bulk_change_pkg.cgi and bulk_pkg_increment_bill.cgi
+# and misc/process/
+# with shitty results (bulk doing things to wrong packages) if you don't update
+# those too :/
$search_hash{'query'} = $cgi->keywords;
foreach my $field (qw( setup last_bill bill adjourn susp expire contract_end change_date cancel active )) {
+ $search_hash{$field.'_null'} = scalar( $cgi->param($field.'_null') );
+
my($beginning, $ending) = FS::UI::Web::parse_beginning_ending($cgi, $field);
next if $beginning == 0 && $ending == 4294967295