[Koha-cvs] koha/C4 Biblio.pm [dev_week]

[Joshua Ferraro]

CVSROOT:	/sources/koha
Module name:	koha
Branch:		dev_week
Changes by:	Joshua Ferraro <kados>	06/10/03 20:49:56

Modified files:
	C4             : Biblio.pm 

Log message:
	I've changed items.binding to be a flag and linked it to an authorized
	value in the framework -- now there are three statuses that can be set
	from the moredetail.pl screen:
	
	Binding -> items.binding -> authorized_value
	Lost -> items.itemlost -> authorized_value
	Withdrawn -> items.wthdrawn (not yet linked to authorized value)
	
	This commit makes all three of those statues update properly and
	play nicely together.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/C4/Biblio.pm?cvsroot=koha&only_with_tag=dev_week&r1=1.115.2.51.2.34&r2=1.115.2.51.2.35

Patches:
Index: Biblio.pm
===================================================================
RCS file: /sources/koha/koha/C4/Biblio.pm,v
retrieving revision 1.115.2.51.2.34
retrieving revision 1.115.2.51.2.35
diff -u -b -r1.115.2.51.2.34 -r1.115.2.51.2.35
--- Biblio.pm	3 Oct 2006 19:23:34 -0000	1.115.2.51.2.34
+++ Biblio.pm	3 Oct 2006 20:49:56 -0000	1.115.2.51.2.35
@@ -2088,19 +2088,19 @@
 	my ($cutterextra)=itemcalculator($dbh,$item->{'bibitemnum'},$item->{'itemcallnumber'});
 
     my $query = "UPDATE items SET
-barcode=?,itemnotes=?,itemcallnumber=?,notforloan=?,location=?,multivolumepart=?,multivolume=?,stack=?,wthdrawn=?,holdingbranch=?,homebranch=?,cutterextra=?, onloan=?";
+barcode=?,itemnotes=?,itemcallnumber=?,notforloan=?,location=?,multivolumepart=?,multivolume=?,stack=?,wthdrawn=?,holdingbranch=?,homebranch=?,cutterextra=?, onloan=?, binding=?";
 
     my @bind = (
         $item->{'barcode'},			$item->{'notes'},
         $item->{'itemcallnumber'},	$item->{'notforloan'},
         $item->{'location'},		$item->{multivolumepart},
 		$item->{multivolume},		$item->{stack},
-		$item->{wthdrawn},$item->{holdingbranch},$item->{homebranch},$cutterextra,$item->{onloan}
+		$item->{wthdrawn},$item->{holdingbranch},$item->{homebranch},$cutterextra,$item->{onloan},$item->{binding}
     );
     if ( $item->{'lost'} ne '' ) {
         $query = "update items set biblioitemnumber=?,barcode=?,itemnotes=?,homebranch=?,
 							itemlost=?,wthdrawn=?,itemcallnumber=?,notforloan=?,
-				 			location=?,multivolumepart=?,multivolume=?,stack=?,wthdrawn=?,holdingbranch=?,cutterextra=?,onloan=?";
+				 			location=?,multivolumepart=?,multivolume=?,stack=?,wthdrawn=?,holdingbranch=?,cutterextra=?,onloan=?, binding=?";
         @bind = (
             $item->{'bibitemnum'},     $item->{'barcode'},
             $item->{'notes'},          $item->{'homebranch'},
@@ -2108,7 +2108,7 @@
             $item->{'itemcallnumber'}, $item->{'notforloan'},
             $item->{'location'},		$item->{multivolumepart},
 			$item->{multivolume},		$item->{stack},
-			$item->{wthdrawn},$item->{holdingbranch},$cutterextra,$item->{onloan}
+			$item->{wthdrawn},$item->{holdingbranch},$cutterextra,$item->{onloan},$item->{binding}
         );
 #		if ($item->{homebranch}) {
 #			$query.=",homebranch=?";
@@ -2501,10 +2501,8 @@
     my ($item) = @_;
     my $dbh = C4::Context->dbh;
     &_koha_modify_item( $dbh, $item );
-    my $MARCitem =
-      &MARCkoha2marcItem( $dbh, $item->{'biblionumber'}, $item->{'itemnum'} );
-    my $bibid =
-      &MARCfind_MARCbibid_from_oldbiblionumber( $dbh, $item->{biblionumber} );
+    my $MARCitem = &MARCkoha2marcItem( $dbh, $item->{'biblionumber'}, $item->{'itemnum'} );
+    my $bibid = &MARCfind_MARCbibid_from_oldbiblionumber( $dbh, $item->{biblionumber} );
     &MARCmoditem( $dbh, $MARCitem, $bibid, $item->{itemnum}, 0 );
 }
 
@@ -3141,8 +3139,20 @@
 
 =cut
 
-# $Id: Biblio.pm,v 1.115.2.51.2.34 2006/10/03 19:23:34 kados Exp $
+# $Id: Biblio.pm,v 1.115.2.51.2.35 2006/10/03 20:49:56 kados Exp $
 # $Log: Biblio.pm,v $
+# Revision 1.115.2.51.2.35  2006/10/03 20:49:56  kados
+# I've changed items.binding to be a flag and linked it to an authorized
+# value in the framework -- now there are three statuses that can be set
+# from the moredetail.pl screen:
+#
+# Binding -> items.binding -> authorized_value
+# Lost -> items.itemlost -> authorized_value
+# Withdrawn -> items.wthdrawn (not yet linked to authorized value)
+#
+# This commit makes all three of those statues update properly and
+# play nicely together.
+#
 # Revision 1.115.2.51.2.34  2006/10/03 19:23:34  kados
 # had to change back to add_fields because insert_fields_ordered expects
 # a MARC::Field object ... I'll fix this soon.