getting titles displaying with charges

This commit is contained in:
chris 2000-01-12 23:12:02 +00:00
parent 0f7c417275
commit 3c0f4d929a

View file

@ -788,9 +788,11 @@ sub getboracctrecord {
my $dbh=C4Connect; my $dbh=C4Connect;
my @acctlines; my @acctlines;
my $numlines; my $numlines;
my $query = "Select * from accountlines my $query = "Select * from accountlines,items,biblio
where borrowernumber = $params->{'borrowernumber'} where (borrowernumber = $params->{'borrowernumber'}) and
order by date desc"; ((accountlines.itemnumber=items.itemnumber and
items.biblionumber=biblio.biblionumber))
order by date desc";
my $sth=$dbh->prepare($query); my $sth=$dbh->prepare($query);
# print $query; # print $query;
$sth->execute; $sth->execute;