View | Details | Raw Unified | Return to bug 23463
Collapse All | Expand All

(-)a/C4/Circulation.pm (-17 / +2 lines)
Lines 1991-1998 sub AddReturn { Link Here
1991
    # this is always done regardless of whether the item was on loan or not
1991
    # this is always done regardless of whether the item was on loan or not
1992
    my $item_holding_branch = $item->holdingbranch;
1992
    my $item_holding_branch = $item->holdingbranch;
1993
    if ($item->holdingbranch ne $branch) {
1993
    if ($item->holdingbranch ne $branch) {
1994
        UpdateHoldingbranch($branch, $item->itemnumber);
1994
        $item->holdingbranch($branch)->store;
1995
        $item->holdingbranch($branch); # update item data holdingbranch too # FIXME I guess this is for the _debar_user_on_return call later
1996
    }
1995
    }
1997
1996
1998
    my $leave_item_lost = C4::Context->preference("BlockReturnOfLostItems") ? 1 : 0;
1997
    my $leave_item_lost = C4::Context->preference("BlockReturnOfLostItems") ? 1 : 0;
Lines 3560-3579 sub updateWrongTransfer { Link Here
3560
	ModItemTransfer($itemNumber, $FromLibrary, $waitingAtLibrary);
3559
	ModItemTransfer($itemNumber, $FromLibrary, $waitingAtLibrary);
3561
3560
3562
#third step changing holdingbranch of item
3561
#third step changing holdingbranch of item
3563
	UpdateHoldingbranch($FromLibrary,$itemNumber);
3562
    my $item = Koha::Items->find($itemNumber)->holdingbranch($FromLibrary)->store;
3564
}
3565
3566
=head2 UpdateHoldingbranch
3567
3568
  $items = UpdateHoldingbranch($branch,$itmenumber);
3569
3570
Simple methode for updating hodlingbranch in items BDD line
3571
3572
=cut
3573
3574
sub UpdateHoldingbranch {
3575
	my ( $branch,$itemnumber ) = @_;
3576
    ModItem({ holdingbranch => $branch }, undef, $itemnumber);
3577
}
3563
}
3578
3564
3579
=head2 CalcDateDue
3565
=head2 CalcDateDue
3580
- 

Return to bug 23463