diff options
| author | Ivan Kohler <ivan@freeside.biz> | 2012-07-03 03:05:10 -0700 |
|---|---|---|
| committer | Ivan Kohler <ivan@freeside.biz> | 2012-07-03 03:05:10 -0700 |
| commit | 64948ee373a03fa156ebc89cb39adfa6d4d2c3d5 (patch) | |
| tree | 73083b24d7ad9a8fe8de404ef071ea5a3b6fc5f6 /httemplate/search/cust_bill_pay.html | |
| parent | f619b706a2b375b5ef29fa3664eb3da90bb90ef5 (diff) | |
add advertising source to sales/credits/receipts summary, RT#18349
Diffstat (limited to 'httemplate/search/cust_bill_pay.html')
| -rw-r--r-- | httemplate/search/cust_bill_pay.html | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/httemplate/search/cust_bill_pay.html b/httemplate/search/cust_bill_pay.html index 1fc8ffd78..22e9a6795 100644 --- a/httemplate/search/cust_bill_pay.html +++ b/httemplate/search/cust_bill_pay.html @@ -92,6 +92,13 @@ if ( $cgi->param('agentnum') && $cgi->param('agentnum') =~ /^(\d+)$/ ) { $title = $agent->agent. " $title"; } +if ( $cgi->param('refnum') && $cgi->param('refnum') =~ /^(\d+)$/ ) { + push @search, "refnum = $1"; + my $part_referral = qsearchs('part_referral', { 'refnum' => $1 } ); + die "unknown refnum $1" unless $part_referral; + $title = $part_referral->referral. " $title"; +} + my($beginning, $ending) = FS::UI::Web::parse_beginning_ending($cgi); push @search, "cust_bill._date >= $beginning ", "cust_bill._date <= $ending"; |