projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
This commit was generated by cvs2svn to compensate for changes in r12472,
[freeside.git]
/
httemplate
/
search
/
report_cust_pkg_discount.html
diff --git
a/httemplate/search/report_cust_pkg_discount.html
b/httemplate/search/report_cust_pkg_discount.html
index
7ebd44f
..
31774c3
100644
(file)
--- a/
httemplate/search/report_cust_pkg_discount.html
+++ b/
httemplate/search/report_cust_pkg_discount.html
@@
-16,9
+16,9
@@
</TD>
</TR>
</TD>
</TR>
- <% include( '/elements/tr-select-
otak
er.html',
- 'label' => 'Discounts by employee: ',
- '
otakers' => \@otakers
,
+ <% include( '/elements/tr-select-
us
er.html',
+ 'label'
=> 'Discounts by employee: ',
+ '
access_user' => \%access_user
,
)
%>
)
%>
@@
-42,9
+42,12
@@
die "access denied"
unless $FS::CurrentUser::CurrentUser->access_right('Financial reports');
die "access denied"
unless $FS::CurrentUser::CurrentUser->access_right('Financial reports');
-my $sth = dbh->prepare("SELECT DISTINCT
otaker
FROM cust_pkg_discount")
+my $sth = dbh->prepare("SELECT DISTINCT
usernum
FROM cust_pkg_discount")
or die dbh->errstr;
$sth->execute or die $sth->errstr;
or die dbh->errstr;
$sth->execute or die $sth->errstr;
-my @otakers = map { $_->[0] } @{$sth->fetchall_arrayref};
+my @usernum = map $_->[0], @{$sth->fetchall_arrayref};
+my %access_user =
+ map { $_ => qsearchs('access_user',{'usernum'=>$_})->username }
+ @usernum;
</%init>
</%init>