[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] CVS: koha/C4 Biblio.pm,1.84,1.85
From: |
Paul POULAIN |
Subject: |
[Koha-cvs] CVS: koha/C4 Biblio.pm,1.84,1.85 |
Date: |
Fri, 02 Apr 2004 06:55:52 -0800 |
Update of /cvsroot/koha/koha/C4
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv4402/C4
Modified Files:
Biblio.pm
Log Message:
renaming items.bulk field to items.itemcallnumber.
Will be used to store call number for libraries that don't use dewey
classification.
Note it's related to ITEMS, not biblio.
Index: Biblio.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Biblio.pm,v
retrieving revision 1.84
retrieving revision 1.85
diff -C2 -r1.84 -r1.85
*** Biblio.pm 24 Mar 2004 17:18:30 -0000 1.84
--- Biblio.pm 2 Apr 2004 14:55:48 -0000 1.85
***************
*** 766,770 ****
my $sth2=$dbh->prepare("SELECT
itemnumber,biblionumber,multivolumepart,biblioitemnumber,barcode,dateaccessioned,
booksellerid,homebranch,price,replacementprice,replacementpricedate,datelastborrowed,
!
datelastseen,multivolume,stack,notforloan,itemlost,wthdrawn,bulk,issues,renewals,
reserves,restricted,binding,itemnotes,holdingbranch,timestamp
FROM items
--- 766,770 ----
my $sth2=$dbh->prepare("SELECT
itemnumber,biblionumber,multivolumepart,biblioitemnumber,barcode,dateaccessioned,
booksellerid,homebranch,price,replacementprice,replacementpricedate,datelastborrowed,
!
datelastseen,multivolume,stack,notforloan,itemlost,wthdrawn,itemcallnumber,issues,renewals,
reserves,restricted,binding,itemnotes,holdingbranch,timestamp
FROM items
***************
*** 1437,1441 ****
price =
?, replacementprice = ?,
replacementpricedate =
NOW(), itemnotes = ?,
! bulk =?,
notforloan = ?
");
$sth->execute($itemnumber, $item->{'biblionumber'},
--- 1437,1441 ----
price =
?, replacementprice = ?,
replacementpricedate =
NOW(), itemnotes = ?,
! itemcallnumber =?,
notforloan = ?
");
$sth->execute($itemnumber, $item->{'biblionumber'},
***************
*** 1444,1448 ****
$item->{'homebranch'},$item->{'holdingbranch'},
$item->{'price'},$item->{'replacementprice'},
!
$item->{'itemnotes'},$item->{'bulk'},$item->{'notforloan'});
} else {
$sth=$dbh->prepare("Insert into items set
--- 1444,1448 ----
$item->{'homebranch'},$item->{'holdingbranch'},
$item->{'price'},$item->{'replacementprice'},
!
$item->{'itemnotes'},$item->{'itemcallnumber'},$item->{'notforloan'});
} else {
$sth=$dbh->prepare("Insert into items set
***************
*** 1453,1457 ****
price =
?, replacementprice = ?,
replacementpricedate =
NOW(), itemnotes = ?,
! bulk = ? , notforloan =
?
");
$sth->execute($itemnumber, $item->{'biblionumber'},
--- 1453,1457 ----
price =
?, replacementprice = ?,
replacementpricedate =
NOW(), itemnotes = ?,
! itemcallnumber = ? ,
notforloan = ?
");
$sth->execute($itemnumber, $item->{'biblionumber'},
***************
*** 1460,1464 ****
$item->{'homebranch'},$item->{'holdingbranch'},
$item->{'price'},$item->{'replacementprice'},
!
$item->{'itemnotes'},$item->{'bulk'},$item->{'notforloan'});
}
if (defined $sth->errstr) {
--- 1460,1464 ----
$item->{'homebranch'},$item->{'holdingbranch'},
$item->{'price'},$item->{'replacementprice'},
!
$item->{'itemnotes'},$item->{'itemcallnumber'},$item->{'notforloan'});
}
if (defined $sth->errstr) {
***************
*** 1474,1479 ****
# my $dbh=C4Connect;
$item->{'itemnum'}=$item->{'itemnumber'} unless $item->{'itemnum'};
! my $query="update items set barcode=?,itemnotes=?,bulk=?,notforloan=?
where itemnumber=?";
! my @bind =
($item->{'barcode'},$item->{'notes'},$item->{'bulk'},$item->{'notforloan'},$item->{'itemnum'});
if ($item->{'barcode'} eq ''){
$item->{'notforloan'}=0 unless $item->{'notforloan'};
--- 1474,1479 ----
# my $dbh=C4Connect;
$item->{'itemnum'}=$item->{'itemnumber'} unless $item->{'itemnum'};
! my $query="update items set
barcode=?,itemnotes=?,itemcallnumber=?,notforloan=? where itemnumber=?";
! my @bind =
($item->{'barcode'},$item->{'notes'},$item->{'itemcallnumber'},$item->{'notforloan'},$item->{'itemnum'});
if ($item->{'barcode'} eq ''){
$item->{'notforloan'}=0 unless $item->{'notforloan'};
***************
*** 1488,1495 ****
itemlost=?,
wthdrawn=?,
! bulk=?,
! notforloan=?
where itemnumber=?";
! @bind =
($item->{'bibitemnum'},$item->{'barcode'},$item->{'notes'},$item->{'homebranch'},$item->{'lost'},$item->{'wthdrawn'},$item->{'bulk'},$item->{'notforloan'},$item->{'itemnum'});
}
if ($item->{'replacement'} ne ''){
--- 1488,1495 ----
itemlost=?,
wthdrawn=?,
! itemcallnumber=?,
! notforloan=?,
where itemnumber=?";
! @bind =
($item->{'bibitemnum'},$item->{'barcode'},$item->{'notes'},$item->{'homebranch'},$item->{'lost'},$item->{'wthdrawn'},$item->{'itemcallnumber'},$item->{'notforloan'},$item->{'itemnum'});
}
if ($item->{'replacement'} ne ''){
***************
*** 2195,2198 ****
--- 2195,2203 ----
# $Id$
# $Log$
+ # Revision 1.85 2004/04/02 14:55:48 tipaul
+ # renaming items.bulk field to items.itemcallnumber.
+ # Will be used to store call number for libraries that don't use dewey
classification.
+ # Note it's related to ITEMS, not biblio.
+ #
# Revision 1.84 2004/03/24 17:18:30 joshferraro
# Fixes bug 749 by removing the comma on line 1488.
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Koha-cvs] CVS: koha/C4 Biblio.pm,1.84,1.85,
Paul POULAIN <=
- Prev by Date:
[Koha-cvs] CVS: koha/C4/Circulation Circ2.pm,1.70,1.71
- Next by Date:
[Koha-cvs] CVS: koha/koha-tmpl/intranet-tmpl/default/en/catalogue detailprint.tmpl,1.2,1.3 detail.tmpl,1.11,1.12
- Previous by thread:
[Koha-cvs] CVS: koha/C4/Circulation Circ2.pm,1.70,1.71
- Next by thread:
[Koha-cvs] CVS: koha/koha-tmpl/intranet-tmpl/default/en/catalogue detailprint.tmpl,1.2,1.3 detail.tmpl,1.11,1.12
- Index(es):