|
|
@ -804,8 +804,8 @@ sub getboracctrecord { |
|
|
|
} |
|
|
|
$sth->finish; |
|
|
|
$query="Select * from accountlines where |
|
|
|
borrowernumber=$params->{'borrowernumber'} and itemnumber is NULL order by |
|
|
|
date desc"; |
|
|
|
borrowernumber=$params->{'borrowernumber'} and itemtype = 'Pay' is NULL order by |
|
|
|
date desc"; |
|
|
|
$sth->execute; |
|
|
|
while (my $data=$sth->fetchrow_hashref){ |
|
|
|
$acctlines[$numlines] = $data; |
|
|
|