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

(-)a/C4/SIP/ILS/Transaction/Checkin.pm (-2 / +18 lines)
Lines 16-21 use C4::Debug; Link Here
16
use C4::Items qw( ModItemTransfer );
16
use C4::Items qw( ModItemTransfer );
17
use C4::Reserves qw( ModReserveAffect );
17
use C4::Reserves qw( ModReserveAffect );
18
use Koha::DateUtils qw( dt_from_string );
18
use Koha::DateUtils qw( dt_from_string );
19
use Koha::Items;
19
20
20
use parent qw(C4::SIP::ILS::Transaction);
21
use parent qw(C4::SIP::ILS::Transaction);
21
22
Lines 74-81 sub do_checkin { Link Here
74
        $return_date = dt_from_string($return_date);
75
        $return_date = dt_from_string($return_date);
75
    }
76
    }
76
77
78
    my ( $return, $messages, $issue, $borrower );
79
    my $item = Koha::Items->find( { barcode => $barcode } );
80
    my $human_required = 0;
81
    if (   C4::Context->preference("CircConfirmItemParts")
82
        && defined($item)
83
        && $item->materials )
84
    {
85
        $human_required                   = 1;
86
        $messages->{additional_materials} = 1;
87
    }
88
77
    $debug and warn "do_checkin() calling AddReturn($barcode, $branch)";
89
    $debug and warn "do_checkin() calling AddReturn($barcode, $branch)";
78
    my ($return, $messages, $issue, $borrower) = AddReturn($barcode, $branch, undef, $return_date);
90
    ( $return, $messages, $issue, $borrower ) =
91
      AddReturn( $barcode, $branch, undef, $return_date )
92
      unless $human_required;
79
93
80
    if ( $checked_in_ok ) {
94
    if ( $checked_in_ok ) {
81
        delete $messages->{ItemLocationUpdated};
95
        delete $messages->{ItemLocationUpdated};
Lines 87-92 sub do_checkin { Link Here
87
    # biblionumber, biblioitemnumber, itemnumber
101
    # biblionumber, biblioitemnumber, itemnumber
88
    # borrowernumber, reservedate, branchcode
102
    # borrowernumber, reservedate, branchcode
89
    # cancellationdate, found, reservenotes, priority, timestamp
103
    # cancellationdate, found, reservenotes, priority, timestamp
104
    if ($messages->{additional_materials}) {
105
        $self->alert_type('99');
106
    }
90
    if( $messages->{DataCorrupted} ) {
107
    if( $messages->{DataCorrupted} ) {
91
        $self->alert_type('98');
108
        $self->alert_type('98');
92
    }
109
    }
93
- 

Return to bug 25261