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

(-)a/C4/Circulation.pm (-17 / +2 lines)
Lines 1975-1982 sub AddReturn { Link Here
1975
    # this is always done regardless of whether the item was on loan or not
1975
    # this is always done regardless of whether the item was on loan or not
1976
    my $item_holding_branch = $item->holdingbranch;
1976
    my $item_holding_branch = $item->holdingbranch;
1977
    if ($item->holdingbranch ne $branch) {
1977
    if ($item->holdingbranch ne $branch) {
1978
        UpdateHoldingbranch($branch, $item->itemnumber);
1978
        $item->holdingbranch($branch)->store;
1979
        $item->holdingbranch($branch); # update item data holdingbranch too # FIXME I guess this is for the _debar_user_on_return call later
1980
    }
1979
    }
1981
1980
1982
    my $leave_item_lost = C4::Context->preference("BlockReturnOfLostItems") ? 1 : 0;
1981
    my $leave_item_lost = C4::Context->preference("BlockReturnOfLostItems") ? 1 : 0;
Lines 3491-3510 sub updateWrongTransfer { Link Here
3491
	ModItemTransfer($itemNumber, $FromLibrary, $waitingAtLibrary);
3490
	ModItemTransfer($itemNumber, $FromLibrary, $waitingAtLibrary);
3492
3491
3493
#third step changing holdingbranch of item
3492
#third step changing holdingbranch of item
3494
	UpdateHoldingbranch($FromLibrary,$itemNumber);
3493
    my $item = Koha::Items->find($itemNumber)->holdingbranch($FromLibrary)->store;
3495
}
3496
3497
=head2 UpdateHoldingbranch
3498
3499
  $items = UpdateHoldingbranch($branch,$itmenumber);
3500
3501
Simple methode for updating hodlingbranch in items BDD line
3502
3503
=cut
3504
3505
sub UpdateHoldingbranch {
3506
	my ( $branch,$itemnumber ) = @_;
3507
    ModItem({ holdingbranch => $branch }, undef, $itemnumber);
3508
}
3494
}
3509
3495
3510
=head2 CalcDateDue
3496
=head2 CalcDateDue
3511
- 

Return to bug 23463