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

(-)a/C4/Circulation.pm (-17 / +2 lines)
Lines 1976-1983 sub AddReturn { Link Here
1976
    # this is always done regardless of whether the item was on loan or not
1976
    # this is always done regardless of whether the item was on loan or not
1977
    my $item_holding_branch = $item->holdingbranch;
1977
    my $item_holding_branch = $item->holdingbranch;
1978
    if ($item->holdingbranch ne $branch) {
1978
    if ($item->holdingbranch ne $branch) {
1979
        UpdateHoldingbranch($branch, $item->itemnumber);
1979
        $item->holdingbranch($branch)->store;
1980
        $item->holdingbranch($branch); # update item data holdingbranch too # FIXME I guess this is for the _debar_user_on_return call later
1981
    }
1980
    }
1982
1981
1983
    my $leave_item_lost = C4::Context->preference("BlockReturnOfLostItems") ? 1 : 0;
1982
    my $leave_item_lost = C4::Context->preference("BlockReturnOfLostItems") ? 1 : 0;
Lines 3477-3496 sub updateWrongTransfer { Link Here
3477
	ModItemTransfer($itemNumber, $FromLibrary, $waitingAtLibrary);
3476
	ModItemTransfer($itemNumber, $FromLibrary, $waitingAtLibrary);
3478
3477
3479
#third step changing holdingbranch of item
3478
#third step changing holdingbranch of item
3480
	UpdateHoldingbranch($FromLibrary,$itemNumber);
3479
    my $item = Koha::Items->find($itemNumber)->holdingbranch($FromLibrary)->store;
3481
}
3482
3483
=head2 UpdateHoldingbranch
3484
3485
  $items = UpdateHoldingbranch($branch,$itmenumber);
3486
3487
Simple methode for updating hodlingbranch in items BDD line
3488
3489
=cut
3490
3491
sub UpdateHoldingbranch {
3492
	my ( $branch,$itemnumber ) = @_;
3493
    ModItem({ holdingbranch => $branch }, undef, $itemnumber);
3494
}
3480
}
3495
3481
3496
=head2 CalcDateDue
3482
=head2 CalcDateDue
3497
- 

Return to bug 23463