|
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 |
- |
|
|