diff options
author | Ivan Kohler <ivan@freeside.biz> | 2016-04-25 09:58:14 -0700 |
---|---|---|
committer | Ivan Kohler <ivan@freeside.biz> | 2016-04-25 09:58:14 -0700 |
commit | 46fe3dbcb3ca97d1f3c70d49351846cf0ab6461d (patch) | |
tree | 58588305290e276ceb9848ffe5f98ebe5b9041f2 /FS/FS/svc_Common.pm | |
parent | cc4caa54e9974ea3d6ac7cf55cf45863d2a8905e (diff) | |
parent | 55447b350a12dc435730bd8ab7ef300991ac4660 (diff) |
Merge branch 'master' of git.freeside.biz:/home/git/freeside
Diffstat (limited to 'FS/FS/svc_Common.pm')
-rw-r--r-- | FS/FS/svc_Common.pm | 16 |
1 files changed, 15 insertions, 1 deletions
diff --git a/FS/FS/svc_Common.pm b/FS/FS/svc_Common.pm index 748bcae..1dd9ffb 100644 --- a/FS/FS/svc_Common.pm +++ b/FS/FS/svc_Common.pm @@ -1387,11 +1387,17 @@ Parameters: =item order_by +=item cancelled - if true, only returns svcs attached to cancelled pkgs; +if defined and false, only returns svcs not attached to cancelled packages + =back =cut -# svc_broadband::search should eventually use this instead +### Don't call the 'cancelled' option 'Service Status' +### There is no such thing +### See cautionary note in httemplate/browse/part_svc.cgi + sub search { my ($class, $params) = @_; @@ -1495,6 +1501,14 @@ sub search { push @where, "exportnum = $1"; } + if ( defined($params->{'cancelled'}) ) { + if ($params->{'cancelled'}) { + push @where, "cust_pkg.cancel IS NOT NULL"; + } else { + push @where, "cust_pkg.cancel IS NULL"; + } + } + # # sector and tower # my @where_sector = $class->tower_sector_sql($params); # if ( @where_sector ) { |