[Koha-cvs] CVS: koha/C4 Stats.pm,1.20,1.21
Mason James
szrj1m at users.sourceforge.net
Mon Aug 22 03:05:57 CEST 2005
Update of /cvsroot/koha/koha/C4
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv14704
Modified Files:
Stats.pm
Log Message:
&getcredits now returning 'BAY' and 'WORK' type credits too.
Index: Stats.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Stats.pm,v
retrieving revision 1.20
retrieving revision 1.21
diff -C2 -r1.20 -r1.21
*** Stats.pm 19 Aug 2005 00:38:33 -0000 1.20
--- Stats.pm 22 Aug 2005 01:05:49 -0000 1.21
***************
*** 179,186 ****
my $timestamp2 = $x.$y.$z.$padding;
! my $sth;
!
! $sth=$dbh->prepare("Select * from accountlines where (accounttype = 'CR' or accounttype = 'LR') and timestamp >=? and timestamp <?");
! $sth->execute($timestamp,$timestamp2);
my $i=0;
--- 179,186 ----
my $timestamp2 = $x.$y.$z.$padding;
! my $sth=$dbh->prepare("Select * from accountlines,borrowers where (((accounttype = 'LR') or (accounttype <> 'Pay'))
! and amount < 0 and accountlines.borrowernumber = borrowers.borrowernumber
! and timestamp >=? and timestamp <?)");
! $sth->execute($timestamp, $timestamp2);
my $i=0;
More information about the Koha-cvs
mailing list