summaryrefslogtreecommitdiff
path: root/httemplate/search/report_receivables.cgi
diff options
context:
space:
mode:
Diffstat (limited to 'httemplate/search/report_receivables.cgi')
-rwxr-xr-xhttemplate/search/report_receivables.cgi12
1 files changed, 7 insertions, 5 deletions
diff --git a/httemplate/search/report_receivables.cgi b/httemplate/search/report_receivables.cgi
index 7113ad5a7..6b96ba7a5 100755
--- a/httemplate/search/report_receivables.cgi
+++ b/httemplate/search/report_receivables.cgi
@@ -1,18 +1,20 @@
<%
use strict;
-use vars qw( $cgi );
+use vars qw( $cgi $user );
use CGI;
-use CGI::Carp qw(fatalsToBrowser);
-use FS::UID qw(cgisuidsetup);
+use CGI::Carp qw( fatalsToBrowser );
+use FS::UID qw( cgisuidsetup getotaker );
$cgi = new CGI;
&cgisuidsetup($cgi);
+$user = getotaker;
+
print $cgi->header( '-expires' => '-2m' ),
- header('Current Receivables Report Results');
+ header('Current Receivables Report Results');
-open (REPORT, "/usr/bin/freeside-receivables-report -v freeside |");
+open (REPORT, "/usr/bin/freeside-receivables-report -v $user |");
print '<PRE>';
while(<REPORT>) {