diff --git a/scripts/count-dons.pl b/scripts/count-dons.pl index 5e13d72ec35..cb7391f1e0f 100755 --- a/scripts/count-dons.pl +++ b/scripts/count-dons.pl @@ -21,9 +21,10 @@ # use DBI; -my $dbh = DBI->connect($ARGV[1]) || die $DBI::errstr ; +my $dbh = DBI->connect($ARGV[2]) || die $DBI::errstr ; -my $sql = 'SELECT sum(amount) FROM llx_don WHERE fk_statut = ' .$ARGV[0]; +my $sql = 'SELECT sum(amount) FROM llx_don'; +$sql .= ' WHERE fk_statut = ' .$ARGV[1].' AND fk_don_projet = '.$ARGV[0]; my $sth = $dbh->prepare("$sql") || die $dbh->errstr ; $sth->execute;