Lines 12-20
use strict;
Link Here
|
12 |
use C4::SIP::ILS::Transaction; |
12 |
use C4::SIP::ILS::Transaction; |
13 |
|
13 |
|
14 |
use C4::Circulation; |
14 |
use C4::Circulation; |
15 |
use C4::Reserves qw( ModReserveAffect ); |
|
|
16 |
use C4::Items qw( ModItemTransfer ); |
17 |
use C4::Debug; |
15 |
use C4::Debug; |
|
|
16 |
use C4::Items qw( ModItemTransfer ); |
17 |
use C4::Reserves qw( ModReserveAffect ); |
18 |
use Koha::DateUtils qw( dt_from_string ); |
18 |
|
19 |
|
19 |
use parent qw(C4::SIP::ILS::Transaction); |
20 |
use parent qw(C4::SIP::ILS::Transaction); |
20 |
|
21 |
|
Lines 67-73
sub do_checkin {
Link Here
|
67 |
. substr( $return_date, 16, 2 ); |
68 |
. substr( $return_date, 16, 2 ); |
68 |
|
69 |
|
69 |
$debug and warn "do_checkin() calling AddReturn($barcode, $branch)"; |
70 |
$debug and warn "do_checkin() calling AddReturn($barcode, $branch)"; |
70 |
my ($return, $messages, $issue, $borrower) = AddReturn($barcode, $branch, undef, $return_date); |
71 |
my ($return, $messages, $issue, $borrower) = AddReturn($barcode, $branch, undef, dt_from_string($return_date)); |
71 |
$self->alert(!$return); |
72 |
$self->alert(!$return); |
72 |
# ignoring messages: NotIssued, WasLost, WasTransfered |
73 |
# ignoring messages: NotIssued, WasLost, WasTransfered |
73 |
|
74 |
|
74 |
- |
|
|