diff --git a/admin/aqbudget.pl b/admin/aqbudget.pl index 8a9bc118cf..159121982d 100755 --- a/admin/aqbudget.pl +++ b/admin/aqbudget.pl @@ -67,7 +67,9 @@ if ($op eq 'add_form') { my $data; if ($bookfundid) { my $dbh = &C4Connect; - my $sth=$dbh->prepare("select bookfundid,startdate,enddate,budgetamount,bookfundname from aqbudget,aqbookfund where aqbudget.bookfundid=aqbookfund.bookfundid and bookfundid='$bookfundid'"); + my $query="select aqbookfund.bookfundid,startdate,enddate,budgetamount,bookfundname from aqbudget,aqbookfund where aqbudget.bookfundid=aqbookfund.bookfundid and aqbookfund.bookfundid='$bookfundid'"; +# print $query; + my $sth=$dbh->prepare($query); $sth->execute; $data=$sth->fetchrow_hashref; $sth->finish; @@ -139,6 +141,7 @@ printend print "
| Book fund | $bookfundid |
| Book fund | $data->{'bookfundname'} |
| Book fund |