projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
support importing charges by agent_custid
[freeside.git]
/
httemplate
/
search
/
report_cust_credit.html
diff --git
a/httemplate/search/report_cust_credit.html
b/httemplate/search/report_cust_credit.html
index
9c719b7
..
c7e5522
100644
(file)
--- a/
httemplate/search/report_cust_credit.html
+++ b/
httemplate/search/report_cust_credit.html
@@
-5,9
+5,9
@@
<TABLE>
<TABLE>
- <% include( '/elements/tr-select-
otak
er.html',
- 'label' => 'Credits by employee: ',
- '
otakers' => \@otakers
,
+ <% include( '/elements/tr-select-
us
er.html',
+ 'label'
=> 'Credits by employee: ',
+ '
access_user' => \%access_user
,
)
%>
)
%>
@@
-40,9
+40,13
@@
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_credit")
+my $sth = dbh->prepare("SELECT DISTINCT
usernum
FROM cust_credit")
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>