Lines 201-207
sub checkin {
Link Here
|
201 |
|
201 |
|
202 |
my $checked_in_ok = $account->{checked_in_ok}; |
202 |
my $checked_in_ok = $account->{checked_in_ok}; |
203 |
my $cv_triggers_alert = $account->{cv_triggers_alert}; |
203 |
my $cv_triggers_alert = $account->{cv_triggers_alert}; |
204 |
my $no_holds_checkin = $account->{no_holds_checkin}; |
204 |
my $holds_block_checkin = $account->{holds_block_checkin}; |
205 |
|
205 |
|
206 |
my ( $patron, $item, $circ ); |
206 |
my ( $patron, $item, $circ ); |
207 |
|
207 |
|
Lines 225-231
sub checkin {
Link Here
|
225 |
if ( !$circ->ok && $circ->alert_type && $circ->alert_type == 98 ) { # data corruption |
225 |
if ( !$circ->ok && $circ->alert_type && $circ->alert_type == 98 ) { # data corruption |
226 |
$circ->screen_msg("Checkin failed: data problem"); |
226 |
$circ->screen_msg("Checkin failed: data problem"); |
227 |
siplog( "LOG_WARNING", "Problem with issue_id in issues and old_issues; check the about page" ); |
227 |
siplog( "LOG_WARNING", "Problem with issue_id in issues and old_issues; check the about page" ); |
228 |
} elsif ( $data->{messages}->{ResFound} && !$circ->ok && $no_holds_checkin ) { |
228 |
} elsif ( $data->{messages}->{ResFound} && !$circ->ok && $holds_block_checkin ) { |
229 |
$circ->screen_msg("Item is on hold, please return to circulation desk"); |
229 |
$circ->screen_msg("Item is on hold, please return to circulation desk"); |
230 |
siplog ("LOG_DEBUG", "C4::SIP::ILS::Checkin - item withdrawn"); |
230 |
siplog ("LOG_DEBUG", "C4::SIP::ILS::Checkin - item withdrawn"); |
231 |
} elsif ( $data->{messages}->{withdrawn} && !$circ->ok && C4::Context->preference("BlockReturnOfWithdrawnItems") ) { |
231 |
} elsif ( $data->{messages}->{withdrawn} && !$circ->ok && C4::Context->preference("BlockReturnOfWithdrawnItems") ) { |