diff options
| author | Ivan Kohler <ivan@freeside.biz> | 2012-05-09 15:20:06 -0700 |
|---|---|---|
| committer | Ivan Kohler <ivan@freeside.biz> | 2012-05-09 15:20:06 -0700 |
| commit | 406e97fe228cd249a8bd0fa58cbfbf33ab805f18 (patch) | |
| tree | 5b7c5cba32664a39b4ede883abf024acd1ce431f /FS/FS/part_referral.pm | |
| parent | e090eaa1020ced724f5aa56728f8ce3b35a85220 (diff) | |
disable advertising sources, RT#17638
Diffstat (limited to 'FS/FS/part_referral.pm')
| -rw-r--r-- | FS/FS/part_referral.pm | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/FS/FS/part_referral.pm b/FS/FS/part_referral.pm index c94c57e19..e7dfe067d 100644 --- a/FS/FS/part_referral.pm +++ b/FS/FS/part_referral.pm @@ -163,10 +163,16 @@ simply using rather than editing advertising sources). sub all_part_referral { my $self = shift; + my $global = @_ ? shift : ''; + my $disabled = @_ ? shift : ''; + + my $hashref = $disabled ? {} : { 'disabled' => '' }; + my $and = $disabled ? ' WHERE ' : ' AND '; qsearch({ 'table' => 'part_referral', - 'extra_sql' => ' WHERE '. $self->acl_agentnum_sql(@_). ' ORDER BY refnum ', + 'hashref' => $hashref, + 'extra_sql' => $and. $self->acl_agentnum_sql(@_). ' ORDER BY refnum ', }); } |