[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] koha/C4/Circulation Circ2.pm [rel_2_2]
From: |
Henri-Damien LAURENT |
Subject: |
[Koha-cvs] koha/C4/Circulation Circ2.pm [rel_2_2] |
Date: |
Tue, 24 Jan 2006 14:57:06 +0000 |
CVSROOT: /cvsroot/koha
Module name: koha
Branch: rel_2_2
Changes by: Henri-Damien LAURENT <address@hidden> 06/01/24 14:57:06
Modified files:
C4/Circulation : Circ2.pm
Log message:
BUG Fixing : Synching MARC base and KohaBase when transfering items to
a branch
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/koha/C4/Circulation/Circ2.pm.diff?only_with_tag=rel_2_2&tr1=1.87.2.11&tr2=1.87.2.12&r1=text&r2=text
Patches:
Index: koha/C4/Circulation/Circ2.pm
diff -u koha/C4/Circulation/Circ2.pm:1.87.2.11
koha/C4/Circulation/Circ2.pm:1.87.2.12
--- koha/C4/Circulation/Circ2.pm:1.87.2.11 Fri Sep 23 09:31:15 2005
+++ koha/C4/Circulation/Circ2.pm Tue Jan 24 14:57:06 2006
@@ -3,7 +3,7 @@
package C4::Circulation::Circ2;
-# $Id: Circ2.pm,v 1.87.2.11 2005/09/23 09:31:15 tipaul Exp $
+# $Id: Circ2.pm,v 1.87.2.12 2006/01/24 14:57:06 hdl Exp $
#package to deal with Returns
#written 3/11/99 by address@hidden
@@ -34,6 +34,7 @@
use C4::Stats;
use C4::Reserves2;
use C4::Koha;
+use C4::Biblio;
use C4::Accounts;
use Date::Manip;
@@ -476,6 +477,14 @@
#actually do the transfer....
if ($dotransfer) {
dotransfer($iteminformation->{'itemnumber'}, $fbr, $tbr);
+ my $dbh= C4::Context->dbh;
+ my ($tagfield,$tagsubfield) =
MARCfind_marc_from_kohafield($dbh,"items.holdingbranch");
+ my $bibid = MARCfind_MARCbibid_from_oldbiblionumber( $dbh,
$iteminformation->{'biblionumber'} );
+ my $marcitem = MARCgetitem($dbh, $bibid,
$iteminformation->{'itemnumber'});
+ if ($marcitem->field($tagfield)){
+ $marcitem->field($tagfield)->update($tagsubfield=>
$tbr);
+
MARCmoditem($dbh,$marcitem,$bibid,$iteminformation->{'itemnumber'});
+ }
$messages->{'WasTransfered'} = 1;
}
return ($dotransfer, $messages, $iteminformation);
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Koha-cvs] koha/C4/Circulation Circ2.pm [rel_2_2],
Henri-Damien LAURENT <=