Adding startdate and enddate parameters to GetBookfundBreakdown call.
authorhdl <hdl>
Mon, 28 May 2007 15:28:28 +0000 (15:28 +0000)
committerhdl <hdl>
Mon, 28 May 2007 15:28:28 +0000 (15:28 +0000)
acqui/acqui-home.pl

index 2ff1fc8..a2ffe2e 100755 (executable)
@@ -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'};