diff --git a/acqui/acqui-home.pl b/acqui/acqui-home.pl index 2ff1fc88fb..a2ffe2ea61 100755 --- a/acqui/acqui-home.pl +++ b/acqui/acqui-home.pl @@ -78,7 +78,7 @@ my $totavail = 0; my @loop_budget = (); for (my $i=0; $i<$count; $i++){ - my ($spent,$comtd)=GetBookFundBreakdown($results[$i]->{'bookfundid'}); + my ($spent,$comtd)=GetBookFundBreakdown($results[$i]->{'bookfundid'},$results[$i]->{'startdate'},$results[$i]->{'enddate'}); my $avail=$results[$i]->{'budgetamount'}-($spent+$comtd); my %line; $line{bookfundname} = $results[$i]->{'bookfundname'};