Lines 66-73
sub do_checkin {
Link Here
|
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, $issue, $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); |
|
|
70 |
# ignoring messages: NotIssued, WasLost, WasTransfered |
71 |
|
69 |
|
72 |
# biblionumber, biblioitemnumber, itemnumber |
70 |
# biblionumber, biblioitemnumber, itemnumber |
73 |
# borrowernumber, reservedate, branchcode |
71 |
# borrowernumber, reservedate, branchcode |
Lines 117-123
sub do_checkin {
Link Here
|
117 |
$self->{item}->hold_patron_id( $messages->{ResFound}->{borrowernumber} ); |
115 |
$self->{item}->hold_patron_id( $messages->{ResFound}->{borrowernumber} ); |
118 |
$self->{item}->destination_loc( $messages->{ResFound}->{branchcode} ); |
116 |
$self->{item}->destination_loc( $messages->{ResFound}->{branchcode} ); |
119 |
} |
117 |
} |
120 |
$self->alert(1) if defined $self->alert_type; # alert_type could be "00", hypothetically |
118 |
$self->alert(defined $self->alert_type); # alert_type could be "00", hypothetically |
121 |
$self->ok($return); |
119 |
$self->ok($return); |
122 |
} |
120 |
} |
123 |
|
121 |
|
124 |
- |
|
|