X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=FS%2FFS%2Fcust_pkg.pm;h=20e3d449d18a46863fa33042866aa3d201dc7796;hp=44c103f7e70b4c03e52294c2bc2e8f2491832384;hb=b55fb5df35587a35be4c347073364c132970a533;hpb=a9b978f216f2fc4845363f0b48891b53870adefb diff --git a/FS/FS/cust_pkg.pm b/FS/FS/cust_pkg.pm index 44c103f7e..20e3d449d 100644 --- a/FS/FS/cust_pkg.pm +++ b/FS/FS/cust_pkg.pm @@ -2987,6 +2987,7 @@ sub search { } elsif ( @c_where ) { push @where, ' ( '. join(' OR ', @c_where). ' ) '; } + warn $where[-1]; } @@ -2998,11 +2999,13 @@ sub search { ### my @report_option = (); - if ( exists($params->{'report_option'}) - && $params->{'report_option'} =~ /^([,\d]*)$/ - ) - { - @report_option = split(',', $1); + if ( exists($params->{'report_option'}) ) { + if ( ref($params->{'report_option'}) eq 'ARRAY' ) { + @report_option = @{ $params->{'report_option'} }; + } elsif ( $params->{'report_option'} =~ /^([,\d]*)$/ ) { + @report_option = split(',', $1); + } + } if (@report_option) { @@ -3015,7 +3018,26 @@ sub search { } @report_option; } - #eslaf + my @report_option_any = (); + if ( exists($params->{'report_option_any'}) ) { + if ( ref($params->{'report_option_any'}) eq 'ARRAY' ) { + @report_option_any = @{ $params->{'report_option_any'} }; + } elsif ( $params->{'report_option_any'} =~ /^([,\d]*)$/ ) { + @report_option_any = split(',', $1); + } + + } + + if (@report_option_any) { + # this will result in the empty set for the dangling comma case as it should + push @where, ' ( '. join(' OR ', + map{ "0 < ( SELECT count(*) FROM part_pkg_option + WHERE part_pkg_option.pkgpart = part_pkg.pkgpart + AND optionname = 'report_option_$_' + AND optionvalue = '1' )" + } @report_option_any + ). ' ) '; + } ### # parse custom