summaryrefslogtreecommitdiff
path: root/FS/FS/cust_pkg/Search.pm
diff options
context:
space:
mode:
Diffstat (limited to 'FS/FS/cust_pkg/Search.pm')
-rw-r--r--FS/FS/cust_pkg/Search.pm15
1 files changed, 15 insertions, 0 deletions
diff --git a/FS/FS/cust_pkg/Search.pm b/FS/FS/cust_pkg/Search.pm
index 77196568b..9cd1ff063 100644
--- a/FS/FS/cust_pkg/Search.pm
+++ b/FS/FS/cust_pkg/Search.pm
@@ -281,6 +281,21 @@ sub search {
}
###
+ # parse refnum (advertising source)
+ ###
+
+ if ( exists($params->{'refnum'}) ) {
+ my @refnum;
+ if (ref $params->{'refnum'}) {
+ @refnum = @{ $params->{'refnum'} };
+ } else {
+ @refnum = ( $params->{'refnum'} );
+ }
+ my $in = join(',', grep /^\d+$/, @refnum);
+ push @where, "refnum IN($in)" if length $in;
+ }
+
+ ###
# parse package report options
###