Kumara - predecessor to Koha
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

21 lines
447 B

use strict;
use C4::Database;
my $dbh=C4Connect;
my $count=0;
my $query="Select * from biblioitems where itemtype='REF' or itemtype='TREF'";
my $sth=$dbh->prepare($query);
while (my $data=$sth->fetchrow_hashref){
$query="update items set notforloan=1 where biblioitemnumber='$data->{'biblioitemnumber'}'";
my $sth2=$dbh->prepare($query);