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

(-)a/C4/Circulation.pm (-18 lines)
Lines 107-113 BEGIN { Link Here
107
      transferbook
107
      transferbook
108
      TooMany
108
      TooMany
109
      GetTransfersFromTo
109
      GetTransfersFromTo
110
      updateWrongTransfer
111
      CalcDateDue
110
      CalcDateDue
112
      CheckValidBarcode
111
      CheckValidBarcode
113
      IsBranchTransferAllowed
112
      IsBranchTransferAllowed
Lines 3806-3827 sub SendCirculationAlert { Link Here
3806
    return;
3805
    return;
3807
}
3806
}
3808
3807
3809
=head2 updateWrongTransfer
3810
3811
  $items = updateWrongTransfer($itemNumber,$borrowernumber,$waitingAtLibrary,$FromLibrary);
3812
3813
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 
3814
3815
=cut
3816
3817
sub updateWrongTransfer {
3818
	my ( $itemNumber,$waitingAtLibrary,$FromLibrary ) = @_;
3819
3820
    my $transfer = Koha::Items->find($itemNumber)->get_transfer;
3821
    my $new_transfer = $transfer->remedy();
3822
    return $new_transfer;
3823
}
3824
3825
=head2 CalcDateDue
3808
=head2 CalcDateDue
3826
3809
3827
$newdatedue = CalcDateDue($startdate,$itemtype,$branchcode,$borrower);
3810
$newdatedue = CalcDateDue($startdate,$itemtype,$branchcode,$borrower);
3828
- 

Return to bug 28294