|
Lines 91-96
sub do_checkin {
Link Here
|
| 91 |
$self->destination_loc($iteminformation->{homebranch}); |
91 |
$self->destination_loc($iteminformation->{homebranch}); |
| 92 |
$self->alert_type('04'); # send to other branch |
92 |
$self->alert_type('04'); # send to other branch |
| 93 |
} |
93 |
} |
|
|
94 |
if ($messages->{WasTransfered}) { # set into transit so tell unit |
| 95 |
$self->destination_loc($iteminformation->{homebranch}); |
| 96 |
$self->alert_type('04'); # send to other branch |
| 97 |
} |
| 94 |
if ($messages->{ResFound}) { |
98 |
if ($messages->{ResFound}) { |
| 95 |
$self->hold($messages->{ResFound}); |
99 |
$self->hold($messages->{ResFound}); |
| 96 |
if ($branch eq $messages->{ResFound}->{branchcode}) { |
100 |
if ($branch eq $messages->{ResFound}->{branchcode}) { |
| 97 |
- |
|
|