+
+ # cust_bill: handle the ignore_pkgclass option
+ if ( $ignore_pkgclass =~ /^\d+$/ ) {
+ $where .= " AND EXISTS( ".
+ "SELECT 1 FROM cust_bill_pkg JOIN cust_pkg USING (pkgnum) " .
+ "JOIN part_pkg USING (pkgpart) " .
+ "WHERE cust_bill_pkg.invnum = cust_bill.invnum " .
+ "AND COALESCE(part_pkg.classnum, -1) != $ignore_pkgclass" .
+ " )";
+ }
+ #warn "$where\n";
+ return 0 if FS::cust_bill->count($where);
+