Lines 15-21
use CGI qw ( -utf8 );
Link Here
|
15 |
use C4::SIP::ILS::Transaction; |
15 |
use C4::SIP::ILS::Transaction; |
16 |
|
16 |
|
17 |
use C4::Context; |
17 |
use C4::Context; |
18 |
use C4::Circulation qw( AddIssue GetIssuingCharges CanBookBeIssued ); |
18 |
use C4::Circulation qw( AddIssue GetIssuingCharges CanBookBeIssued ProcessOfflineIssue ); |
19 |
use C4::Members; |
19 |
use C4::Members; |
20 |
use Koha::DateUtils qw( dt_from_string ); |
20 |
use Koha::DateUtils qw( dt_from_string ); |
21 |
|
21 |
|
Lines 127-145
sub do_checkout {
Link Here
|
127 |
} |
127 |
} |
128 |
} |
128 |
} |
129 |
|
129 |
|
130 |
if ( $no_block_due_date ) { |
130 |
if ( $noerror == 0 && !$no_block_due_date ) { |
131 |
$overridden_duedate = $no_block_due_date; |
|
|
132 |
$noerror = 1; |
133 |
} |
134 |
|
135 |
unless ($noerror) { |
136 |
$self->ok(0); |
131 |
$self->ok(0); |
137 |
return $self; |
132 |
return $self; |
138 |
} |
133 |
} |
139 |
|
134 |
|
140 |
# can issue |
135 |
if ( $no_block_due_date ) { |
141 |
my $issue = AddIssue( $patron->unblessed, $barcode, $overridden_duedate, 0 ); |
136 |
$overridden_duedate = $no_block_due_date; |
142 |
$self->{due} = $self->duedatefromissue($issue, $itemnumber); |
137 |
ProcessOfflineIssue({ |
|
|
138 |
cardnumber => $patron->cardnumber, |
139 |
barcode => $barcode, |
140 |
timestamp => $no_block_due_date, |
141 |
}); |
142 |
} else { |
143 |
# can issue |
144 |
my $issue = AddIssue( $patron->unblessed, $barcode, $overridden_duedate, 0 ); |
145 |
$self->{due} = $self->duedatefromissue($issue, $itemnumber); |
146 |
} |
143 |
|
147 |
|
144 |
$self->ok(1); |
148 |
$self->ok(1); |
145 |
return $self; |
149 |
return $self; |
146 |
- |
|
|