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

(-)a/C4/SIP/ILS/Transaction/Checkin.pm (-3 / +2 lines)
Lines 65-71 sub do_checkin { Link Here
65
                   . substr( $return_date, 16, 2 );
65
                   . substr( $return_date, 16, 2 );
66
66
67
    $debug and warn "do_checkin() calling AddReturn($barcode, $branch)";
67
    $debug and warn "do_checkin() calling AddReturn($barcode, $branch)";
68
    my ($return, $messages, $iteminformation, $borrower) = AddReturn($barcode, $branch, undef, undef, $return_date);
68
    my ($return, $messages, $issue, $borrower) = AddReturn($barcode, $branch, undef, undef, $return_date);
69
    $self->alert(!$return);
69
    $self->alert(!$return);
70
    # ignoring messages: NotIssued, WasLost, WasTransfered
70
    # ignoring messages: NotIssued, WasLost, WasTransfered
71
71
Lines 94-100 sub do_checkin { Link Here
94
        $self->alert_type('04');            # send to other branch
94
        $self->alert_type('04');            # send to other branch
95
    }
95
    }
96
    if ($messages->{WasTransfered}) { # set into transit so tell unit
96
    if ($messages->{WasTransfered}) { # set into transit so tell unit
97
        $self->{item}->destination_loc($iteminformation->{homebranch});
97
        $self->{item}->destination_loc($issue->item->homebranch);
98
        $self->alert_type('04');            # send to other branch
98
        $self->alert_type('04');            # send to other branch
99
    }
99
    }
100
    if ($messages->{ResFound}) {
100
    if ($messages->{ResFound}) {
101
- 

Return to bug 21020