[Koha-cvs] CVS: koha/acqui.simple addbooks.pl,1.5.2.1,1.5.2.2

[Steve Tonnesen]

Update of /cvsroot/koha/koha/acqui.simple
In directory usw-pr-cvs1:/tmp/cvs-serv20410

Modified Files:
      Tag: rel-1-2
	addbooks.pl 
Log Message:
Barcodes aren't necessarily numeric


Index: addbooks.pl
===================================================================
RCS file: /cvsroot/koha/koha/acqui.simple/addbooks.pl,v
retrieving revision 1.5.2.1
retrieving revision 1.5.2.2
diff -C2 -r1.5.2.1 -r1.5.2.2
*** addbooks.pl	14 Jun 2002 21:20:27 -0000	1.5.2.1
--- addbooks.pl	25 Jun 2002 23:31:53 -0000	1.5.2.2
***************
*** 270,277 ****
      my $query="insert into items (itemnumber, biblionumber,
      biblioitemnumber,barcode, itemnotes, holdingbranch, homebranch, dateaccessioned, replacementprice) values ($itemnumber,
!     $biblionumber, $biblioitemnumber, $barcode, $q_itemnotes, $q_homebranch, $q_homebranch, '$date', $replacementprice)";
      $sth=$dbh->prepare($query);
      $sth->execute;
! #    print $query;
  }
  
--- 270,277 ----
      my $query="insert into items (itemnumber, biblionumber,
      biblioitemnumber,barcode, itemnotes, holdingbranch, homebranch, dateaccessioned, replacementprice) values ($itemnumber,
!     $biblionumber, $biblioitemnumber, ?, $q_itemnotes, $q_homebranch, $q_homebranch, '$date', $replacementprice)";
      $sth=$dbh->prepare($query);
      $sth->execute;
! #    print $query($barcode);
  }