From d00fe12988678c0e05c8a3613338506038142416 Mon Sep 17 00:00:00 2001 From: szrj1m Date: Tue, 23 Aug 2005 22:03:09 +0000 Subject: [PATCH] Tidy up. --- stats.screen.pl | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) diff --git a/stats.screen.pl b/stats.screen.pl index 471ce2f6f3..ac430563f4 100755 --- a/stats.screen.pl +++ b/stats.screen.pl @@ -18,7 +18,7 @@ my ($template, $loggedinuser, $cookie) = get_template_and_user({template_name => "stats.screen.tmpl", query => $input, type => "intranet", - authnotrequired => , + authnotrequired => 0, flagsrequired => {borrowers => 1}, debug => 1, }); @@ -51,6 +51,8 @@ if ($time=~ /\//){ my $date=UnixDate($date,'%Y-%m-%d'); my $date2=UnixDate($date2,'%Y-%m-%d'); +#warn "MASON: DATE: $date, $date2"; + #get a list of every payment my @payments=TotalPaid($date,$date2); @@ -62,6 +64,9 @@ my $totalcharges=0; my $totalcredits=0; my $totalpaid=0; my $totalwritten=0; +my @loop1; +my @loop2; + # lets get a a list of all individual item charges paid for by that payment while ($i<$count ){ -- 2.39.5