projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
add action to discount the referring customer's package, RT#20143
[freeside.git]
/
httemplate
/
search
/
cust_credit.html
diff --git
a/httemplate/search/cust_credit.html
b/httemplate/search/cust_credit.html
index
38f0349
..
d1f41df
100755
(executable)
--- a/
httemplate/search/cust_credit.html
+++ b/
httemplate/search/cust_credit.html
@@
-103,6
+103,12
@@
if ( $cgi->param('refnum') && $cgi->param('refnum') =~ /^(\d+)$/ ) {
$title = $part_referral->referral. " $title";
}
$title = $part_referral->referral. " $title";
}
+if ( $cgi->param('cust_classnum') ) {
+ my @classnums = grep /^\d+$/, $cgi->param('cust_classnum');
+ push @search, 'cust_main.classnum IN('.join(',',@classnums).')'
+ if @classnums;
+}
+
if ( $unapplied ) {
push @search, FS::cust_credit->unapplied_sql . ' > 0';
}
if ( $unapplied ) {
push @search, FS::cust_credit->unapplied_sql . ' > 0';
}
@@
-131,7
+137,7
@@
my $where = 'WHERE '. join(' AND ', @search);
my $count_query = 'SELECT COUNT(*), SUM(amount) ';
$count_query .= ', SUM(' . FS::cust_credit->unapplied_sql . ') ' if $unapplied;
my $count_query = 'SELECT COUNT(*), SUM(amount) ';
$count_query .= ', SUM(' . FS::cust_credit->unapplied_sql . ') ' if $unapplied;
-$count_query .= 'FROM cust_credit
LEFT JOIN cust_main USING ( custnum ) '
.
+$count_query .= 'FROM cust_credit
'. FS::UI::Web::join_cust_main('cust_credit')
.
$where;
my @count_addl = ( $money_char.'%.2f total credited (gross)' );
$where;
my @count_addl = ( $money_char.'%.2f total credited (gross)' );
@@
-142,7
+148,7
@@
my $sql_query = {
'select' => join(', ',@select),
'hashref' => {},
'extra_sql' => $where,
'select' => join(', ',@select),
'hashref' => {},
'extra_sql' => $where,
- 'addl_from' =>
'LEFT JOIN cust_main USING ( custnum )',
+ 'addl_from' =>
FS::UI::Web::join_cust_main('cust_credit')
};
</%init>
};
</%init>