- my ($amount,$type,$daycounttotal,$daycount)=
- CalcFine($data->[$i], $borrower->{'categorycode'}, $branchcode,undef,undef, $datedue, $today);
+ my ($amount,$type,$daycounttotal)=
+ CalcFine($data->[$i], $borrower->{'categorycode'}, $branchcode, $datedue, $today);