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

(-)a/circ/returns.pl (-5 / +6 lines)
Lines 37-43 use DateTime; Link Here
37
use C4::Auth qw( get_template_and_user get_session haspermission );
37
use C4::Auth qw( get_template_and_user get_session haspermission );
38
use C4::Circulation qw( barcodedecode GetBranchItemRule AddReturn updateWrongTransfer LostItem );
38
use C4::Circulation qw( barcodedecode GetBranchItemRule AddReturn updateWrongTransfer LostItem );
39
use C4::Context;
39
use C4::Context;
40
use C4::Items qw( ModItemTransfer );
41
use C4::Members::Messaging;
40
use C4::Members::Messaging;
42
use C4::Members;
41
use C4::Members;
43
use C4::Output qw( output_html_with_http_headers );
42
use C4::Output qw( output_html_with_http_headers );
Lines 239-250 if ($return_date_override) { Link Here
239
    }
238
    }
240
}
239
}
241
240
241
# If 'needstransfer' was set and the librarian has chosen to initiate the transfer
242
if ($dotransfer){
242
if ($dotransfer){
243
# An item has been returned to a branch other than the homebranch, and the librarian has chosen to initiate a transfer
244
    my $transferitem = $query->param('transferitem');
243
    my $transferitem = $query->param('transferitem');
245
    my $tobranch     = $query->param('tobranch');
244
    my $item = Koha::Items->find( $transferitem );
245
    my $tobranchcode = $query->param('tobranch');
246
    my $tobranch     = Koha::Libraries->find($tobranchcode);
246
    my $trigger      = $query->param('trigger');
247
    my $trigger      = $query->param('trigger');
247
    ModItemTransfer($transferitem, $userenv_branch, $tobranch, $trigger);
248
    my $transfer = $item->request_transfer({ to => $tobranch, reason => $trigger });
249
    $transfer->transit;
248
}
250
}
249
251
250
if ($transit) {
252
if ($transit) {
251
- 

Return to bug 35721