|
Lines 108-114
BEGIN {
Link Here
|
| 108 |
TooMany |
108 |
TooMany |
| 109 |
GetTransfers |
109 |
GetTransfers |
| 110 |
GetTransfersFromTo |
110 |
GetTransfersFromTo |
| 111 |
updateWrongTransfer |
|
|
| 112 |
CalcDateDue |
111 |
CalcDateDue |
| 113 |
CheckValidBarcode |
112 |
CheckValidBarcode |
| 114 |
IsBranchTransferAllowed |
113 |
IsBranchTransferAllowed |
|
Lines 3527-3548
sub SendCirculationAlert {
Link Here
|
| 3527 |
return; |
3526 |
return; |
| 3528 |
} |
3527 |
} |
| 3529 |
|
3528 |
|
| 3530 |
=head2 updateWrongTransfer |
|
|
| 3531 |
|
| 3532 |
$items = updateWrongTransfer($itemNumber,$borrowernumber,$waitingAtLibrary,$FromLibrary); |
| 3533 |
|
| 3534 |
This function validate the line of brachtransfer but with the wrong destination (mistake from a librarian ...), and create a new line in branchtransfer from the actual library to the original library of reservation |
| 3535 |
|
| 3536 |
=cut |
| 3537 |
|
| 3538 |
sub updateWrongTransfer { |
| 3539 |
my ( $itemNumber,$waitingAtLibrary,$FromLibrary ) = @_; |
| 3540 |
|
| 3541 |
my $transfer = Koha::Items->find($itemNumber)->get_transfer; |
| 3542 |
my $new_transfer = $transfer->remedy(); |
| 3543 |
return $new_transfer; |
| 3544 |
} |
| 3545 |
|
| 3546 |
=head2 CalcDateDue |
3529 |
=head2 CalcDateDue |
| 3547 |
|
3530 |
|
| 3548 |
$newdatedue = CalcDateDue($startdate,$itemtype,$branchcode,$borrower); |
3531 |
$newdatedue = CalcDateDue($startdate,$itemtype,$branchcode,$borrower); |
| 3549 |
- |
|
|