From 6946649d064ff58c32c8139367680597a63a5d4e Mon Sep 17 00:00:00 2001 From: Dobrica Pavlinusic Date: Thu, 21 May 2015 12:51:14 +0200 Subject: [PATCH] use also MKP homebranch --- mkp-marc.pl | 3 +++ 1 file changed, 3 insertions(+) diff --git a/mkp-marc.pl b/mkp-marc.pl index 286b9eb..2d414d3 100755 --- a/mkp-marc.pl +++ b/mkp-marc.pl @@ -18,6 +18,7 @@ from items join biblioitems using (biblionumber) join biblio using (biblionumber) where location = 'MKP' + or homebranch = 'MKP' limit $limit }; @@ -34,6 +35,8 @@ warn "# sql $sql"; my $sth = $dbh->prepare( $sql ); $sth->execute(); +warn "# ", $sth->rows,"\n"; + my $i = 1; while ( my $row = $sth->fetchrow_hashref ) { -- 2.20.1