Bug 19454: (follow-up) Add a total line when updating
Test plan: [1] Run the script with -doit and -cat [some_category] and verify that the printed total is correct. Signed-off-by: Marcel de Rooy <m.de.rooy@rijksmuseum.nl> Signed-off-by: Charles Farmer <charles.farmer@inLibro.com> Signed-off-by: Katrin Fischer <katrin.fischer.83@web.de> Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
This commit is contained in:
parent
d2610f39c7
commit
906c9166a7
1 changed files with 3 additions and 0 deletions
|
@ -60,6 +60,7 @@ WHERE bo.dateenrolled >= ?|;
|
||||||
$sql .= " AND categorycode = ?" if $category;
|
$sql .= " AND categorycode = ?" if $category;
|
||||||
my $sth = $dbh->prepare($sql);
|
my $sth = $dbh->prepare($sql);
|
||||||
$sth->execute($since, $category || () );
|
$sth->execute($since, $category || () );
|
||||||
|
my $cnt = 0;
|
||||||
while ( my ($borrowernumber, $categorycode) = $sth->fetchrow ) {
|
while ( my ($borrowernumber, $categorycode) = $sth->fetchrow ) {
|
||||||
print "$borrowernumber: $categorycode\n";
|
print "$borrowernumber: $categorycode\n";
|
||||||
next unless $doit;
|
next unless $doit;
|
||||||
|
@ -67,8 +68,10 @@ WHERE bo.dateenrolled >= ?|;
|
||||||
borrowernumber => $borrowernumber,
|
borrowernumber => $borrowernumber,
|
||||||
categorycode => $categorycode,
|
categorycode => $categorycode,
|
||||||
} );
|
} );
|
||||||
|
$cnt++;
|
||||||
}
|
}
|
||||||
$dbh->commit();
|
$dbh->commit();
|
||||||
|
print "Total borrowers updated: $cnt\n" if $doit;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
|
|
Loading…
Reference in a new issue