lainwir3d/dolibarr
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

*** empty log message ***

Browse Source
This commit is contained in:
Rodolphe Quiedeville 2002-12-23 01:32:23 +00:00
parent 53d1d50ee0
commit fa4e25c93c
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
scripts/count-dons.pl
View File

@ -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;